¿Cómo importar varios archivos de texto de una carpeta a una hoja de cálculo?
Suponga que tiene un escenario en el que necesita consolidar datos para informes o análisis, y recibe la información en forma de varios Archivo de Texto, todos guardados en una Carpeta única. Copiar y pegar manualmente el contenido de cada Archivo de Texto en una hoja de cálculo puede ser extremadamente lento y propenso a errores, especialmente si el número de archivos es elevado o si los archivos se actualizan con frecuencia. Afortunadamente, existen formas eficientes de importar y combinar automáticamente estos Archivo de Texto en una única hoja de Excel. Este artículo presenta métodos prácticos para lograr esta tarea, garantizando precisión y ahorrando un esfuerzo manual considerable. Estos métodos son adecuados para muchas situaciones reales, como consolidar resultados de encuestas, importar datos de registro o combinar exportaciones de texto fragmentadas procedentes de diversas fuentes en un único conjunto de datos.
A continuación, encontrará varios enfoques para importar rápidamente varios archivos de texto de una carpeta a Excel. Cada método incluye instrucciones paso a paso, consejos prácticos y observaciones útiles para ayudarle a evitar errores comunes.
Importar varios Archivo de Texto de una carpeta a una única hoja con VBA
Importar Archivo de Texto en la celda activa con Kutools para Excel 
Importar varios Archivo de Texto de una carpeta a una única hoja con VBA
Una forma eficiente de importar todos los archivos de texto de una carpeta específica a Excel es mediante una macro de VBA. Esta solución resulta ideal si realiza esta operación con frecuencia o necesita automatizar tareas repetitivas sin recurrir a complementos adicionales. Le permite procesar rápidamente un gran volumen de archivos y reducir al mínimo la intervención manual. No obstante, el uso de VBA requiere habilitar las macros —algo que podría estar restringido en ciertos entornos— y un conocimiento básico del editor de Visual Basic para Aplicaciones.
Antes de comenzar, le recomendamos hacer una copia de seguridad de su libro de trabajo, ya que las operaciones de macro no se pueden deshacer fácilmente. Asegúrese de que sus archivos de texto estén formateados de forma coherente, ya que estructuras impredecibles podrían requerir una limpieza manual tras la importación.
1. Abra el libro de trabajo en el que desea importar un archivo de texto y pulse Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En el editor de VBA, haga clic en Insertar > Módulo y, a continuación, copie y pegue el siguiente código VBA en la ventana del módulo:
VBA: Importar varios Archivo de Texto de una carpeta a una hoja
Sub Test()
'UpdatebyExtendoffice
Dim xWb As Workbook
Dim xToBook As Workbook
Dim xStrPath As String
Dim xFileDialog As FileDialog
Dim xFile As String
Dim xFiles As New Collection
Dim I As Long
Set xFileDialog = Application.FileDialog(msoFileDialogFolderPicker)
xFileDialog.AllowMultiSelect = False
xFileDialog.Title = "Select a folder [Kutools for Excel]"
If xFileDialog.Show = -1 Then
xStrPath = xFileDialog.SelectedItems(1)
End If
If xStrPath = "" Then Exit Sub
If Right(xStrPath, 1) <> "\" Then xStrPath = xStrPath & "\"
xFile = Dir(xStrPath & "*.txt")
If xFile = "" Then
MsgBox "No files found", vbInformation, "Kutools for Excel"
Exit Sub
End If
Do While xFile <> ""
xFiles.Add xFile, xFile
xFile = Dir()
Loop
Set xToBook = ThisWorkbook
If xFiles.Count > 0 Then
For I = 1 To xFiles.Count
Set xWb = Workbooks.Open(xStrPath & xFiles.Item(I))
xWb.Worksheets(1).Copy after:=xToBook.Sheets(xToBook.Sheets.Count)
On Error Resume Next
ActiveSheet.Name = xWb.Name
On Error GoTo 0
xWb.Close False
Next
End If
End Sub3. Pulse F5 mientras el cursor esté dentro del código para ejecutarlo. Aparecerá un cuadro de diálogo que le pedirá que seleccione la carpeta que contiene sus archivos de texto de destino. Vea la captura de pantalla:
4. Haga clic en Aceptar. La macro importará cada archivo de texto como una hoja de cálculo nueva en su libro de trabajo actual. Tenga en cuenta que, si los archivos son grandes o numerosos, este proceso puede tardar un poco. ¡Compruebe el resultado!
Consejo: Si sus archivos de texto incluyen encabezados o delimitadores específicos, es posible que deba ajustar el código VBA para adaptarlo a la estructura de sus datos. En caso de errores, verifique que la ruta del archivo y el tipo de archivo sean correctos, y asegúrese de que ningún archivo de texto esté abierto en otra parte del sistema. Si hay archivos con nombres idénticos, podrían surgir conflictos al asignar nombres a las hojas de cálculo.
Importar Archivo de Texto en la celda activa con Kutools para Excel
Cuando solo necesite insertar el contenido de un único archivo de texto en una ubicación específica de su hoja de cálculo, Kutools para Excel ofrece una solución intuitiva mediante su utilidad Insertar archivo en el cursor. Esta opción resulta especialmente útil para combinar fragmentos de datos seleccionados o para importar notas de referencia directamente en celdas o rangos definidos. A diferencia de las soluciones basadas en VBA, Kutools no requiere programación y proporciona una interfaz fácil de usar para importar archivos de texto a cualquier celda de destino.
Tras instalar gratuitamenteKutools para Excel, siga estos pasos:
1. Haga clic para seleccionar la celda en la que desea importar el contenido del archivo de texto y vaya a KUTOOLS PLUS > Importar/Exportar > Insertar archivo en el cursor. Vea la captura de pantalla:
2. Aparecerá un cuadro de diálogo. Haga clic en Examinar para abrir el cuadro de diálogo de selección de archivos. En el menú desplegable Tipo de archivo, seleccione Archivo de texto y localice el archivo de texto que desea insertar. Vea la captura de pantalla:
3. Haga clic en Abrir y, a continuación, en Aceptar. El contenido del archivo de texto seleccionado se insertará en la celda elegida. Vea la captura de pantalla:
Notas: El contenido de texto se importa en la celda seleccionada, conservando en la mayor medida posible el formato original. Para obtener los mejores resultados, asegúrese de que la celda de destino cuente con suficiente espacio para mostrar o expandir los datos importados. Para realizar varias importaciones simultáneas, utilice esta función repetidamente o combínela con las herramientas por lotes de Kutools.
Resumen: Para importaciones sencillas u ocasionales de archivos individuales, Kutools ofrece opciones intuitivas directamente en la hoja de cálculo, mientras que VBA es la mejor opción para quienes requieran una personalización más profunda o procesamiento por lotes sin depender de complementos.
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active 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 dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos