Met behulp van Excel VBA macro -recorder om een programma dat een enkele kolom splitst in meerdere kolommen te maken gaat het niet veel meer dan een enkele muisklik . Splitsen meerdere kolommen vormt een probleem ; scheiding van de eerste kolom wordt de tekst die u wilt splitsen in de daaropvolgende kolommen overschrijven . Om die reden zal de functie " TextToColumn " een foutmelding in plaats van weer te splitsen in de kolom . Door een spreiding van de inhoud worden verdeeld over meerdere rijen , dit je voorkomen . Instructies
1 Klik op de knop " Visual Basic " in het tabblad Ontwikkelaars op het VBA- programmeeromgeving , waarmee je typt en debuggen VBA -programma's in te voeren . Kopen van 2 Klik op de " Module " punt tabblad ' Invoegen ' om een nieuw venster te maken om programma's in te voeren . VBA zal het venster te maken .
3 Plak volgende programma in het venster . Dit programma gebruikt de " TextToColumns " functie tekst gescheiden door spaties verdeeld . De "Data Type " argument vertelt de functie die u wilt tekst op basis van een bepaald teken te splitsen in de tekst , in plaats van op basis van een vast aantal tekens per kolom . De " Space " argument van de functie is ingesteld op " True ", wat aangeeft dat Excel de tekst op basis van de " Space " karakter moeten splitsen . Public Sub TextToColumnsMultiple
( ) Dim col
, x
voor Elke col In Selection.Columns Set
x = col
x.Select Selection.TextToColumns
DataType : = xlDelimited , _ < br TextQualifier > : = xlDoubleQuote , ConsecutiveDelimiter : = True , Tab : = False , _ Puntkomma
: = False , Comma : = False , Space : = True , Andere : = False , TrailingMinusNumbers : = _ True Volgende End Sub
4
Klik op het pictogram " Excel " op de taakbalk van Windows terug te keren naar Excel , typ een zin met tenminste twee spaties gescheiden woorden in een werkblad cel . Typ nog een dergelijke straf in de cel dat is een beneden en een aan de rechterkant van de eerste cel .
5 Klik op de eerste cel om deze te selecteren , druk dan op en houd de Ctrl-toets om Excel te vertellen dat u wilt om meer dan een cel selecteren .
6 Klik op de knop van het tabblad "Ontwikkelaar " " Visual Basic " om een lijst met programma's weer te geven . Dubbelklik op de " TextToColumnsMultiple " punt om dat programma uit te voeren . De zinnen die u hebt getypt worden nu gesplitst in meerdere kolommen , met een kolom per woord .
|
