Utilizzando VBA macro recorder di Excel per fare un programma che divide una singola colonna in più colonne non coinvolge molto più di un semplice clic del mouse . Dividere le colonne multiple presenta un problema, separazione della prima colonna sovrascriverà il testo che si desidera dividere in colonne successive . Per questo motivo , la funzione " TextToColumn " verrà visualizzato un messaggio di errore , piuttosto che dividere la colonna. Scaglionando il contenuto da dividere su più righe , si impedisce che ciò accada . Istruzioni
1
Fare clic sul pulsante " Visual Basic " nella scheda Sviluppo per entrare nell'ambiente di programmazione VBA , che consente di digitare ed eseguire il debug di programmi VBA .
2
Clicca il voce della scheda "Inserisci ", "Modulo" per creare una nuova finestra per inserire i programmi . VBA creare la finestra .
3
Incollare il seguente programma nella finestra. Questo programma utilizza la funzione " TextToColumns " per dividere il testo separati da spazi. Il " Tipo di dati" argomento specifica la funzione che si desidera dividere il testo in base a un particolare carattere all'interno del testo , piuttosto che sulla base di un numero fisso di caratteri per colonna . L'argomento "Spazio " della funzione è impostata su "True ", il che indica che Excel dovrebbe dividere il testo in base al carattere " spazio" .
Pubblico TextToColumnsMultiple Sub ( ) per
Dim col, x
For Each Col In Selection.Columns
Set x = col
x.Select
Selection.TextToColumns Tipo dati: = xlDelimited , _ < br
TextQualifier > : = xlDoubleQuote , ConsecutiveDelimiter : = True , Tab : = False , _
Punto e virgola : = False , Comma : = False , Spazio : = True , Altro : = False , TrailingMinusNumbers : = _
vero
Avanti
End Sub
4
Fare clic sull'icona "Excel" sulla barra delle applicazioni di Windows per tornare a Excel , quindi digitare una frase con almeno due parole separate da spazi in una cella del foglio di lavoro . Digitare un altro tale frase nella cella che è uno giù e uno a destra della prima cella .
5
Fare clic sulla prima cella per selezionarla , quindi premere e tenere premuto il tasto Ctrl per dire a Excel che si desidera per selezionare più di una cella .
6
Fare clic sul pulsante " Visual Basic " del tab " Sviluppo " per visualizzare un elenco di programmi . Fare doppio clic sulla voce " TextToColumnsMultiple " per eseguire il programma . Le frasi digitate sono ora divisi in più colonne , con una colonna per ogni parola .