Brug Excels VBA-makro optageren til lave et program , der deler en enkelt kolonne i flere spalter involverer ikke meget mere end et enkelt museklik . Opdeling flere kolonner udgør et problem , den første kolonnes adskillelse vil overskrive den tekst, du vil opdele i efterfølgende kolonner. Derfor vil " TextToColumn "-funktionen vise en fejlmeddelelse i stedet splitte kolonnen. Ved at forskyde indhold, der skal deles på flere rækker , forhindre dig at dette sker . Instruktioner
1
Klik på " Visual Basic " knappen i fanen Udvikler for at indtaste VBA programmering miljø , som lader dig skrive og debugge VBA -programmer.
2
Klik "Indsæt " fanen er " Module" element for at oprette et nyt vindue for at komme ind programmer. VBA vil skabe vinduet.
3
Indsæt følgende program i vinduet. Dette program bruger " TextToColumns "-funktionen til at opdele tekst adskilt af mellemrum. Den " Datatype " argument fortæller den funktion, du vil opdele tekst baseret på en bestemt karakter i teksten , snarere end baseret på et fast antal tegn pr kolonne. Den " Space " argument for funktionen er indstillet til " Sand ", der angiver, at Excel skal dele teksten baseret på " Space " tegn.
Public Sub TextToColumnsMultiple ()
Dim col , x
For Each col I Selection.Columns
Set x = col
x.Select
Selection.TextToColumns DataType : = xlDelimited , _ < br >
TextQualifier : = xlDoubleQuote , ConsecutiveDelimiter : = Sand , Tab : = False , _
Semikolon : = False , Comma : = False , Space : = Sand , Andet : = False , TrailingMinusNumbers : = _
Ægte
Næste
End Sub
4
Klik på " Excel " ikonet på Windows-proceslinjen for at vende tilbage til Excel, og skriv derefter en sætning med mindst to rum- adskilte ord i enhver regneark celle. Skriv en anden sådan sætning i den celle, der er en ned og en til højre for den første celle .
5.
Klik på den første celle for at markere den , og derefter trykke på og holde Ctrl-tasten nede for at fortælle Excel , du ønsker at vælge mere end én celle.
6
Klik på " Udvikler "-fanen er " Visual Basic " for at vise en liste over programmer . Dobbeltklik på " TextToColumnsMultiple " element for at køre dette program . Sætningerne du har skrevet er nu opdelt i flere kolonner med en kolonne per ord .