Note: The other languages of the website are Google-translated. Back to English
English English
  • Documenti
  • Excel
  • Come esportare i dati Excel (selezione o fogli) in file di testo in Excel?

Come esportare i dati Excel (selezione o fogli) in file di testo in Excel?

Se è necessario fornire una cartella di lavoro nel formato di file di testo, è necessario convertire la cartella di lavoro in file di testo. E questo articolo ti introdurrà due metodi per esportare facilmente i dati di Excel in file di testo.

Esporta un singolo foglio in un file di testo in Excel

Per impostazione predefinita, i dati di Excel verranno salvati come cartelle di lavoro nel formato . Xlsx. Tuttavia, possiamo esportare un foglio di lavoro della cartella di lavoro esistente come file di testo con l'estensione Salva con nome caratteristica. Si prega di fare quanto segue:

1. Passa al foglio di lavoro che esporterai in un file di testo e fai clic Compila il (o Pulsante di ufficio)> Salva con nome.

2. In apertura Salva con nome finestra di dialogo, selezionare la cartella di destinazione in cui salvare il file di testo esportato, assegnare un nome al file in Nome del file casella, quindi seleziona il file Testo Unicode (* .txt) dal file Salva come tipo menu `A tendina. Vedi screenshot:
esportare in un file di testo con la funzione Salva con nome

3. Quindi appariranno due finestre di dialogo di avviso che chiedono di esportare solo il foglio di lavoro attivo come file di testo e di tralasciare eventuali funzionalità incompatibili con il file di testo. Clic OK pulsante e successivamente.

Quindi i dati nel foglio di lavoro attivo vengono esportati come nuovo file di testo.

Note:: il Salva con nome Il comando è in grado di esportare solo i dati del foglio di lavoro attivo come file di testo. Se si desidera esportare tutti i dati dell'intera cartella di lavoro, è necessario salvare singolarmente ogni foglio di lavoro come file di testo.


Esporta la selezione (o una colonna) in un file di testo con VBA

Il seguente codice VBA può anche aiutarti a esportare i dati dell'intervallo selezionato (ad esempio una colonna) nel file di testo, per favore fai come segue:

1. Tenere premuto il tasto ALT + F11 chiavi e apre il file Microsoft Visual Basic, Applications Edition finestra.

2. Clicchi inserire > Moduloe incolla il codice seguente nella finestra del modulo.

VBA: esporta la selezione o l'intero foglio di lavoro in un file di testo

Sub ExportRangetoFile()
'Update 20130913
Dim wb As Workbook
Dim saveFile As String
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set wb = Application.Workbooks.Add
WorkRng.Copy
wb.Worksheets(1).Paste
saveFile = Application.GetSaveAsFilename(fileFilter:="Text Files (*.txt), *.txt")
wb.SaveAs Filename:=saveFile, FileFormat:=xlText, CreateBackup:=False
wb.Close
Application.CutCopyMode = False
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. Quindi premere F5 chiave per eseguire questo codice. Quindi seleziona l'intervallo di dati che desideri esportare nella finestra di dialogo che si apre e fai clic su OK pulsante, vedi screenshot:
Seleziona una colonna da esportare come file di testo

4. E ora in un'altra finestra di dialogo Salva con nome, specificare un nome per questo file di testo e una cartella in cui inserire questo file e fare clic su Risparmi pulsante.


Esporta la selezione (o una colonna) in un file di testo con Kutools per Excel

Lo Salva con nome Il comando può esportare tutti i dati nel foglio di lavoro attivo come testo. Cosa succede se si esportano tutti i dati di fogli di lavoro inattivi specificati o parte dei dati in un foglio di lavoro come file di testo? Kutools per Excel's Esporta intervallo su file l'utility può aiutarci a esportare e salvare facilmente i dati nella selezione come file di testo.  

Kutools for Excel - Include più di

300
strumenti utili per Excel. Prova gratuita di tutte le funzionalità
30
-day, nessuna carta di credito richiesta! Prova gratuita ora!

1. Seleziona il rang che esporterai in un file di testo (nel nostro caso, selezioniamo la colonna A) e fai clic Kutools Plus > Importa / Esporta > Esporta intervallo su file, vedi screenshot:
Componente aggiuntivo di Excel: esporta la selezione in un file di testo

2. Nell' Esporta intervallo su file finestra di dialogo, fai come mostrato nell'immagine sottostante:
Componente aggiuntivo di Excel: esporta la selezione in un file di testo
(1) Controllare il file Testo Unicode opzione nel Formato del file sezione;
(2) Seleziona l'opzione Salva i valori effettivi o Salva i valori come mostrato sullo schermo opzione di cui hai bisogno nella sezione Opzioni di testo;
(3) Specificare la cartella di destinazione in cui salvare il file di testo esportato;
(4) Fare clic su Ok pulsante.

3. Assegnare un nome al file di testo esportato nella nuova finestra di dialogo di apertura e fare clic su Ok pulsante.
denominare il file di testo esportato

E poi la selezione (selezionata Colonna A) è stata esportata come file di testo e salvata nella cartella specificata.

Kutools for Excel - Include più di

300
strumenti utili per Excel. Prova gratuita di tutte le funzionalità
30
-day, nessuna carta di credito richiesta! Get It Now


Esporta più fogli per separare file di testo in Excel

A volte potrebbe essere necessario esportare più fogli di lavoro in più file di testo in Excel. La funzione Salva con nome potrebbe essere un po 'noiosa! Non preoccuparti! Kutools per Excel Cartella di lavoro divisa L'utilità fornisce agli utenti di Excel una soluzione alternativa semplice per esportare più fogli di lavoro in molti file di testo separati con diversi clic. 

Kutools for Excel - Include più di

300
strumenti utili per Excel. Prova gratuita di tutte le funzionalità
30
-day, nessuna carta di credito richiesta! Prova gratuita ora!
1. Clic Kutools Plus > Cartella di lavoroCartella di lavoro divisa. Vedi screenshot:
Componente aggiuntivo di Excel: esporta più fogli in file di testo

2. Nella finestra di dialogo di apertura della cartella di lavoro divisa, eseguire le seguenti operazioni:
Componente aggiuntivo di Excel: esporta più fogli in file di testo
(1) Controlla i fogli di lavoro che esporterai in file di testo separati nel file Nome cartella di lavoro sezione;
(2) Controllare il file Specifica il formato di salvataggio opzione, quindi selezionare il Testo Unicode (* .txt) dal basso elenco a discesa, vedi screenshot a sinistra:
(3) Fare clic su Diviso pulsante.

3. Quindi, nella finestra di dialogo Sfoglia per cartelle, selezionare la cartella di destinazione in cui salvare i file di testo esportati e fare clic sul pulsante OK pulsante.

Finora ogni foglio di lavoro specificato è stato esportato come file di testo separato e salvato nella cartella specificata.

Kutools for Excel - Include più di

300
strumenti utili per Excel. Prova gratuita di tutte le funzionalità
30
-day, nessuna carta di credito richiesta! Get It Now

Salva facilmente in massa ogni foglio come file PDF / testo / csv separato o cartella di lavoro in Excel

Normalmente possiamo salvare il foglio di lavoro attivo come file .pdf separato, file .txt o file .csv con la funzione Salva con nome. Ma Kutools per Excel Cartella di lavoro divisa l'utility può aiutarti a salvare facilmente ogni cartella di lavoro come file PDF / TESTO / CSV separato o cartella di lavoro in Excel.


cartella di lavoro ad split pdf 1

Kutools for Excel - Include più di

300
strumenti utili per Excel. Prova gratuita di tutte le funzionalità
30
-day, nessuna carta di credito richiesta! Get It Now


Demo: esporta i dati Excel (selezione o fogli) in file di testo in Excel


Kutools for Excel include più di 300 utili strumenti per Excel, da provare gratuitamente senza limitazioni in 30 giorni. Scarica e prova gratuita ora!

Articoli Correlati:


I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività di
80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di
    300
    potenti caratteristiche
    . Supporta Office/Excel
    2007-2019 e 365
    . Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete
    30
    prova gratuita di un giorno. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la tua produttività di
    50%
    e riduce centinaia di clic del mouse per te ogni giorno!
fondo officetab
Commenti (19)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
è davvero molto utile, grazie :D
Questo commento è stato fatto dal moderatore sul sito
è necessario incollare i dati da Excel a un blocco note e quindi separare i dati utilizzando una virgola. Come faccio a fare questo
Questo commento è stato fatto dal moderatore sul sito
devi selezionare "salva come file .csv" (valori separati da virgola)
Questo commento è stato fatto dal moderatore sul sito
ho un problema dopo aver salvato il mio .xls in .txt, la dimensione del file diventa più grande, da 500kb a 1,523kb come lo risolvo? Grazie
Questo commento è stato fatto dal moderatore sul sito
Ciao! Le celle che voglio esportare come file di testo si riferiscono ad altre celle e contengono codici if. Ciò significa che quando esporto non ottengo i valori numerici, ma "N/A". Sai come posso risolvere questo problema? Grazie.
Questo commento è stato fatto dal moderatore sul sito
Qualcuno sa come farlo per excel 2016 MAC?? ty
Questo commento è stato fatto dal moderatore sul sito
Uno dei migliori siti dove trovo le mie domande.
Questo commento è stato fatto dal moderatore sul sito
La mia domanda è come menzionata di seguito: ho un rapporto da generare ogni giorno. I dati che ottengo sulla riga finale (solo una riga ma più di una colonna) voglio che vengano esportati in un altro foglio excel che è un foglio excel sommario salvato separatamente sul mio desktop. Ad esempio: Report Day1 - esportazione della riga finale in Riepilogo foglio excel riga1 Report Day2 - esportazione riga finale in Riepilogo foglio excel riga2 Report Day3 - esportazione riga finale in Riepilogo foglio excel riga3 e così via. L'esportazione deve essere eseguita tramite un clic pulsante., il che significa che quando faccio clic sul pulsante di esportazione i dati sul foglio che ho calcolato oggi dovrebbero andare e salvare nella riga del foglio excel di riepilogo 1, il giorno successivo un nuovo report del foglio excel calcolato dovrebbe andare e salvare nella riga del foglio excel di riepilogo 2 e così via.. Sarà possibile farlo... Se sì, per favore qualcuno mi aiuti su questo... Grazie in anticipo...:-)
Questo commento è stato fatto dal moderatore sul sito
1/2 (poiché il tuo software limita la lunghezza dei commenti) Sono un programmatore serio e voglio informarti che il codice VBA qui è eccezionale. È pulito, e non una riga di troppo, o una riga di troppo. È una codifica esemplare per la dimostrazione del processo. Citerò anche che, poiché ho studiato a fondo le soluzioni per l'esportazione della selezione, tu e solo un'altra persona avete suggerito di eliminare l'intervallo in una nuova cartella di lavoro temporanea. Tutte le altre risposte erano dolorosamente manuali, camminando cella per cella. Anche il codice di Chip è molto più lungo e funziona più lentamente (ma intenzionalmente, poiché è molto più flessibile - delimitatori specificabili, ecc.). caduto direttamente in un'applicazione molto intricata e specializzata. Alcuni di questi ritocchi sono qualcosa che sono sicuro che farai in pratica, ma aggiungono righe di codice (ad esempio il controllo degli errori), quindi mostrarli su questa pagina web avrebbe confuso il tuo display in modo che gli elementi essenziali dell'elaborazione sarebbero stati ingombranti per i lettori da seguire. Comunque: (vedi parte 2)
Questo commento è stato fatto dal moderatore sul sito
2/2 - vbYesNoCancel msgboxes and Booleans per indicare se esportare tutto, la selezione o un intervallo specificato dall'utente - una stringa statica per l'indirizzo dell'intervallo precedente - se len(quello statico)1 allora ho impostato WorkRng=activesheet.UsedRange (è possibile non copiare più aree con una singola copia, anche se con un po' di lavoro potresti percorrere le aree e copiarle in modo frammentario.) - Microsoft idiota non salva le righe vuote all'inizio e alla fine dell'intervallo salvato e non salva disattivare le colonne vuote all'estrema sinistra e all'estrema destra dell'intervallo salvato. Quando lo rilevo (UsedRange non è la riga 1, col. 1 o xlLastCell non è completamente in basso a destra) msgbox per chiedere all'utente se desidera collegare A1 o la cella in basso a destra. - Quindi ho deciso di affrontare preventivamente il problema in alto a sinistra inserendo una riga e impostando A1 come testo come "Quello che segue è per l'intervallo" - Chiudo con activeworkbook.close SaveChanges:=False - Abitudine da molto tempo poiché sono arrabbiato sostenitore della pulizia (e il mondo è un posto triste grazie a programmatori irresponsabili che si sottraggono a quella responsabilità quando conta), ho impostato WorkRng = Niente in arrivo :)
Questo commento è stato fatto dal moderatore sul sito
3/2 Potresti anche notare che non è necessario specificare il prefisso wb una volta che hai aggiunto la cartella di lavoro poiché diventa attiva. Specificare wb potrebbe essere più efficiente o meno, ma può essere omesso da alcuni comandi. In realtà ho scartato completamente la variabile wb; Vado semplicemente Workbooks.Add e uso ActiveWorkbook quando necessario. (Dato che stai sopprimendo ScreenUpdating, non sarebbe ovvio per alcuni che wb sia attivo. Suggerimento per i principianti (e superiori): sviluppo sempre con ScreenUpdating e DisplayAlerts come True e, una volta terminato lo sviluppo, considero di disattivarli per qualche passaggio di codice.)
Questo commento è stato fatto dal moderatore sul sito
Grazie per il fantastico pezzo di codice VBA per esportare i dati in un file di testo. Ho usato il tuo codice con alcuni dei miei. I dati con cui ho a che fare sono estremamente specifici per la lunghezza della riga e dopo l'esecuzione della macro, il file di testo contiene alcune virgolette doppie "in punti casuali, che non erano mai state presenti nei miei dati prima. Ho provato ad aggiungere una riga di codice da rimuovere questo personaggio in varie fasi ma non sembra funzionare.Sono consapevole che posso rimuoverlo manualmente ma vorrei risolverlo nel codice VBA.

Sub Macro3 ()
Dim wb come cartella di lavoro
Dim saveFile As String
Dim WorkRng come intervallo
On Error Resume Next
Selezione.Filtro automatico
ActiveSheet.Range("$A$1:$B$10591").Campo filtro automatico:=1, Criteri1:= _
"=NSZAP*", Operatore:=xlAnd
Intervallo ("A1").Seleziona
ActiveCell.Offset(200, 0).Range("A1").Seleziona
Intervallo (Selezione, Selezione.End (xlDown)). Seleziona
ActiveCell.Rows("1:10101").EntireRow.Select
Selezione.Elimina Maiusc:=xlSu
Intervallo ("A1").Seleziona
Selezione.Filtro automatico
Intervallo (Selezione, Selezione.End (xlDown)). Seleziona
Imposta WorkRng = Selezione.Applicazione
Imposta wb = Application.Workbooks.Add
WorkRng.Copy
wb.Fogli di lavoro(1).Incolla
Selection.Replace What:="""", Replacement:="", LookAt:=xlPart, _
Ordine di ricerca:=xlByRows, MatchCase:=Falso, Formato di ricerca:=Falso, _
SostituisciFormato:=Falso
saveFile = Application.GetSaveAsFilename(fileFilter:="File di testo (*.txt), *.txt")
Selection.Replace What:="""", Replacement:="", LookAt:=xlPart, _
Ordine di ricerca:=xlByRows, MatchCase:=Falso, Formato di ricerca:=Falso, _
SostituisciFormato:=Falso
wb.SaveAs Nome file:=saveFile, FileFormat:=xlText, CreateBackup:=False
Selection.Replace What:="""", Replacement:="", LookAt:=xlPart, _
Ordine di ricerca:=xlByRows, MatchCase:=Falso, Formato di ricerca:=Falso, _
SostituisciFormato:=Falso
wb.Chiudi
Application.CutCopyMode = False
Application.DisplayAlerts = Vero
Application.ScreenUpdating = True
End Sub
Questo commento è stato fatto dal moderatore sul sito
Ciao Harish,
Per rimuovere in blocco un carattere specificato, puoi sostituire il carattere con niente.
Ctrl + H per aprire la finestra di dialogo Trova e sostituisci, digitare il carattere specificato nella casella Trova e digitare note nella casella Sostituisci con.
Questo commento è stato fatto dal moderatore sul sito
CIAO
GRAZIE PER IL TUO CODICE VBA
A VOLTE SU CERTI TESTI C'È "TESTO" IN EXPORT .TXT
GRAZIE PER IL PERCHÉ
Questo commento è stato fatto dal moderatore sul sito
ciao ragazzi, ho usato quel codice:
Sub ExportRangetoFile()
'Aggiornamento 20130913
Dim wb come cartella di lavoro
Dim saveFile As String
Dim WorkRng come intervallo
On Error Resume Next
xTitleId = "KtoolsforExcel"
Imposta WorkRng = Selezione.Applicazione
Imposta WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Tipo:=8)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Imposta wb = Application.Workbooks.Add
WorkRng.Copy
wb.Fogli di lavoro(1).Incolla
saveFile = Application.GetSaveAsFilename(fileFilter:="File di testo (*.txt), *.txt")
wb.SaveAs Nome file:=saveFile, FileFormat:=xlText, CreateBackup:=False
wb.Chiudi
Application.CutCopyMode = False
Application.DisplayAlerts = Vero
Application.ScreenUpdating = True
End Sub

e ho funzionato, ma ho bisogno di salvare una colonna con celle che contengono la funzione "concatena", e quando riproduco il codice vba e salvo il file .TXT, solo quello che appare è #REF. come posso rimediare? perché ho bisogno dei dati che appaiono su quelle celle?
Questo commento è stato fatto dal moderatore sul sito
Qualcuno è riuscito a capirlo? Sto avendo lo stesso problema.
Questo commento è stato fatto dal moderatore sul sito
Ciao, questo codice è molto utile per me. Quindi grazie mille.
Voglio chiederlo: quando utilizzo questo codice, una nuova riga viene aggiunta automaticamente alla fine del contenuto del txt.
Potete aiutarmi a prevenire questo da vba?
Questo commento è stato fatto dal moderatore sul sito
Ciao, è fantastico, grazie mille.
Come potrei modificare il codice per Esporta selezione (o una colonna) in un file di testo con VBA per riempire automaticamente il nome del file con il contenuto della cella B2?
Questo commento è stato fatto dal moderatore sul sito
Come posso modificare il codice per Esporta selezione (o una colonna) in un file di testo con VBA per riempire automaticamente il nome del file con il contenuto della cella B2?
Grazie
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL