Office: If mit 2 Bedingungen

Hallo,

kann mir jemand sagen, wie ich eine If-Abfrage mit 2 Bedingungen in VBA realisieren kann. Mir gehts speziell um die Oder-Verknüpfung.

Beispiel:

If Range("A1").Value = xx oder?
Range("A2").Value = xx Then
...

Vielen Dank für Eure Hilfe.

:)

 

Hallo lausitzcom,

Du hast es doch schon fast *Smilie

Code:

 

Hallo myfake,

vielen Dank für Deine Antwort. Leider kommt folgende Fehlermeldung:
"Unzulässiger oder nicht ausreichend definierter Verweis"

Folgende Abfrage brauche ich:

Code:

Eine Fehlermeldung erscheint nicht mehr. Jedoch wird immer dieselbe MsgBox angezeigt, egal ob F6 gefüllt ist oder nicht.

Grüße LC

 

Hallo, 3341,

ich würde die Tabellenfunktion Zählenwenn (WorksheetFunction.Countif) für die Überprüfung nutzen.

Gruß
LS

 

Hi,

hast Du es mal Schrittweise getestet? Hiermit meine ich jetzt nicht das Schrittweise Testen über die F8 Taste, sondern Bedingung für Bedingung.

Die erste Bedingung habe ich jetzt mal getestet. Hierbei ist mir aufgefallen, dass vor der "Range("F6")" Anweisung ein Punkt fehlt (evtl. kleine Ursache / große Wirkung *wink.gif* ).
Denn der Teil an sich scheint zu passen:
Code:

 

Hallo myfake,

mit der Formel sollen folgende 2 Varianten abgefragt werden:

1. Wenn in den Feldern R12 bis R19 in irgendeinem "Nein" steht und das Feld F6 leer ist, dann ...

2. Wenn in den Feldern R12 bis R19 in irgendeinem "Nein" steht und im Feld F6 "Ja" steht, dann ...

Grüße LC

 

Hallo LC,

dann schau doch mal, ob Dir der Code hier weiterhilft:
Code:

 

Hallo, myfake,

Pater Brown pflegte was von hübsch-häßlich zu sagen: mit Zählenwenn und der entsprechenden Auswertung wird der Bandwurm weitaus übersichtlicher und verständlicher. Selbst eine Select Case Auswertung ist übersichtlicher. *wink.gif*

Gruß
LS

 

Hallo,

mit Eurer Hilfe bin ich zu folgender Lösung gekommen:

Code:

Vielen Dank und einen schönen Abend noch.

Grüße LC

 

Hallo LS,

wie es scheint hat es ja trotzdem hingehauen. *wink.gif* Aber Du hast natürlich recht - hübsch ist der Code nicht. Daher die Frage... wie würdest Du die Zählenwenn Anweisung denn einbauen (ohne lediglich zu zählen, ob etwas in den Zellen steht)?

cu
myfake