Forums Neueste Beiträge
 

VBA in Excel, Zeichenkette einlesen

24/03/2009 - 21:36 von Jimmyt | Report spam
Hallo,

wie kann ich folgenden Algorithmus in vba implementieren:

Ich habe eine Excel-Tabelle.
In den einzelnen Zellen sind vermischte Eintràge von verschiedenen
Datentypen (also Zeichen, Zahlen, Leerzeichen, Sonderzeichen etc.)
Ich möchte den Inhalt jeder Zelle durchgehen, Zeichen für Zeichen (am besten
wahrscheinlich mit einer Iteration),
und alle bspw. Zahlen herausfiltern und den Rest verwerfen.
Und das für die ganze Tabelle.

Ich habe Schwierigkeiten damit den eingelesen Inhalt einer Zelle Zeichen für
Zeichen durchzugehen.
Wie macht man das am Geschicktesten in vba?
Kann ich den Inhalt einfach in ein Array schreiben?
Wenn ja, wie geht das?

Für jeden Tipp dankbar

Gruß
 

Lesen sie die antworten

#1 Michael v. Fondern
24/03/2009 - 22:12 | Warnen spam
Hallo Jimmy,

Ich habe Schwierigkeiten damit den eingelesen Inhalt einer Zelle Zeichen für
Zeichen durchzugehen.
Wie macht man das am Geschicktesten in vba?



Vielleicht hilft dir ja folgendes Beispiel:

Option Explicit
'Iteration über alle Zellen eines Bereich
Sub test()
Dim rng As Range
For Each rng In Range("A1:B3").Cells
IterZeichen CStr(rng.Value)
Debug.Print ""
Next
End Sub

' Iteration über alle Zeichen einer Zeichkette
Sub IterZeichen(x As String)
Dim i As Long, l As Long
l = Len(x)
For i = 1 To l
Debug.Print Mid(x, i, 1)
Next
End Sub


Grüße

- Michael -

Ähnliche fragen