Я новичок в кодировании VBA. Я пытаюсь открыть рабочие тетради, прочитать и написать им.
Я должен открыть первую книгу, чтобы начать код.
Этот код открывает, открывает другие рабочие книги и записывает в них.
Это нормально работало в целях тестирования. Однако когда у меня открыты две книги и запущен код, неверное значение сохраняется.
Вот код:
Sub Workbook_test ()
WB_path = "C:\Users\az54\Macro_files\"
Source_File = WB_path & "Test_Source.xlsm" ' Source file name
File_Test = Dir(Source_File)
If (File_Test = "") Then
MsgBox "Source file not found at " & Source_File & vbCr & vbCr & "Check for Source file and RESTART"
GoTo FINISH
Else
Set Source_WB = Workbooks.Open(Source_File)
MsgBox "Source Workbook name = " & Source_WB.Name & vbCr & "Source Sheet name = " & setup_tab
Set Src_Sheet = Source_WB.Worksheets(setup_tab)
End If
FINISH:
End Sub
Переменная Source_WB не получает имя книги из переменной Source_File, вместо этого она загружается с другой открытой книгой.
Есть идеи?
Спасибо