Thema Datum  Von Nutzer Rating
Antwort
Rot Zahl splitten und ausgeben
 19.05.2015 20:46:31 Dralle
NotSolved
19.05.2015 23:40:33 Gast12629
NotSolved
20.05.2015 07:30:19 Dralle
NotSolved
20.05.2015 18:44:22 Gast7196
NotSolved

Ansicht des Beitrags:
Von:
Dralle		 Datum:
19.05.2015 20:46:31		 Views:
1183		 Rating:
     
Antwort:
  Ja
Thema:
Zahl splitten und ausgeben

Moin Leute,

ich versuche eine beliebig lange Zahl aufzusplitten und in verschiedene Zellen zu schreiben.

Meine Idee bei dem Quellcode war:


Private Sub TextBox1_Change()
Dim Zahl As String
Dim Zahllänge As String

Zahl = TextBox1
Zahllänge = Len(Zahl)

Tabelle2.Range("G5") = TextBox1

Tabelle2.Range("B4") = Mid(Zahl, Zahllänge)
Tabelle2.Range("B5") = Mid(Zahl, Zahllänge - 1, 1)
Tabelle2.Range("B6") = Mid(Zahl, Zahllänge - 2, 1)
Tabelle2.Range("B7") = Mid(Zahl, Zahllänge - 3, 1)
Tabelle2.Range("B8") = Mid(Zahl, Zahllänge - 4, 1)

End Sub

 

Leider klappt es nur nicht! Jemand eine Idee??

 

 

 

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
Rot Zahl splitten und ausgeben
 19.05.2015 20:46:31 Dralle
NotSolved
19.05.2015 23:40:33 Gast12629
NotSolved
20.05.2015 07:30:19 Dralle
NotSolved
20.05.2015 18:44:22 Gast7196
NotSolved