Thema Datum  Von Nutzer Rating
Antwort
20.12.2006 14:51:22 Freysein
NotSolved
20.12.2006 21:59:40 Stef_113
NotSolved
21.12.2006 10:11:53 Freysein
NotSolved
Blau Aw:gleiche Zahlen in einer Zelle zählen
 21.12.2006 19:36:50 Stef_113
NotSolved

Ansicht des Beitrags:
Von:
Stef_113		 Datum:
21.12.2006 19:36:50		 Views:
2038		 Rating:
     
Antwort:
  Ja
Thema:
Aw:gleiche Zahlen in einer Zelle zählen
Hi Forian,

ich hab mal erstmal eine primitive funktion vorbereitet, die andere funktioniert noch nicht so ganz.
Diese ließt jedes zweite Zeichen ein und gibt es aus.

Stefan

----------------------------------------------------------------
CODE:
----------------------------------------------------------------
Private Sub gleicheZahlenZaelen1()
Dim Urtext

Urtext = Worksheets("Tabelle1").Range("D3").Value 'Zelleninhalt einlesen

laenge = Len(Urtext) 'Läng des Zelleninhaltes
pos = 1 'pos initalisieren



For i = 0 To laenge

Ziffer = Mid(Urtext, pos, 1)
pos = pos + 2

Debug.Print Ziffer

Next i
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
20.12.2006 14:51:22 Freysein
NotSolved
20.12.2006 21:59:40 Stef_113
NotSolved
21.12.2006 10:11:53 Freysein
NotSolved
Blau Aw:gleiche Zahlen in einer Zelle zählen
 21.12.2006 19:36:50 Stef_113
NotSolved