工作表變量上的Excel VBA運行時錯誤'13'類型不匹配

Question

嘗試將“ remSheet”變量設置為newQuery工作簿的sheet1時，我不斷收到上述“類型不匹配”錯誤。 腳本的開頭如下所示。 最后一行是導致錯誤的行

Sub importNewPTRs()
Dim masterWorkbook As Workbook
Set masterWorkbook = ThisWorkbook
Dim newQuery As Workbook
Set newQuery = openWorkbook
Set newQuery = ActiveWorkbook
Dim remSheet As Worksheet
Set remSheet = Sheets(Sheet1)

我已經查看了與此特定錯誤消息有關的其他問題的解決方案，但它們沒有幫助。 我也嘗試過設置remSheet = newQuery.Sheets（Sheet1），這也沒有幫助。 誰能告訴我我在做什么錯？

Answer 1

您需要使用工作表位置Index （如果是第一工作表1 ，第二工作表2 ...）或標簽中顯示的Name 。 您的Sheet1變量什么都沒有，並且正在導致您的錯誤。