splitsen in een spatie

  • Onderwerp starter Onderwerp starter Yfke
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.

Yfke

Gebruiker
Lid geworden
16 apr 2007
Berichten
19
Hallo

Ik heb mijn tekst gesplits met de left functie. Is het nu ook mogelijk deze te laten zoeken naar een spatie om te splitsen. Nu wordt soms mijn woord gesplitst. Ik heb op dit moment gewoon om mijn aantal karakters gesplitst.

groeten
 
Yfke,

Ik zou in eerste instantie zeggen, loop de string door om de positie van de spatie te bepalen en zonder dat gedeelte af met behulp van de functie Mid.

Heb je misschien een voorbeeldje wat je precies bedoelt.
 
ik kan ni echt een vb geven omdat het allemaal uit een array komt en ik verder ga tekenen in AutoCad. Maat het zit zo. ik tot 26 karakter tekenen en dan moet ik naar de volgende regel gaan. Dat lukt allemaal heel goed. Op dit moment is het probleem dat ik mijn woord gewoon ga splitsen maar dit zou niet mogen.

Hoe kan ik die gaan doorlopen??
die waarden zitten allemaal in een array.

groeten

Yf
 
Bedankt voor de inlichtingen.

Ik heb het juist gevonden

Groeten

Yf
 
Yfke,

Dat is hartstikke mooi, maar ik ben nu wel nieuwsgierig naar de oplossing, misschien wil je dat delen met mij en anderen "ter leering ende vermaeck"?:D

Jofred
 
Waarschijnlijk zo:

Code:
Public Function aap()

    Const cTekst  As String = "Aap Noot Mies Wim Zus Jet"
    Dim Arr()     As String
    Dim intMax    As Integer
    Dim intTeller As Integer
    
    Arr = Split(cTekst) 'Default delimiter is een spatie

    intMax = UBound(Arr, 1)
    Debug.Print "Aantal elementen : " & intMax
    Debug.Print "Elementen"
    
    For intTeller = 0 To intMax - 1
        Debug.Print "Element: " & intTeller & " - " & Arr(intTeller)
    Next intTeller
    
    
End Function
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan