Alternativa VBA VLookup mais rápida para recuperar dados com base em uma chave
Estou tentando combinar um grande conjunto de dados e copiar os valores de uma planilha para outra usando o VBA. Atualmente, estou usando o Vlookup, mas o processo é tão lento, mesmo para a coluna única que estou testando, que não é viável. Existe uma maneira mais eficiente de combinar dados com base em uma chave? Essencialmente, meus dados são assim, onde estou tentando copiar os 'Dados' do conjunto de dados A para B, usando a 'Chave'
Conjunto de dados A:
Key Data
123 yes
231 yes
435 no
Conjunto de dados B:
Key Data
453
231
Meu código atualmente é o seguinte:
Sub copyData()
Dim myLastRow As Long
Dim backlogSheet As Worksheet
Dim combinedSheet As Worksheet
Set backlogSheet = Sheets("All SAMs Backlog")
Set combinedSheet = Sheets("COMBINED")
myLastRow = backlogSheet.Cells(Rows.Count, "B").End(xlUp).Row
Application.ScreenUpdating = False
For myRow = 3 To myLastRow
curLoc = backlogSheet.Cells(myRow, "C")
searchVal = Range("D" & myRow).Value
statusVal = Application.VLookup(curLoc, combinedSheet.Range("A:B"), 2, False)
'Range("D" & myRow).Cells.Value = testVal
Next myRow
MsgBox ("done")
End Sub
Qualquer ajuda é apreciada.