Les galetes ens ajuden a lliurar els nostres serveis. En utilitzar els nostres serveis, accepteu el nostre ús de cookies.
Consell: altres idiomes es tradueixen en Google. Pots visitar el English versió d'aquest enllaç.
Iniciar Sessió
x
or
x
x
Registre
x

or

Com es guarda cada full com a fitxer de text separat d'un llibre?

Quan vulgueu desar un full de càlcul com a fitxer de text, podeu utilitzar la funció Guardar com a Excel per desar el full de càlcul com a fitxer de text. Però si voleu desar totes les fulles d'un llibre com un fitxer de text separat, els passos de Desa com ha d'irritar. Aquí us presento alguns interessants trucs per resoldre ràpidament aquest treball avorrit a Excel.

Deseu un full com a fitxer de text amb VBA

Deseu cada full d'un llibre com a fitxer de text separat amb Kutools for Excel bona idea 3

Exporta una selecció de full com a fitxer de text amb Kutools for Excel


fletxa blau dreta bombolla Deseu un full com a fitxer de text amb VBA


Si no voleu utilitzar la funció Desa com a funció per desar el full com a fitxer de text, podeu utilitzar el codi VBA.

Kutools for Excel, amb més de 120 funcions Excel útils, millorar l'eficiència del treball i estalviar temps de treball.

1. Activeu el full que voleu desar com a fitxer de text.

2. Premeu Alt + F11 claus per mostrar Microsoft Visual Basic per a aplicacions finestra.

3. clic Insereix > Mòduls des de la finestra i, a continuació, enganxeu el codi VBA per sota del Mòdul.

VBA: Desa el full com a fitxer de text.

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. clic Correr botó per executar el codi i després en el botó Kutools for Excel diàleg, seleccioneu una carpeta per posar el fitxer de text i especifiqueu un nom per al fitxer de text. Mostra la captura de pantalla:

guardeu doc ​​com a fitxer de text 1

5. clic Desar. Ara el full actiu es guarda com a fitxer de text.

Consell: amb el VBA, només podeu desar un full com a fitxer de text alhora.


fletxa blau dreta bombolla Deseu cada full d'un llibre com a fitxer de text separat amb Kutools for Excel

Si teniu un gran llibre de treball amb centenars de fulls necessaris per guardar fitxers de text separats, el mètode VBA també perd el temps. En aquest cas, podeu provar d'utilitzar-lo Kutools for Excel'S Quadre de treball dividit per fer front a aquest treball, que us donarà una sorpresa inesperada.

Kutools for Excel, amb més de 120 funcions Excel útils, millorar la vostra eficiència laboral i estalviar temps de treball.

Després de Instal·lació gratuïta Kutools for Excel, feu el següent:

1. Activeu el llibre que voleu desar els fulls com a fitxers de text independents i feu clic a empresa > llibre de treball > Quadre de treball dividit. Mostra la captura de pantalla:

guardeu doc ​​com a fitxer de text 2

2. A la Quadre de treball dividit diàleg, seleccioneu els fulls que vulgueu dividir i deseu-los com a fitxers de text, per defecte, seleccioneu tots els fulls i, a continuació, seleccioneu Especifiqueu el format de guardarI seleccioneu Text unicode (*. Txt) des de la llista desplegable de sota. Mostra la captura de pantalla:

guardeu doc ​​com a fitxer de text 3

3. clic divisió, i després seleccioneu una carpeta per posar els fitxers de text Cerca la carpeta diàleg. Mostra la captura de pantalla:

guardeu doc ​​com a fitxer de text 4

4. clic OK. Ara, cada full del llibre es desa com a fitxer de text separat a la carpeta seleccionada.

amb Quadre de treball dividit of Kutools for Excel, podeu dividir un llibre i desar-los com fitxers xls separats, fitxers xlsx, fitxers PDF o fitxers CSV, feu clic aquí per obtenir més informació sobre aquesta utilitat.

Feu clic aquí per descarregar gratuïtament Kutools for Excel


fletxa blau dreta bombolla Exporta una selecció de full com a fitxer de text amb Kutools for Excel

amb Kutools for Excel, també podeu exportar una selecció d'un full com a fitxer de text mitjançant el vostre Exporta l'interval al fitxer.

Kutools for Excel, amb més de 120 funcions Excel útils, millorar la vostra eficiència laboral i estalviar temps de treball.

Després de Instal·lació gratuïta Kutools for Excel, feu el següent:

1. Seleccioneu un interval o intervals que voleu desar com a fitxer de text i feu clic a empresa > Importació-exportació > Exporta l'interval al fitxer. Mostra la captura de pantalla:

guardeu doc ​​com a fitxer de text 5

2. Després, al quadre de diàleg emergent, marqueu Text unicode opció sota format d'arxiu secció, després vés a Opcions de text section per marcar una opció segons necessiteu i, a continuació, seleccioneu una ubicació d'emmagatzematge.

guardeu doc ​​com a fitxer de text 6

3. clic Ok. Ara doneu nom al fitxer de text exportat al popping Exporta l'interval al fitxer quadre de diàleg i feu clic a la icona OK botó.

guardeu doc ​​com a fitxer de text 7

Fins ara, la selecció s'ha exportat com un fitxer de text independent.

Hi ha més que 120 eines en Kutools for Excel, per instal·lar-lo i fer una prova de 60-days, potser trobareu moltes funcions útils sense sentit.

presta atenció1Si esteu interessats en aquest complement, feu clic aquí per fer-ho descarregueu la prova gratuïta de 60-dies.


Eines de productivitat recomanades

Pestanya d'Office

estrella d&#39;or1 Porteu les pestanyes pràctiques a l'Excel i a un altre programari d'Office, igual que Chrome, Firefox i el nou Internet Explorer.

Kutools for Excel

estrella d&#39;or1 Increïble! Incrementeu la productivitat en 5 minuts. No necessites cap habilitat especial, estalvieu dues hores cada dia.

estrella d&#39;or1 300 Noves característiques per a Excel, Excel molt fàcil i potent:

  • Combina cel·les / files / columnes sense perdre dades.
  • Combina i consolida diverses fulles i llibres.
  • Comparar intervals, copiar diversos rangs, convertir text a data, unitat i conversió de divises.
  • Compte per colors, subtotals de paginació, classificació avançada i filtre súper,
  • Més Seleccioneu / Insereix / Suprimeix / Text / Format / Enllaç / Comentari / Llibres / Eines de full de càlcul ...

Tret de pantalla de Kutools per a Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.