Note: The other languages of the website are Google-translated. Back to English
Log in  \/ 
x
or
x
Inscreva-se  \/ 
x

or

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 ...     Experimentação livre

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
Importante: 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 Corrida 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 Abre 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:


As melhores ferramentas de produtividade para escritório

O Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Insira rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de discussão e enviar emails ...
  • Super Formula Bar (edite facilmente várias linhas de texto e fórmula); Layout de leitura (ler e editar facilmente um grande número de células); Colar na faixa filtrada...
  • Mesclar células / linhas / colunas sem perder dados; Dividir o conteúdo das células; Combinar linhas / colunas duplicadas... Evite células duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Único Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros; Seleção aleatória ...
  • Cópia exata Várias células sem alterar a referência da fórmula; Criação automática de referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair Texto, Adicionar texto, remover por posição, Remover Espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salvar e aplicar esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro Especial por negrito, itálico ...
  • Combine pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Divida os dados em várias folhas; Conversão em lote de xls, xlsx e PDF...
  • Mais de 300 recursos poderosos. Suporta Office / Excel 2007-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Teste gratuito de 30 dias com recursos completos. Garantia de devolução do dinheiro em 60 dias.
guia kte 201905

Guia do Office 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!
officetab bottom
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    leigh_87 · 2 years ago
    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?