爲什麼此行會產生運行時錯誤？

與碼工作，以抓住從文件的特定數據，該行：爲什麼此行會產生運行時錯誤？

With sht.Range(Cells(1, 1), Range("A1").SpecialCells(xlCellTypeLastCell))

生產：對象「_Worksheet」的方法「範圍」失敗。

我已經dimt作爲工作表，我只是想選擇範圍作爲整個工作表？

2016-02-05 IIJHFII

你設置你對任何工作表有什麼要求？你可以請完全分享代碼，如果不是需要的級別。當我運行.Range（Cells（1，1），Range（「A1」）。SpecialCells（xlCellTypeLastCell））。我沒有發現任何問題 – Siva

沒有合格工作表的單元或範圍將始終引用活動工作表，因此如果'sht'不活躍，您的代碼將會出錯 –

擴展到Tim所提及的內容......這會糾正它'sh .Range（「A1」）'。 – Davesexcel

你給你寫了「dim'd」sht作爲工作表。我假設你正在談論

Dim sht As Worksheet

如果你沒有做到以下幾點，有可能是這個問題：

set sht = ThisWorkbook.Worksheets("insertnamehere") [放在ThisWorkbook。部分asumes工作表是在代碼相同的工作簿]

如果這不能解決您的問題，請第二部分的調試輸出（我prefere MsgBox，但只有個人喜好），如MsgBox sht.Range("A1").SpecialCells(xlCellTypeLastCell).Address併發布結果在這裏（一個地址？一個新的錯誤？如果是這樣，是嗎？）

希望它有助於至少一步。

PS：如果你設置SHT媒體鏈接（不僅dim'd它< - 愛那句話：P）請還編輯您的帖子並添加代碼是（以及可能涉及的任何東西）

2016-02-05 14:58:02 IDontKnowJack

回答