Guten Tag zusammen
Ich möchte wenn in I3 ein Wert enthalten ist, eine Spalte I einfügen so dass dieser Wert nachher auf K3 ist. Wenn I3 leer ist zu R7 springen. Der Name der Tabelle kann variieren.
Habe mir das gebastelt, funktioniert aber nicht:
If Tabelle1.Range("I3").Value <> "" Then
Columns("I:I").Selection.Insert Shift:=xlToRight
If Tabelle1.Range("I3").Value = " " Then
Range("R7").Select
End If
End If
Darf ich auf eure Hilfe hoffen?
Danke schon im Voraus
cesar
Ich möchte wenn in I3 ein Wert enthalten ist, eine Spalte I einfügen so dass dieser Wert nachher auf K3 ist. Wenn I3 leer ist zu R7 springen. Der Name der Tabelle kann variieren.
Habe mir das gebastelt, funktioniert aber nicht:
If Tabelle1.Range("I3").Value <> "" Then
Columns("I:I").Selection.Insert Shift:=xlToRight
If Tabelle1.Range("I3").Value = " " Then
Range("R7").Select
End If
End If
Darf ich auf eure Hilfe hoffen?
Danke schon im Voraus
cesar