tentando acessar uma célula de outra aba

Bom dia! Fiz esse curso para me ajudar a resolver uma questão, porém ainda não consegui. Se alguém puder, qualquer ajuda é bem vinda.

Tenho uma aba da planilha com uma coluna "nomes" e outra aba com 2 colunas: "nomes" e "sobrenomes".

Eu quero acessar uma célula de outra aba da planilha, e quero que, se o valor dessa célula for igual ao valor da outra, eu acesso a coluna do lado. Ou seja, se o nome da aba1 for igual ao nome na aba2, eu quero acessar o sobrenome.

Eu fiz esse For Each pensando: Para cada nome da Aba1 (que começa na linha 3, coluna 1 e vai até o fim); SE o valor nome na Aba1 for igual ao valor nome na Aba2, então o nome na Aba1 recebe o sobrenome (do mesmo nome) que está na aba2.

Sei que é um pouco confuso. Porém, o erro está batendo nessa primeira linha do for each, não sei se é erro de sintaxe ou algo do tipo.

For Each nome In Sheets("Aba1").Range(Selection.Cells(3, 1), Selection.End(xlDown))
    If StrComp([nome].Cells(nome.Row, 1).Value, [nomeAba2].Cells(Cél.Row - 1, 1).Value, vbTextCompare) = 0 Then
        alocar.nome = [nome].Cells(nome.Row, 2).Value
    End If
Next

Agradeço desde já!