¿Cómo guardar cada hoja como archivo de texto separado desde un libro de trabajo?

Cuando desees guardar una hoja de cálculo como archivo de texto, puedes usar la función Guardar como de Excel para guardar la hoja como un archivo de texto. Pero si deseas guardar cada hoja de un libro de trabajo como un archivo de texto separado, los pasos de Guardar como podrían irritarte. Aquí te presento algunos trucos interesantes para que resuelvas rápidamente esta tarea aburrida en Excel.

Guardar la hoja actual como archivo de texto con VBA

Guardar cada hoja de un libro de trabajo como archivos de texto separados con Kutools para Excel

Exportar una selección de hoja como archivo de texto con Kutools para Excel

Guardar la hoja actual como archivo de texto con VBA

Si no te gusta usar la función Guardar como para guardar la hoja como archivo de texto, puedes usar código VBA.

1. Activa la hoja que deseas guardar como archivo de texto.

2. Presiona las teclas Alt + F11 para mostrar la ventana de Microsoft Visual Basic para Aplicaciones.

3. Haz clic en Insertar > Módulo desde la ventana, y luego pega el siguiente código VBA en el Módulo.

Sub SaveSheetToTxt()
'Updateby20150910
    Dim xRet As Long
    Dim xFileName As Variant
    On Error GoTo ErrHandler:
    xFileName = Application.GetSaveAsFilename(ActiveSheet.Name, "TXT File (*.txt), *.txt", , "Kutools for Excel")
    If xFileName = False Then Exit Sub
    If Dir(xFileName) <> "" Then
        xRet = MsgBox("File '" & xFileName & "' exists.  Overwrite?", vbYesNo + vbExclamation, "Kutools for Excel")
        If xRet <> vbYes Then
            Exit Sub
        Else
            Kill xFileName
        End If
    End If
    ActiveSheet.Copy
    ActiveWorkbook.SaveAs xFileName, xlUnicodeText
    If ActiveWorkbook.Name <> ThisWorkbook.Name Then
        ActiveWorkbook.Close False
    End If
My_Exit:
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
End Sub

4. Haz clic en el botón Ejecutar para ejecutar el código, y luego, en el cuadro de diálogo de Kutools para Excel, selecciona una carpeta donde colocar el archivo de texto y especifica un nombre para el archivo de texto. Ver captura de pantalla:

5. Haz clic en Guardar. Ahora la hoja activa se guarda como archivo de texto.

Consejo: Con el VBA, solo puedes guardar una hoja como archivo de texto a la vez.

Guardar cada hoja de un libro de trabajo como archivos de texto separados con Kutools para Excel

Si tienes un libro de trabajo grande con cientos de hojas que necesitan guardarse como archivos de texto separados, el método VBA también es una pérdida de tiempo. En este caso, puedes intentar usar Separar libro de trabajo de Kutools para Excel para manejar esta tarea, lo cual te dará una sorpresa inesperada.

1. Habilita el libro de trabajo que deseas guardar sus hojas como archivos de texto independientes, y luego haz clic en Kutools Plus > Libro de trabajo > Separar libro de trabajo. Ver captura de pantalla:

2. En el cuadro de diálogo Separar libro de trabajo, selecciona las hojas que deseas dividir y guardar como archivos de texto; por defecto, todas las hojas están seleccionadas, y luego marca Especificar formato de guardado, y selecciona Texto Unicode (*.txt) desde la lista desplegable inferior. Ver captura de pantalla:

3. Haz clic en Separar, y luego selecciona una carpeta donde colocar los archivos de texto desde el cuadro de diálogo Examinar carpeta. Ver captura de pantalla:

4. Haz clic en Aceptar. Ahora cada hoja del libro de trabajo está guardada como un archivo de texto separado en la carpeta seleccionada.

Con Separar libro de trabajo de Kutools para Excel, puedes dividir un libro de trabajo y guardarlos como archivos xls separados, archivos xlsx, archivos PDF o archivos CSV. Haz clic aquí para saber más sobre esta utilidad.

Exportar una selección de hoja como archivo de texto con Kutools para Excel

Con Kutools para Excel, también puedes exportar una selección de una hoja como archivo de texto usando su Exportar rango a archivo.

1. Selecciona un rango o rangos que deseas guardar como archivo de texto, y haz clic en Kutools Plus > Importar/Exportar > Exportar rango a archivo. Ver captura de pantalla:

2. Luego, en el cuadro de diálogo emergente, marca la opción Texto Unicode en la sección Formato de archivo, luego ve a la sección Opciones de texto y marca una opción según sea necesario, y luego selecciona una ubicación de guardado.

3. Haz clic en Aceptar. Ahora nombra el archivo de texto exportado en el cuadro de diálogo emergente Exportar rango a archivo, y haz clic en el botón Aceptar.

Hasta ahora, la selección se ha exportado como un archivo de texto separado.