VBA If mit zwei Bedingungen

[Jorg]

Hallo zusammen,
 
die erste Bedingung soll prüfen, ob - von der aktiven Zelle aus - die Zelle in der zweiten Spalte - in der gleichen Zeile - leer ist. Die zweite Bedingung funktioniert, da sie als Einzelbedingung schon im Einsatz ist.

Code:

If   ActiveCell.Offset(0, 2) =““ And
Dir(Pfad & ActiveCell & ".xlsb") <> "" Then
…..das läuft

 
Wie muss die 1. Bedingung richtig heißen?
 
Vielen Dank im Voraus
 
Jorg

[Steffl]

Hallo,

ungetestet

Code:

If IsEmpty(ActiveCell.Offset(0, 2)) And Dir(Pfad & ActiveCell & ".xlsb") <> "" Then

[MisterBurns]

Die erste Bedingung sollte schon richtig sein, ich glaube nur, dass du die falschen Anführungszeichen hast (sieh deinen Beitrag mal genau an). VBA ist da etwas empfindlich.

[RPP63]

Edit:
Zu spät …
Ich sehe da Hühnerfüße, wo es eigentlich Gänse sein sollten.
Weniger kryptisch:
Nimm "" statt ““

Gruß Ralf

---

Und dass If … And … Then in eine Zeile gehört, sollte klar sein?

[Jorg]

Hallo,

ganz, ganz herzlichen Dank für die 3 super Antworten:

den Code,
die falschen Anführungszeichen und
den Tipp, alles in eine Zeile zu schreiben.

Einen schönen Sonnentag wünscht euch

Jorg

[MisterBurns]

Du kannst es schon in 2 Zeilen schreiben, aber dann musst du VBA sagen, dass die zweite Zeile zur ersten dazugehört. Das ist nur für die Übersichtlichkeit

Code:

If ActiveCell.Offset(0, 2) ="" And _
Dir(Pfad & ActiveCell & ".xlsb") <> "" Then