Come salvare ogni foglio come file di testo separato da una cartella di lavoro?

Quando si desidera salvare un foglio di lavoro come file di testo, è possibile utilizzare la funzione Salva con nome di Excel per salvare il foglio di lavoro come file di testo. Ma se vuoi salvare ogni foglio di una cartella di lavoro come file di testo separato, i passaggi di Salva con nome devono irritarti. Qui presento alcuni trucchi interessanti per risolvere rapidamente questo noioso lavoro in Excel.

Salva un foglio come file di testo con VBA

Salva ogni foglio di una cartella di lavoro come file di testo separato con Kutools per Excel

Esporta una selezione di fogli come file di testo con Kutools per Excel

Salva un foglio come file di testo con VBA

Se non ti piace utilizzare la funzione Salva con nome per salvare il foglio come file di testo, puoi utilizzare il codice VBA.

1. Attiva il foglio che desideri salvare come file di testo.

2. Stampa Alt + F11 tasti da visualizzare Microsoft Visual Basic, Applications Edition finestra.

3. Clic inserire > Moduli dalla finestra, quindi incolla sotto il codice VBA nel modulo.

VBA: salva il foglio come file di testo.

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 Correre pulsante per eseguire il codice, quindi nel file Kutools for Excel finestra di dialogo, selezionare una cartella in cui inserire il file di testo e specificare un nome per il file di testo. Vedi screenshot:

5. Clic Risparmi. Ora il foglio attivo viene salvato come file di testo.

Suggerimento: con VBA, puoi salvare un solo foglio alla volta come file di testo.

Salva ogni foglio di una cartella di lavoro come file di testo separato con Kutools per Excel

Se si dispone di una cartella di lavoro di grandi dimensioni con centinaia di fogli necessari per il salvataggio in file di testo separati, anche il metodo VBA richiede tempo. In questo caso, puoi provare a usare Kutools for Excel'S Cartella di lavoro divisa da gestire con questo lavoro, che ti darà una sorpresa inaspettata.

Dopo installazione gratuita Kutools per Excel, per favore fai come di seguito:

1. Abilitare la cartella di lavoro in cui si desidera salvare i fogli come file di testo indipendenti, quindi fare clic su Kutools Plus > Cartella di lavoro > Cartella di lavoro divisa. Vedi screenshot:

2. Nel Cartella di lavoro divisa finestra di dialogo, selezionare i fogli che si desidera dividere e salvare come file di testo, per impostazione predefinita, tutti i fogli sono selezionati, quindi selezionare Specifica il formato di salvataggioe selezionare Testo Unicode (*. Txt) dal basso elenco a discesa. Vedi screenshot:

3. Clic Diviso, quindi seleziona una cartella da cui inserire i file di testo Sfoglia per cartella dialogo. Vedi screenshot:

4. Clic OK. Ora ogni foglio della cartella di lavoro viene salvato come file di testo separato nella cartella selezionata.

Con Cartella di lavoro divisa of Kutools for Excel, puoi dividere una cartella di lavoro e salvarli come file xls separati, file xlsx, file PDF o file CSV, clicca qui per saperne di più su questa utility.

Clicca qui per scaricare gratuitamente Kutools per Excel

Esporta una selezione di fogli come file di testo con Kutools per Excel

Con Kutools for Excel, puoi anche esportare una selezione di un foglio come file di testo usando il suo Esporta intervallo su file.

Dopo installazione gratuita Kutools per Excel, per favore fai come di seguito:

1. Selezionare uno o più intervalli che si desidera salvare come file di testo e fare clic su Kutools Plus > Import / Export > Esporta intervallo su file. Vedi screenshot:

2. Quindi nella finestra di dialogo popping, seleziona Testo Unicode opzione sotto Formato del file sezione, quindi vai a Opzioni di testo sezione per controllare un'opzione di cui hai bisogno, quindi seleziona una posizione di salvataggio.

3. Clic Ok. Ora assegna un nome al file di testo esportato nel popping Esporta intervallo su file finestra di dialogo e fare clic su OK pulsante.

Finora la selezione è stata esportata come file di testo separato.

Ci sono più di 120 strumenti in Kutools for Excel, per installarlo e avere una prova di 60 giorni, potresti trovare molte funzioni utili impensate.