У нас вы можете посмотреть бесплатно Excel VBA For Loop Data Matching или скачать в максимальном доступном качестве, которое было загружено на ютуб. Для скачивания выберите вариант из формы ниже:
Если кнопки скачивания не
загрузились
НАЖМИТЕ ЗДЕСЬ или обновите страницу
Если возникают проблемы со скачиванием, пожалуйста напишите в поддержку по адресу внизу
страницы.
Спасибо за использование сервиса savevideohd.ru
If I was able to help you, feel free to donate. Paypal: [email protected] Sub match_Data() Dim rSH As Worksheet Dim sSh As Worksheet Set rSH = ThisWorkbook.Sheets("RAW DATA") Set sSh = ThisWorkbook.Sheets("SEARCH DATA") Dim fName As String, lName As String For a = 2 To sSh.Range("A" & Rows.Count).End(xlUp).Row fName = sSh.Range("A" & a).Value lName = sSh.Range("B" & a).Value For b = 2 To rSH.Range("A" & Rows.Count).End(xlUp).Row If rSH.Range("A" & b).Value = fName And rSH.Range("B" & b).Value = lName Then sSh.Range("C" & a).Value = rSH.Range("D" & b).Value sSh.Range("D" & a).Value = rSH.Range("E" & b).Value sSh.Range("E" & a).Value = rSH.Range("F" & b).Value sSh.Range("F" & a).Value = rSH.Range("H" & b).Value sSh.Range("G" & a).Value = rSH.Range("J" & b).Value Exit For End If Next b Next a Debug.Print "Completed" End Sub