☰

Excel 检测到歧义名称

tag-icon • tag-icon microsoft-excel
Excel 检测到歧义名称

你好，在这本工作手册中我有这段代码

Private Sub Workbook_BeforeClose(Cancel As Boolean)
 'Stop execution when workbook closes
 On Error Resume Next
 Application.OnTime Heure, "Calcul", , False
End Sub
Private Sub Workbook_Open()
 'start execution when workbook opens
 Application.OnTime Now + TimeValue("00:05:00"), "Calcul"
End Sub

在模块 1 中我有这个代码

    Sub Calcul()
     Heure = Now + TimeValue("00:05:00")
     Application.OnTime Heure, "Calcul"
     Sheet1.Range("FA99666").End(xlUp).Offset(1) = Sheet1.[o5]
     Sheet1.Range("FE99666").End(xlUp).Offset(1) = Sheet1.[o6]
     Sheet1.Range("FI99666").End(xlUp).Offset(1) = Sheet1.[o7]
     Sheet1.Range("FM99666").End(xlUp).Offset(1) = Sheet1.[o8]
     Sheet1.Range("FQ99666").End(xlUp).Offset(1) = Sheet1.[o9]
end sub

] 上述代码每 5 分钟运行一次

在模块 2 中我希望此代码每 10 分钟运行一次

    Sub Calcul()
     Heure = Now + TimeValue("00:10:00")
     Application.OnTime Heure, "Calcul"
     Sheet2.Range("FA99666").End(xlUp).Offset(1) = Sheet2.[o5]
     Sheet2.Range("FE99666").End(xlUp).Offset(1) = Sheet2.[o6]
     Sheet2.Range("FI99666").End(xlUp).Offset(1) = Sheet2.[o7]
     Sheet2.Range("FM99666").End(xlUp).Offset(1) = Sheet2.[o8]
     Sheet2.Range("FQ99666").End(xlUp).Offset(1) = Sheet2.[o9]
end sub

但是我收到错误 - 检测到模糊名称。我是 Excel 新手，如能得到任何帮助都将非常有帮助。

答案1

我同意评论中的观点，你应该阅读一下，但我认为与具体情况没有任何相关性，因为你正在使用Application.OnTime并且我没有看到链接中提到分享。

你可以在这里读到它：

https://stackoverflow.com/questions/31439866/multiple-variable-arguments-to-application-ontime

总结一下：您需要构建一个用引号括起来的字符串。其确切结构取决于您发送的内容（例如变量、整数、字符串）。

结构至关重要。很有可能，你会错过一个字符，并花费大量时间反复试验，直到找到正确的字符串

相关内容