Clever-Excel-Forum

Normale Version: VBA If mit zwei Bedingungen
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
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
Hallo,

ungetestet

Code:
If IsEmpty(ActiveCell.Offset(0, 2)) And Dir(Pfad & ActiveCell & ".xlsb") <> "" Then
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.
Edit:
Zu spät …
Ich sehe da Hühnerfüße, wo es eigentlich Gänse sein sollten. Wink
Weniger kryptisch:
Nimm "" statt ““

Gruß Ralf

Und dass If … And … Then in eine Zeile gehört, sollte klar sein?
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
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