Я хочу посмотреть, находится ли значение в столбце A одной рабочей книги в столбце A другой рабочей книги (а затем вернуть строку). Тем не менее, я застрял в использовании матча.
Я пробовал разные подходы с помощью функции сопоставления, сначала со ссылкой, затем я просто набрал число для сопоставления. Проблема в том, что пока текущая рабочая книга (wbCurr
) открыта, она всегда ищет там значение. Когда я закрываю его, он смотрит в основной файл (wbMaster
), что я и хочу.
Sub ReportCreation()
Dim wbMaster As Workbook, wbCurr As Workbook As Workbook
Dim pathMaster As String, pathCurrent As String As String
Dim rowMaster As Variant
Dim rowCurrent As Long, lRowCurrent As Long, lRowMaster As Long
pathMaster = "C:\Users\VBA\report2019.xlsx"
pathCurrent = "C:\Users\VBA\report 042019.xlsx"
Set wbMaster = Workbooks.Open(pathMaster)
Set wbCurr = Workbooks.Open(pathCurrent) 'current month
' rowMaster = Application.Match(wbCurr.Worksheets(1).Cells(3, 1), wbMaster.Worksheets(1).Range("A:A"), 0)
rowMaster = Application.WorksheetFunction.Match(7, wbMaster.Worksheets(1).Range("A:A"), 0)
Debug.Print rowMaster
End Sub