Thema Datum  Von Nutzer Rating
Antwort
01.08.2019 16:52:51 Till
Solved
Blau Excel VBA - Zeichenkette in gleich große Abschnitte aufteilen
01.08.2019 18:15:03 Gast22549
*****
Solved
02.08.2019 16:11:34 Till
NotSolved

Ansicht des Beitrags:
Von:
Gast22549		 Datum:
01.08.2019 18:15:03		 Views:
419		 Rating:
     
Antwort:
 Nein
Thema:
Excel VBA - Zeichenkette in gleich große Abschnitte aufteilen 
Sub Test()

   'Wert aus Zelle A1 rechts von splitten
   DoitRight Range("A1"), 5

   'String ab Zelle A2 nach rechts von splitten
   DoSplit "ABCDEFGHIJKLMNOPQRSTUFWXY12345678", Range("A2"), 5
   
End Sub

Private Sub DoSplit(Txt As String, Start As Range, Stp As Integer)
Dim x As Integer, z As Long

   For x = 1 To Len(Txt) Step Stp
      Start.Offset(, z).Value = Mid(Txt, x, Stp)
      z = z + 1
   Next x

End Sub

Private Sub DoitRight(Start As Range, Stp As Integer)
Dim x As Integer, z As Long

   For x = 1 To Len(Start.Value) Step Stp
      z = z + 1
      Start.Offset(, z).Value = Mid(Start.Value, x, Stp)
   Next x

End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
01.08.2019 16:52:51 Till
Solved
Blau Excel VBA - Zeichenkette in gleich große Abschnitte aufteilen
01.08.2019 18:15:03 Gast22549
*****
Solved
02.08.2019 16:11:34 Till
NotSolved