VBA: функция соответствия с двумя рабочими книгами - PullRequest
0 голосов
/ 17 мая 2019

Я хочу посмотреть, находится ли значение в столбце 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    
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...