formule voor namen splitsen

[sjonnie1974]

hallo,

in 1 cel staat de tekst

;aap;noot;mies;vuur;pim

nu wil ik alle woorden zonder ; in een aparte cel hebben staan.

iemand de juiste formule voor mij?

alvast dank

 

[keesbl]

Kijk eens bij: tekst naar kolommen

Kees

 

[sjonnie1974]

dat is toch geen formule?

 

[keesbl]

Dat klopt, maar die doet wel wat je wilt, als ik je vraag goed begrepen heb.

 

[sjonnie1974]

Dan heb je mijn vraag niet goed begrepen, want daarin staat wie de formule weet

Ik wist van het bestaan van tekst naar kolommen, maar die wil ik nu net niet gebruiken.

Hopelijk weet je de juiste formule voor me

 

[edmoor]

Dat gaat niet met een formule omdat je met een formule alleen de cel waar de formule in staat een waarde kunt geven. Het zou wel kunnen met een macro achter een knopje of zo.
Deze bijvoorbeeld:

Sub Verdeel()
    Dim Waarden() As String
    Waarden = Split([A1], ";")
    For i = 1 To UBound(Waarden)
        Range("A1").Offset(i - 1, 0) = Waarden(i)
    Next i
End Sub

 

[sjonnie1974]

MAar er moet toch een methode zijn. het mogen ook 30 formules zijn. eerste formule pakt de tekst tussen ; 1 en 2, de 2e formule pakt tekst tussen ; 2 en 3 en zo verder. *SIP KIJK*

 

[edmoor]

Maar hoe weet de formule dan of hij de eerste, tweede of derde is?

 

[sjonnie1974]

oplossing gevonden

Hoi,

Een beetje verder gezocht op google en vond vanuit 2008 DE perfecte oplossing.
Formule bekeken zou ik die zelf ook nog wel hebben kunnen maken NOT

Perfekt, dus ik zet de case als opgelost!

thnx allemaal voor het meedenken/puzzelen

Bekijk bijlage zoek tekst tussen tekst.xls

 

[edmoor]

Iets anders dan ik uit je initiële vraag begreep, maar goed gedaan :thumb:

 

[VenA]

@edmoor, het blijft altijd jammer van de tijd bij zulke vragenstellers.

@sjonnie1974, Beetje jammer dat je de vraag verkeerd gesteld hebt? Zelf had ik zoiets in gedachte. En dit is ook jouw vraag!

 

[sjonnie1974]

Hallo VenA,

Beetje jammer van je reactie, maar toch ook bedankt voor je moeite.

 

[sylvester-ponte]

of zonder hulp kolommen met een zelf gemaakte formule in vba: