Bruke Excel VBA makro opptaker for å lage et program som deler en enkelt kolonne i flere kolonner innebærer ikke mye mer enn et enkelt museklikk . Splitting flere kolonner utgjør et problem , den første kolonnen er separasjon vil overskrive teksten du vil dele i påfølgende kolonner . Av den grunn vil " TextToColumn "-funksjonen viser en feilmelding i stedet for å splitte kolonnen. Ved svimlende innholdet som skal deles på flere rader , hindrer du at dette skjer. Instruksjoner
en
Klikk på " Visual Basic" -knappen i kategorien Utvikler for å angi VBA programmering miljøet , som lar deg skrive og feilsøke VBA -programmer .
2
Klikk på "Sett inn "-kategorien er " Module" element for å skape et nytt vindu for å skrive programmer. VBA vil skape vinduet.
3
Lim inn følgende program i vinduet. Dette programmet bruker " TextToColumns "-funksjon for å splitte tekst atskilt med mellomrom . "Data Type" argument forteller den funksjonen som du vil dele teksten basert på en bestemt karakter i teksten , snarere enn basert på et fast antall tegn per kolonne . Den " Space" argumentet til funksjonen er satt til "true ", som indikerer at Excel skal dele teksten basert på " Space" karakter.
Public Sub TextToColumnsMultiple ( )
Dim col , x
For hver col I Selection.Columns
Set x = col
x.Select
Selection.TextToColumns DataType : = xlDelimited , _
TextQualifier : = xlDoubleQuote , ConsecutiveDelimiter : = Sant, Tab : = False , _
Semicolon : = False , Comma : = False , Space: = Sant, Annet : = False , TrailingMinusNumbers : = _
Ekte
Neste
End Sub
4
Klikk på " Excel "-ikonet på oppgavelinjen i Windows for å gå tilbake til Excel , og skriv en setning med minst to space- separerte ord i alle regneark celle. Skriver en annen slik setning i cellen som er en ned og en til høyre for den første cellen .
5
Klikk den første cellen for å velge den, og deretter trykk og hold Ctrl-tasten for å fortelle Excel du vil å velge mer enn én celle .
6
Klikk på " Utvikler " fanen " Visual Basic" -knappen for å vise en liste over programmer. Dobbeltklikk på " TextToColumnsMultiple " element for å kjøre dette programmet . Setningene du skrev er nå delt inn i flere kolonner , med én kolonne per ord .
