다른 테이블의 값을 기반으로 한 탭에서 다른 탭으로 데이터 복사

Question

Excel에 "RawData"테이블을 필터링하고 싶습니다. A 열에는 이름이 있고 B 열에는 숫자가 있습니다. 나는 이름이 특정 번호와 일치하는 경우 다른 데이터 테이블 "LoadingData"에 데이터를 복사하려고합니다. 워크 시트 내에서 다른 탭 "ShiftData"에 해당 이름/번호가 있습니다.

EX. John Smith가 그 옆에있는 열에 2가 있으면 전체 행을 "LoadingData"시트로 복사합니다. 존 스미스가 옆에있는 열에 4를 표시하면 데이터를 이동하지 마십시오.

VLOOKUP 함수를 사용해 보았지만, 내가하려고하는 것이 그보다 더 복잡하다고 생각합니다. 어떤 도움을 주시면 감사하겠습니다! 즉 당신이 정말로 필요한 경우

Answer 1

Sub CopyData() 
Const cValuetoCheck = 2 
Dim rngData As Range, rngLoad As Range 

    Set rngData = Worksheets("shiftdata").Range("B1") 
    Set rngLoad = Worksheets("loadingdata").Range("A1") 

    While Not (IsEmpty(rngData)) 
     If rngData = cValuetoCheck Then 
      rngData.EntireRow.Copy 
      rngLoad.EntireRow.PasteSpecial 
      Set rngLoad = rngLoad.Offset(1, 0) 
     End If 
     Set rngData = rngData.Offset(1, 0) 
    Wend 

End Sub