Olá meus caros! Tenho o seguinte problema: estou querendo buscar informações em duas planilhas, o problema é que eu preciso cruzar as informações para que o valor do primeiro Workbook compare com o valor do segundo e retorne o valor comparado para a celula correspondente. Eu achei um código que utiliza a função match para isso, só que a função match pelo que me parece não existe no Office 2003. Não sei se está claro a minha dúvida, é meio difícil se expressar :blink:
Pergunta
Douglas.Pires
Olá meus caros! Tenho o seguinte problema: estou querendo buscar informações em duas planilhas, o problema é que eu preciso cruzar as informações para que o valor do primeiro Workbook compare com o valor do segundo e retorne o valor comparado para a celula correspondente. Eu achei um código que utiliza a função match para isso, só que a função match pelo que me parece não existe no Office 2003. Não sei se está claro a minha dúvida, é meio difícil se expressar :blink:
Segue a parte do código que usa o match
Public Sub buscaNaTabela(parametro1, linha)
Workbooks("Tabela.xls").Worksheets("Fretes").Activate
Index = Application.Match(parametro1, Range("Fretes!C1:C200"), 0)
If Not IsError(Index) Then
Workbooks("Lançamento de Frete.xls").Worksheets("Plan1").Cells(linha, 3) = Workbooks("Tabela.xls").Worksheets("Fretes").Cells(Index, 2).Value
Workbooks("Lançamento de Frete.xls").Worksheets("Consolidado").Cells(linha, 10) = Workbooks("Tabela.xls").Worksheets("Fretes").Cells(Index, 6).Value
Workbooks("Lançamento de Frete.xls").Worksheets("Consolidado").Cells(linha, 2) = Workbooks("Tabela.xls").Worksheets("Fretes").Cells(Index, 1).Value
End If
End Sub
Se vocês puderem me informar alguma forma alternativa para buscar os dados peço que me informem!
Grato!!
Link para o comentário
Compartilhar em outros sites
0 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.