Предполагается, что мой код VBA берет копию файла, переименовывает его и продолжает работать над скопированной версией. Это вроде работает, когда я перехожу, потому что скопированный файл, A, будет создан, но тогда мой код не будет работать с этим вновь созданным файлом A. Вместо этого он будет работать с некоторым файлом, B, который у меня нет. T открыл в днях. Если я напрямую запусту макрос, то A даже не будет создан. Я не вижу в моем коде упоминания B, но я скопировал большой кусок кода из B. Я не думал, что это повлияет на что-либо, потому что ни один из моего кода не говорит ничего подобного "thisworkbook".
'Dim this conversion tool workbook
Dim wbTool As Workbook
Set wbTool = ThisWorkbook
Dim wsTool As Worksheet
Set wsTool = ThisWorkbook.Sheets(1)
Dim sMasterLocOld As String, sListLoc As String, sMasterLocNew As String
sMasterLocOld = wsTool.Range("MasterLoc").Value
sListLoc = wsTool.Range("ListLoc").Value
sMasterLocNew = Left(sMasterLocOld, InStr(sMasterLocOld, "_")) + CStr(MonthName(Month(Now), True)) + CStr(Year(Now)) + ".xlsx"
'Copy previous masterfile data onto a new workbook and name it as of current month. All following edits would be based on this new file.
FileCopy sMasterLocOld, sMasterLocNew
'Dim the other two workbooks, and then open them to perform further actions
Dim wbSource As Workbook, wbMapping As Workbook
Application.DisplayAlerts = False
Set wbSource = Workbooks.Open(sMasterLocNew)
Application.EnableEvents = False
Application.DisplayAlerts = False
Set wbMapping = Workbooks.Open(sListLoc)
Dim wsSource As Worksheet, wsmapping As Worksheet
Set wsSource = wbSource.Sheets(1)
Set wsmapping = wbMapping.Sheets(1)