¿Cómo importar / copiar datos de un libro cerrado al libro actual?
Es fácil para nosotros copiar datos de una hoja de trabajo abierta y pegarlos en otro libro de trabajo abierto, pero, ¿alguna vez ha intentado importar datos de un libro de trabajo cerrado a un libro de trabajo abierto? En este artículo, hablaré sobre cómo importar datos de un libro cerrado.
Importe datos del libro de trabajo cerrado al libro de trabajo actual con código VBA
Importe datos del libro de trabajo cerrado al libro de trabajo actual con Kutools para Excel
Importe datos del libro de trabajo cerrado al libro de trabajo actual con código VBA
El siguiente código VBA puede ayudarlo a copiar datos de un libro de trabajo sin abrirlo en el libro de trabajo abierto activo, siga los siguientes pasos:
1. Mantenga pulsado el ALT + F11 llaves, y abre el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Ventana de módulo.
Código de VBA: importe datos del libro de trabajo cerrado al libro de trabajo actual
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. Entonces presione F5 para ejecutar este código, y en el Abrir archivo ventana, seleccione el libro de trabajo que desea importar sus datos, vea la captura de pantalla:
4. Luego haga clic Abierto botón, y KutoolsparaExcel aparece un cuadro de diálogo para recordarle que seleccione un rango de datos que desea importar a otro libro de trabajo, vea la captura de pantalla:
5. Y luego haz clic OK , en el cuadro de diálogo emergente, seleccione una celda donde desea colocar los datos, vea la captura de pantalla:
6. Y haga clic en OK, los datos del libro cerrado se han importado al libro actual.
Importe datos del libro de trabajo cerrado al libro de trabajo actual con Kutools para Excel
El código VBA puede ser algo difícil para nuestro principiante de Excel, así que aquí, le recomendaré una herramienta útil.Kutools for Excel, Con su Insertar archivo en el cursor función, puede insertar todo el contenido de una hoja de trabajo de un libro cerrado de forma rápida y sencilla.
Kutools for Excel : con más de 300 prácticos complementos de Excel, prueba gratuita y sin límite en 30 días. |
Después de instalar Kutools for Excel, haga lo siguiente:
1. Haga Clic en Kutools Más > Importación y exportación > Insertar archivo en el cursor, ver captura de pantalla:
2. En la Insertar archivo en el cursor cuadro de diálogo, realice las siguientes operaciones:
(1.) Haga clic en botón para seleccionar una celda donde desea poner los datos importados;
(2.) Haga clic en para seleccionar el libro de trabajo cuyos datos desea importar.
Nota: Solo valor (sin fórmulas): Si marca esta opción, solo se importará el valor y no se importarán las fórmulas.
No transferir formato: Al marcar esta opción, se importarán los datos a la hoja de trabajo sin formatear.
3. Luego haga clic OK, si hay más de una hoja de trabajo en el libro, una Seleccione una hoja de trabajo Aparecerá un cuadro de diálogo emergente, especifique una hoja de trabajo en la que desea importar los datos, vea la captura de pantalla:
4. Y luego haz clic OK , los datos de la hoja de trabajo seleccionada se han importado al libro de trabajo actual.
Haga clic para conocer más detalles sobre esta función Insertar archivo en el cursor.
¡Descargue y pruebe Kutools para Excel ahora!
Demostración: importe datos del libro de trabajo cerrado al libro de trabajo actual con Kutools para Excel
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!