| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Sådan bruges tekst til kolonne på Flere kolonner i VBA
    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 .

    Forrige :

    næste :
      Relaterede artikler
    ·Sådan oprettes en Option Box i Visual Basic 
    ·Hvordan man laver et logonscript 
    ·VBA String Methods 
    ·Sådan tilføjes et datasæt til en formular i Vb.Net 
    ·. Sådan Lær Visual Studio NET 
    ·Sådan kapitalisere et fornavn i VB 2008 
    ·Sådan bruges en SWF i VB MDI formular 
    ·Sådan bruges XML i VB6 
    ·Sådan bruges Tooltips i VB 
    ·Sådan oprettes Exe Program Files i Visual Studio 2008 …
      Anbefalede Artikler
    ·Algebraiske datatyper 
    ·Sådan ændre baggrundsbilledet på rollover 
    ·Sådan oprettes en kalender i PHP 
    ·Sådan tilføjes knapper til en Java-applet 
    ·Sådan Konverter en VB6 projekt til EXE 
    ·Er Joomla bruger en masse RAM 
    ·Sådan Format metode returnerer med kommaer i Java 
    ·Hvordan man laver et ur i Python 
    ·Hvordan til at opsige et program i Code i Visual Basic 
    ·Hvordan til at erklære en statisk variabel i C 
    Copyright © Computer Viden http://www.computerdk.com