Nwlapcug.com


Come utilizzare la colonna di testo su più colonne in VBA

Utilizzando il registratore delle macro VBA di Excel per rendere un programma che divide una singola colonna in più colonne comporta non molto di più di un semplice clic del mouse. Spaccare più colonne presenta un problema; separazione della prima colonna sovrascriverà il testo che si desidera dividere in colonne successive. Per questo motivo, la funzione di "TextToColumn" sarà visualizzato un messaggio di errore, piuttosto che dividere la colonna. Scaglionando il contenuto per essere suddiviso su più righe, impedire che ciò accada.

Istruzioni

1

Fare clic sul pulsante "Visual Basic" nella scheda Developer per inserire l'ambiente di programmazione VBA, che permette di digitare e debug di programmi VBA.

2

Fare clic sulla voce "Modulo" della scheda "Inserisci" per creare una nuova finestra per inserire programmi. VBA creerà la finestra.

3

Incollare il seguente programma nella finestra. Questo programma utilizza la funzione "TextToColumns" per suddividere il testo separato da spazi. L'argomento "Tipo di dati" indica alla funzione che si desidera dividere il testo basato su un particolare carattere all'interno del testo, piuttosto che basato su un numero fisso di caratteri per colonna. L'argomento "Spazio" della funzione è impostato su "True", che indica che Excel dovrebbe suddividere il testo sulla base del carattere "Spazio".

Public Sub TextToColumnsMultiple()

Dim col, x

Per ogni colle In Selection

Insieme x = col

x.Select

Tipo di dati Selection.TextToColumns: = xlDelimited, _

TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _

Semicolon:=False, Comma:=False, Space:=True, Other:=False, TrailingMinusNumbers:= _

True

Successivo

End Sub

4

Fare clic sull'icona "Excel" sulla barra delle applicazioni Windows per tornare a Excel, quindi digitare una frase con almeno due parole separate da spazi in qualsiasi cella del foglio di lavoro. Digitare un altro tale frase nella cella che è una discesa e uno a destra della prima cella.

5

Fare clic sulla prima cella per selezionarla, quindi premere e tenere premuto il tasto Ctrl per indicare a Excel per selezionare più celle.

6

Fare clic sul pulsante "Visual Basic" della scheda "Developer" per visualizzare un elenco di programmi. Fare doppio clic sull'elemento "TextToColumnsMultiple" per eseguire il programma. Le frasi digitate sono suddivise in più colonne, con una colonna per ogni parola.