Excel vba在两台计算机上的运行方式不同

时间:2017-09-07 21:03:54

标签: excel vba excel-vba

我正在把头发拉过来,因为我不知道为什么这不起作用。任何帮助或指导将不胜感激。

我在Excel中继承了一个宏,它根据我们运行它的PC运行不同。从本质上讲,宏将空白行插入到数据表中(该表还应具有条件格式,使其为蓝色以分解表并使其更易于阅读)。在我的电脑上而不是输入空白行,这是一行#ref错误并且丢失了格式。

我们为一个按钮分配了一个不同的宏,该按钮一个接一个地运行三个宏。我遇到的问题是这三个中的第三个。当我将宏作为三个单独的事件运行时,它可以工作,但它一起有#ref错误。

It should look like this

But actually looks like this

很抱歉该文件的小片段,但它是敏感信息。

我尝试在第二个和第三个之间添加暂停,但这没有帮助。

我应该检查一些安全设置吗?

宏查看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

非常感谢

詹姆斯

0 个答案:

没有答案