Ir para o conteúdo principal

Como pesquisar / localizar valores em outra pasta de trabalho?

Este artigo fala sobre como pesquisar valores e retornar dados de outra pasta de trabalho e como localizar / pesquisar valores de outra pasta de trabalho. Aqui, apresentarei três soluções em detalhes.


Dados do Vlookup e valores de retorno de outra pasta de trabalho no Excel

Por exemplo, você está criando uma tabela de Compra de frutas no Excel e agora precisa ver as frutas de outra pasta de trabalho e retornar os preços correspondentes conforme as capturas de tela mostradas abaixo. Aqui vou guiá-lo a resolvê-lo com a função VLOOKKUP no Excel.

1. Abra as duas pastas de trabalho das quais você visualizará os valores e os retornará

2. Selecione uma célula em branco cujo preço devolverá, digite a fórmula = PROCV (B2, [Preço.xlsx] Folha1! $ A $ 1: $ B $ 24,2, FALSO) nele e, em seguida, arraste o identificador de preenchimento para aplicar esta fórmula ao intervalo de que você precisa.

Notas:
(1) Na fórmula acima, B2 é a fruta que você procurará em outra pasta de trabalho, Price.xlsx indica o nome do arquivo da pasta de trabalho a partir da qual você consultará, Folha1 significa o nome da folha que você consultará e A $ 1 : $ B $ 24 é o intervalo a partir do qual você observará. Você pode alterá-los conforme necessário.
(2) Depois de fechar a pasta de trabalho que você consultou, a fórmula será atualizada automaticamente para = PROCV (B2, 'W: \ teste \ [Preço.xlsx] Planilha1'! $ A $ 1: $ B $ 24,2, FALSO), o W: \ test \ é o caminho de salvamento da pasta de trabalho que você consultou.

Até agora, todos os preços retornaram corretamente conforme a imagem mostrada à esquerda. E esses preços serão atualizados automaticamente se a pasta de trabalho original que você consultou nas alterações.

fita de notas A fórmula é muito complicada para lembrar? Salve a fórmula como uma entrada de texto automático para reutilizá-la com apenas um clique no futuro!
Leia mais ...     Teste Grátis

Dados Vlookup e valores de retorno de outra pasta de trabalho fechada com VBA

Pode ser confuso configurar o caminho de salvamento, o nome do arquivo e a planilha na função PROCV. Este método apresentará um VBA para resolvê-lo facilmente.

1. aperte o outro + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique na inserção > Móduloe cole o código VBA abaixo na janela do módulo de abertura.

VBA: dados Vlookup e valores de retorno de outra pasta de trabalho fechada

Private Function GetColumn(Num As Integer) As String
If Num <= 26 Then
GetColumn = Chr(Num + 64)
Else
GetColumn = Chr((Num - 1) \ 26 + 64) & Chr((Num - 1) Mod 26 + 65)
End If
End Function
Sub FindValue()
Dim xAddress As String
Dim xString As String
Dim xFileName As Variant
Dim xUserRange As Range
Dim xRg As Range
Dim xFCell As Range
Dim xSourceSh As Worksheet
Dim xSourceWb As Workbook
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xUserRange = Application.InputBox("Lookup values :", "Kutools for Excel", xAddress, Type:=8)
If Err <> 0 Then Exit Sub
Set xUserRange = Application.Intersect(xUserRange, Application.ActiveSheet.UsedRange)
xFileName = Application.GetOpenFilename("Excel Files (*.xlsx), *.xlsx", 1, "Select a Workbook")
If xFileName = False Then Exit Sub
Application.ScreenUpdating = False
Set xSourceWb = Workbooks.Open(xFileName)
Set xSourceSh = xSourceWb.Worksheets.Item(1)
xString = "='" & xSourceWb.Path & Application.PathSeparator & _
"[" & xSourceWb.Name & "]" & xSourceSh.Name & "'!$"
For Each xRg In xUserRange
Set xFCell = xSourceSh.Cells.Find(xRg.Value, , xlValues, xlWhole, , , False)
If Not (xFCell Is Nothing) Then
xRg.Offset(0, 2).Formula = xString & GetColumn(xFCell.Column + 1) & "$" & xFCell.Row
End If
Next
xSourceWb.Close False
Application.ScreenUpdating = True
End Sub
Note: Este VBA retornará valores em uma coluna que está 2 colunas atrás da coluna selecionada. Por exemplo, eu seleciono a coluna B ao aplicar este VBA, os valores retornarão na coluna D. Se você precisar alterar a coluna de destino, descubra o código xRg.Offset (0, 2) .Formula = xString & GetColumn (xFCell.Column + 1) & "$" & xFCell.Row e substituir 2 para outro número conforme necessário.

3. aperte o F5 ou clique no Execute botão para executar este VBA.

4. Na caixa de diálogo de abertura, especifique o intervalo de dados que você procurará e clique no OK botão.

5. Agora, selecione a pasta de trabalho onde procurará os valores na caixa de diálogo Selecionar uma pasta de trabalho e clique no botão Abra botão.

Agora todos os valores selecionados são pesquisados ​​na pasta de trabalho fechada especificada e os valores correspondentes são retornados na coluna especificada. Veja a imagem:

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...

Descrição


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi this works great thanks! Would it be at all possible to show me how i would change the code if i have the workbook open that i would like to lookup the data in?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations