對象全局失敗vba的方法單元格

Question

我正在使用下面的代碼在 excel 中引用一個范圍並將一個值放入其中。 該代碼第一次運行良好，但如果我再次加點就會失敗。 我收到錯誤消息（見標題）。 下面是我的代碼，有人能看到任何問題嗎？

xlApp.Workbooks("JDE1.xlsx").Sheets("TempHours").Range(Cells(2, 18), Cells(Cells(ws.Rows.Count, 1).End(xlUp).Row, 18)).Value = Batch

Answer 1

我知道這是一個老問題，我碰巧遇到了這個問題，但我仍然會繼續回答它。

您需要完全限定您的單元格對象。 注意cells()之前的 DOT 嗎？ 人們應該始終像您為Sheets("TempHours")所做的那樣完全限定對象。

With xlApp.Workbooks("JDE1.xlsx").Sheets("TempHours")
    .Range(.Cells(2, 18), .Cells(.Cells(ws.Rows.Count, 1).End(xlUp).Row, 18)).Value = Batch
End With

希望這對未來的游客有所幫助。