HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellinhalt keine Zahl

Zellinhalt keine Zahl
24.09.2003 11:22:46
Uli
Hallo,

ein Makro prüft ein Tabellenfeld, ob ein Wert darin ist. Wenn nicht, ok (... = novalue). Wenn doch, soll eine Multiplikation erfolgen. Hat bisher immer funktioniert, doch nun sind Felder mit Text belegt, das Makro steigt natürlich bei der Aufforderung zur Berechnung aus.

Gibt es eine Abfrage, ob der Zellinhalt eine Zahl ist (ähnlich wie "novalue")?

Danke,
Uli

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Benutzer
AW: Zellinhalt keine Zahl
24.09.2003 11:31:47
Holger Levetzow
das kannst du mit WorksheetFunction.IsNumber(ActiveCell) prüfen

Holger
AW: Zellinhalt keine Zahl
24.09.2003 11:38:37
Karl-Otto Reimann
Hallo Uli
In A1 steht eine Zeichenkette, in B1 steht "=NumberFilter(A1)"


Function NumberFilter(strText)
Dim intCounter As Integer
For intCounter = 1 To Len(strText)
If IsNumeric(Mid(strText, intCounter, 1)) Then
'In disem Falle gibt die Funktion die Zahl zurück
NumberFilter = Val(Right(strText, Len(strText) - (intCounter - 1)))
Exit Function
End If
Next intCounter
End Function


mfG
K.O.

Meistgelesene Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Ihre Stimme zählt!