我正在把头发拉过来,因为我不知道为什么这不起作用。任何帮助或指导将不胜感激。
我在Excel中继承了一个宏,它根据我们运行它的PC运行不同。从本质上讲,宏将空白行插入到数据表中(该表还应具有条件格式,使其为蓝色以分解表并使其更易于阅读)。在我的电脑上而不是输入空白行,这是一行#ref错误并且丢失了格式。
我们为一个按钮分配了一个不同的宏,该按钮一个接一个地运行三个宏。我遇到的问题是这三个中的第三个。当我将宏作为三个单独的事件运行时,它可以工作,但它一起有#ref错误。
很抱歉该文件的小片段,但它是敏感信息。
我尝试在第二个和第三个之间添加暂停,但这没有帮助。
我应该检查一些安全设置吗?
宏查看A列中的公式并查找数字5并在此行后插入一行。代码如下: -
Sub Main()
Dim r As Range
Dim i As Long
i = 1
Do While Range("A" & i).Value <> ""
If Left(Range("a" & i), 2) = "5" Then
i = i + 1
Rows(i).Insert
Range("A" & i).Value = Range("a" & i - 1).Value
End If
i = i + 1
Loop
End Sub
我正在努力解决的问题是它是孤立的,但与其他宏一起运行时却不行。为了完整性,运行三者的宏具有以下代码: -
Sub runall_CVR()
Application.ScreenUpdating = False
Call hiderows_CVR
Call Delete0s_cvr
Call Main
Application.ScreenUpdating = True
End Sub
非常感谢
詹姆斯