Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
684to688
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
684to688
684to688
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bedingung über VBA abfragen

Bedingung über VBA abfragen
19.10.2005 20:02:40
Korl
Hallo,
ich bekommen die wenn-Abfrage im VBA nicht hin. :-(
Ich möchte folgendes erreichen, z.B.
If wksA.Range("A1") = "AF" Then
mein Code
Else
If wksA.Range("A1") = "Text1" Then
mein Code
Else
If wksA.Range("A1") = "Text2" Then
mein Code
Else
If wksA.Range("A1") = "Text3" Then
mein Code
Exit Sub
Diese Schreibweise wird nicht angenommen.
Kann mir jemand helfen?
Gruß Korl

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bedingung über VBA abfragen
19.10.2005 20:07:28
Uduuh
Hallo,
derartige Abfragen solltest du mit einer Select Case Bedingung machen. Einfacher und übersichtlicher.
Select Case wksA.Range("A1")
Case "AF": Code1
Case "Text1":Code 2
'etc.
End Select
oder immer der gleiche Code:
Select Case wksA.Range("A1")
Case "AF", "Text1", "Text2": Code1
End Select
Gruß aus’m Pott
Udo

AW: Bedingung über VBA abfragen
19.10.2005 20:07:51
Fred
Hi,
Select Case wksA.Range("A1")
Case "AF": mein Code
Case "Text1": mein Code
Case "Text2": mein Code
End Select
mfg Fred
AW: Bedingung über VBA abfragen
19.10.2005 21:37:25
Korl
Hallo Udo und Fred,
besten Dank für Eure Unterstützung, es haut hin.
Gruß Korl
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige