Откройте несколько рабочих книг и активируйте определенную рабочую книгу - PullRequest
Новая
       6

Откройте несколько рабочих книг и активируйте определенную рабочую книгу

0 голосов
/ 11 декабря 2018

У меня есть несколько рабочих книг, и я просто пытаюсь активировать определенную рабочую книгу и постоянно получаю сообщение об ошибке, сообщая "object doesnt support this property or method."

Код ниже: 

Sub RUNME()

'Call OPENFiles 'this call runs a small piece of code to open all the files an works fine


Dim wbmacro As Workbook
Dim wblean As Workbook
Dim wbmain As Workbook

Dim ws1 As Worksheet
Dim ws2 As Worksheet
Dim ws3 As Worksheet


Set wbmacro = Workbooks.Item("MacroFile.xlsm")
Set wbmain = Workbooks.Item("Mainfile.csv")
Set wblean = Workbooks.Item("Secondfile.csv")

Set ws1 = wbmacro.Worksheets.Item("Data")
Set ws3 = wblean.Worksheets.Item("Sheet2")

wblean.ws3.Activate 'line with error

Я пыталсяиграть с этим несколькими разными способами, но не понимаю, почему я получаю эту ошибку?

...