Pessoal, bom dia!

Eu vi alguns tópicos sobre consolidar dados de pastas de trabalho fechadas em uma única planilha, mas o meu caso é um pouco mais específico. Eu preciso de um loop para varrer toda a planilha de origem (que fica em uma pasta pública no servidor da minha empresa), e caso uma condição seja satisfeita, copiar os dados (que são datas de término) para a planilha de destino (que fica na minha máquina).

Essa condição, para ser um pouco mais específico, é verificar se o número do projeto na planilha de origem é igual ou número de projeto na planilha de destino. Se não for, nada é copiado para aquela linha, e o loop continua, verifica-se novamente se o número de projeto confere nas duas planilhas até atingir o fim do intervalo.

Já fiz isso dentro de uma mesma pasta de trabalho, mas como esse processo envolve ADO ou OLE DB, não estou familiarizado.

Segue parte do código inicial (já começa na linha 3 da planilha de origem, e na linha 6 da planilha de destino, acima é cabeçalho):

For i = 3 To 100
For j = 6 To 500
cellA1 = ThisWorkbook.Worksheets(k).Cells(i, 1).Value 'valor das células da coluna 1, descendo linha por linha até o fim - para verificação
cellA2 = ThisWorkbook.Worksheets(k).Cells(i, 2).Value 'valor das células da coluna 2, descendo linha por linha até o fim - para verificação
cellA3 = ThisWorkbook.Worksheets(k).Cells(i, 14).Value 'valor das células da coluna 14, descendo linha por linha até o fim - essa recebe os valores
cellB1 = 'Essa é a parte que não conheço, para extrair dados da planilha de destino, utilizando o caminho completo (ex: H:DocumentosProjetosplanilha.xls) - para verificação
cellB2 = 'idem acima - para verificação
cellB3 = 'idem acima, só que é dessas células que serão extraídos os valores
If cellA1 = cellB1 Then
If cellA2 = cellB2 Then
cellA3 = cellB3
End If
End If
Next j
Next i

Obrigado!

Eugenio Smith