Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Stringprüfung Anzahl Zeichen

Stringprüfung Anzahl Zeichen
28.06.2005 09:34:30
Russi
Hallo Forum,
wie muss ich folgende Syntax umbasteln, damit ich per VBA prüfen kann, dass eine Zelle genau sechs Zeichen in Form einer Ganzzahl ohne Komme, etc. enthält?
---
If Len(Cells(introw, 10)) 6 Then
Cells(introw, 10).Interior.ColorIndex = 40
Else
End If
---
für kurzes Feedback besten Dank
Andreas
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
doppelt
28.06.2005 09:35:31
doppelt
doppelt
Sorry, war wohl ein Versehen...
28.06.2005 09:45:41
Russi
Frage noch offen...
AW: Stringprüfung Anzahl Zeichen
28.06.2005 09:46:16
Andreas
hallo Russi
If Len(Cells(introw, 10)) 6 Then
For i = 1 To 6
if Isnumeric(mid(Cells(introw, 10),i,1)) = False then
msgbox "Fehler"
Exit sub
End if
next
Cells(introw, 10).Interior.ColorIndex = 40
Else
End If
Gruss Andreas
Anzeige
AW: Stringprüfung Anzahl Zeichen
28.06.2005 09:48:45
Russi
Hallo Andreas, werde ich gleich probieren.
Einstweilen vielen Dank
AW: Stringprüfung Anzahl Zeichen
28.06.2005 09:48:57
Russi
Hallo Andreas, werde ich gleich probieren.
Einstweilen vielen Dank
AW: Stringprüfung Anzahl Zeichen
28.06.2005 10:08:10
Kurt
hi,
probier mal:
If IsNumeric(Cells(introw, 10)) Then
MsgBox "ist numerisch"
If Len(Abs(Cells(introw, 10))) 6 Then
MsgBox "oki"
Else
MsgBox "zwar numerisch aber entweder komma oder nicht sechsstellig"
End If
Else
MsgBox "nix numerisch"
End If
End Sub
...und Tschüss Kurt
Anzeige
AW: Stringprüfung Anzahl Zeichen
28.06.2005 10:13:06
Kurt
so natürlich
man sollte erst nachdenken und dann posten
sorry
If IsNumeric(Cells(introw, 10)) Then
MsgBox "ist numerisch"
If Len(Int(Cells(introw, 10))) = 6 Then
MsgBox "oki"
Else
MsgBox "zwar numerisch aber entweder komma oder nicht sechsstellig"
End If
Else
MsgBox "nix numerisch"
End If
End Sub
...und Tschüss Kurt
Anzeige
AW: Stringprüfung Anzahl Zeichen
28.06.2005 10:21:16
Russi
Hallo Kurt,
vielen Dank, das ist auch ein Ansatz.
Schönen Tag noch...
Andreas
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige