☰

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

但我收到錯誤 - 檢測到不明確的名稱。我是新手，任何幫助都會很棒。

答案1

我同意評論中的觀點，您應該閱讀，但我沒有看到與具體情況有任何相關性，因為您正在使用，Application.OnTime並且我沒有看到連結中提到的共享。

你可以在這裡讀到它：

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

總結一下：您需要建立一個用引號封裝的字串。其確切結構取決於您發送的內容（例如變數、整數、字串）。

結構很關鍵。很可能，您會錯過一個字元並花費大量時間進行反覆試驗，直到找到正確的字串

相關內容