gpt4 book ai didi

Excel VBA 值为 0 时清除格式

转载 作者:行者123 更新时间:2023-12-04 22:28:38 25 4
gpt4 key购买 nike

我创建了一个报告,其中有一些单元格具有空值。当我的代码将数字格式应用于空单元格时,它显示为 0%对于空白值。我添加了一个代码,然后删除显示为 0% 的任何值和格式,但运行时间很长(30 秒左右),有时 Excel 会崩溃。

代码:

Application.ScreenUpdating = False

Dim cell As Range
For Each cell In Range("v11:ay9000")
If cell = 0 Then cell.ClearFormats
Next cell

Application.ScreenUpdating = True

对于代码速度的任何帮助,我将不胜感激。

最佳答案

您有一个 XY problem .

您正在尝试缩短修复初始问题所需的时间。相反,您应该首先设置正确的数字格式。

Range("v11:ay9000").numberformat = "0%;-0%;;"

关于Excel VBA 值为 0 时清除格式,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/55321031/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com