Zeichen aus string löschen

  • Excel

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von Manü.

    Zeichen aus string löschen

    Ahoi,

    ich habe komischer weise das Problem dass ich immer das erste Zeichen aus einem String raushaben will.
    nachdem was ich im web gefunden habe und meiner (mittlerweile leider etwas Veralteten) Kenntnisse sollte das aber funktionieren.

    Visual Basic-Quellcode

    1. Dim FCell, LCell, CutFCell(3), CutLCell(3) As String
    2. For i = 0 To 2 Step 1
    3. If FCell <> "" Then
    4. CutFCell(i) = Left$(FCell, 1)
    5. FCellIndex = FCellIndex + 1
    6. End If
    7. Next


    Der String soll halt je nach Größe in einzelne Zeichen geteilt werden

    schonmal danke im Vorraus
    Grüße Manu

    Was Gott dem Menschen erspart hat, kann der Computer.
    Billy ©, (*1932), Schweizer Aphoristiker
    Quelle: www.Aphorismen.de

    Visual Basic-Quellcode

    1. Dim FCell, LCell, CutFCell(3), CutLCell(3) As String
    2. For i = 0 To 2 Step 1
    3. If FCell <> "" Then
    4. CutFCell(i) = Left$(FCell, 1)
    5. FCellIndex = FCellIndex + 1
    6. End If
    7. Next


    ich dachte eigentlich das es aus dem code ersichtlig ist was ich meine
    in FCell stehen halt ein oder mehrere Buchstaben (excel spaltenbezeichnung) die muss ich jetzt teilen und da
    es entweder nur ein Buchstabe ist sollte die schleife auch nur einmal durchlaufen werden, das passiert aber nur
    wenn FCell um das eine Zeichen verkürzt wird wenn das zeichen in das neue Array geschrieben wird.

    ... mit der Mid Funktion bleibt das Zeichen auch weiterhin im alten String erhalten


    EDIT: Naja es will nicht funktionieren also lass ich es es geht auch so

    Visual Basic-Quellcode

    1. For i = 0 To 1 Step 1
    2. CutFCell(i) = Mid(FCell, i + 1, 1)
    3. Next


    wenn ich so nur ein Zeichen im alten string habe dann ist der zweite Arrayeintrag eben NULL so geht das auch

    danke für die antwort
    Grüße Manu

    Was Gott dem Menschen erspart hat, kann der Computer.
    Billy ©, (*1932), Schweizer Aphoristiker
    Quelle: www.Aphorismen.de

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Manü“ ()