If...Then

Computer: Software & Programmierung Office Software
1

Guten Morgen.
ich habe ein Problem mit einer If Then abfrage. Und zwar soll das Makro einen bestimmten Bereich löschen wenn in einer bestimmten Zelle ein „a“ oder nichts steht.

zb wenn ich D3 nichts steht dann sollen G3 bis J3 gelöscht werden und das gleiche dann für D4 und so weiter, so oft halt bis ein B nichts mehr steht.

Mein erster Ansatz sieht so aus, nur leider wird nichts gelöscht.

Sheets(„Tabelle3“).Select
If Range(„d3“) = „a“ Or Range(„d3“) = " " Then
Range(„g3:j3“).Select
Selection.Delete
End If

2

Moin

zb wenn ich D3 nichts steht dann sollen G3 bis J3 gelöscht
werden und das gleiche dann für D4 und so weiter, so oft halt

:bis ein B nichts mehr steht.

häää?

Mein erster Ansatz sieht so aus, nur leider wird nichts
gelöscht.

is klar…

Sheets(„Tabelle3“).Select
If Range(„d3“) = „a“ Or Range(„d3“) = " " Then
Range(„g3:j3“).Select
Selection.Delete
End If

Du musst Range(„D3“) .Value verwenden!
Ausserdem hast Du ein leerzeichen als zweite Bedingung und ein Leerzeichen ist nicht gleich einer leeren Zelle…

Grüße
Munich

3

ok danke für die antwort