Como importar / copiar dados da pasta de trabalho fechada para a pasta de trabalho atual?
É fácil para nós copiar dados de uma planilha aberta e colá-los em outra pasta de trabalho aberta, mas você já tentou importar dados de uma pasta de trabalho fechada para outra aberta? Neste artigo, falarei sobre como importar dados de uma pasta de trabalho fechada.
Importar dados da pasta de trabalho fechada para a pasta de trabalho atual com o código VBA
Importe dados da pasta de trabalho fechada para a pasta de trabalho atual com o Kutools para Excel
Importar dados da pasta de trabalho fechada para a pasta de trabalho atual com o código VBA
O seguinte código VBA pode ajudá-lo a copiar dados de uma pasta de trabalho sem abri-la na pasta de trabalho aberta ativa, siga as seguintes etapas:
1. Segure o ALT + F11 chaves, e abre o Microsoft Visual Basic para Aplicações janela.
2. Clique inserção > Móduloe cole o seguinte código no Janela Módulo.
Código VBA: Importar dados da pasta de trabalho fechada para a pasta de trabalho atual
Sub ImportDatafromcloseworkbook()
'Updateby Extendoffice
Dim xWb As Workbook
Dim xAddWb As Workbook
Dim xRng1 As Range
Dim xRng2 As Range
Set xWb = Application.ActiveWorkbook
xTitleId = "KutoolsforExcel"
With Application.FileDialog(msoFileDialogOpen)
.Filters.Clear
.Filters.Add "Excel 2007-13", "*.xlsx; *.xlsm; *.xlsa"
.AllowMultiSelect = False
.Show
If .SelectedItems.Count > 0 Then
Application.Workbooks.Open .SelectedItems(1)
Set xAddWb = Application.ActiveWorkbook
Set xRng1 = Application.InputBox(prompt:="Select source range", Title:=xTitleId, Default:="A1", Type:=8)
xWb.Activate
Set xRng2 = Application.InputBox(prompt:="Select destination cell", Title:=xTitleId, Default:="A1", Type:=8)
xRng1.Copy xRng2
xRng2.CurrentRegion.EntireColumn.AutoFit
xAddWb.Close False
End If
End With
End Sub
3. Então aperte F5 chave para executar este código, e no Arquivo aberto janela, selecione a pasta de trabalho cujos dados você deseja importar, consulte a captura de tela:
4. Então clique Abra botão e Kutools para Excel A caixa de diálogo é exibida para lembrá-lo de selecionar um intervalo de dados que deseja importar para outra pasta de trabalho, consulte a captura de tela:
5. E, em seguida, clique em OK botão, na caixa de diálogo aberta, selecione uma célula onde deseja colocar os dados, veja a captura de tela:
6. E clique em OK, os dados da pasta de trabalho fechada foram importados para a pasta de trabalho atual.
Importe dados da pasta de trabalho fechada para a pasta de trabalho atual com o Kutools para Excel
O código VBA pode ser um pouco difícil para nosso iniciante em Excel, então, aqui, vou recomendar uma ferramenta útilKutools for Excel, Com o seu Inserir arquivo no cursor recurso, você pode inserir todo o conteúdo de uma planilha de uma pasta de trabalho fechada com rapidez e facilidade.
Kutools for Excel : com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. |
Depois de instalar Kutools for Excel, faça o seguinte:
1. Clique Kutools Plus > Importar e Exportar > Inserir arquivo no cursor, veja a captura de tela:
2. No Inserir arquivo no cursor caixa de diálogo, faça as seguintes operações:
(1.) Clique botão para selecionar uma célula onde deseja colocar os dados importados;
(2.) Clique para selecionar a pasta de trabalho cujos dados você deseja importar.
Observação: Apenas valor (sem fórmulas): Se você marcar esta opção, apenas o valor será importado, e as fórmulas não serão importadas.
Não transfira formatação: Marcar esta opção importará os dados para a planilha sem formatação.
3. Então clique OK, se houver mais de uma planilha na pasta de trabalho, um Selecione uma planilha caixa de diálogo aparecerá, especifique uma planilha para a qual deseja importar os dados, consulte a captura de tela:
4. E, em seguida, clique em OK botão, os dados na planilha selecionada foram importados para a pasta de trabalho atual.
Clique para saber mais detalhes sobre este recurso Inserir Arquivo no Cursor.
Baixe e teste grátis Kutools para Excel agora!
Demonstração: importe dados da pasta de trabalho fechada para a pasta de trabalho atual com Kutools para Excel
Melhores ferramentas de produtividade de escritório
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...
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!