Pat si chiedeva come cambiare il tipo di dati di colonna predefinito da “generale” a “testo” per tutte le colonne di un file di testo delimitato da virgole. Modificare il formato di ogni colonna, soprattutto quando ce ne sono molte, può essere noioso nella migliore delle ipotesi.

Sfortunatamente, non è possibile modificare l’impostazione predefinita. Tuttavia, la modifica dei tipi di dati delle colonne può essere eseguita molto più facilmente applicando un po ‘delle funzioni “seleziona e scegli” disponibili nella maggior parte dei programmi Windows. Segui questi passaggi:

  1. Inizia a importare il tuo file di testo delimitato da virgole come faresti normalmente.

  2. Quando viene visualizzata la finestra di dialogo che consente di modificare i tipi di dati della colonna, selezionare la prima colonna nella tabella.

  3. Scorri verso destra nella finestra di dialogo in modo che l’ultima colonna della tabella sia visibile.

  4. Tieni premuto il tasto Maiusc mentre fai clic sull’ultima colonna. Ora tutte le colonne dovrebbero essere selezionate.

  5. Cambia il tipo di dati in Testo.

  6. Continua con l’importazione, come al solito.

Se preferisci un modo ancora più veloce per inserire le informazioni dal file di testo delimitato da virgole, puoi farlo utilizzando una macro, saltando così completamente i filtri di importazione di Excel. La seguente macro, intitolata (in modo abbastanza appropriato) Import, farà il trucco:

Sub Import()

Open "d:\data.txt" For Input As #1     R = 1     While Not EOF(1) 'Scan file line by line         C = 1         Entry = ""

Line Input #1, Buffer         Length = Len(Buffer)

i = 1         While i <= Length 'split string into cells             If (Mid(Buffer, i, 1)) = "," Then                 With Application.Cells(R, C)

.NumberFormat = "@" 'Text formatting                     .Value = Entry                 End With                 C = C + 1                 Entry = ""

Else                 Entry = Entry + Mid(Buffer, i, 1)

End If             i = i + 1         Wend         If Len(Entry) > 0 Then             With Application.Cells(R, C)

.NumberFormat = "@" 'Text formatting                 .Value = Entry             End With         End If         R = R + 1     Wend     Close #1 End Sub

Notare che è possibile modificare la prima riga della macro per rappresentare il nome del file che si sta importando. Dovresti anche capire che questa macro funziona sul più semplice dei file di testo delimitati da virgole. Se il file è stato creato con virgolette attorno a ciascun campo (come talvolta accade), la macro non darà i risultati desiderati e dovrebbe essere modificata per compensare le virgolette. Oppure, in alternativa, puoi semplicemente utilizzare la ricerca e rimuovere le virgolette dopo che la macro ha importato le informazioni.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (7889) si applica a Microsoft Excel 2007, 2010, 2013 e 2016.

Puoi trovare una versione di questo suggerimento per la vecchia interfaccia del menu di Excel qui:

Faster Text File Conversions.