Select Case je nach Inhalt in Zelle

Forumthread: Select Case je nach Inhalt in Zelle
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Select Case je nach Inhalt in Zelle

06.04.2009 00:46:11

Peter

Guten Abend
Ich möchte mit Select Case steuern, dass je nach Inhalt einer Zelle eine andere Aktion durchgeführt wird.
So möchte ich beispielsweise feststellen, ob der Inhalt
numerisch ist oder
alphanumerisch oder
ein #REF Fehler enthält oder
ein #NAME Fehler enthält.
Leider ist mir nicht klar, wie ein solches Select Case aufgebaut sein muss und wie dann die einzelnen Varianten eingebaut werden.
Wer kann mir helfen?
Danke, Peter

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Select Case je nach Inhalt in Zelle

06.04.2009 01:05:32

Daniel
AW: Select Case je nach Inhalt in Zelle

08.04.2009 22:17:11

Peter

AW: Select Case je nach Inhalt in Zelle

06.04.2009 01:05:32

Daniel

Hi
das bekommst du mit SELECT CASE alleine wahrscheinlich nur schwer hin.
ich würde da IF-THEN-ELSEIF und SELECT CASE kombinieren:


Sub test()
If IsError(Selection.Value) Then
Select Case Selection.Text
Case "#Bezug!"
MsgBox "Bezugsfehler"
Case "#DIV/0!"
MsgBox "Division durch 0"
Case Else
MsgBox "Andere Fehler"
End Select
ElseIf IsNumeric(Selection.Value) Then
MsgBox "Zahl"
Else
MsgBox "Text"
End If
End Sub

Gruß, Daniel