Hallo Leute, es ist schon verwirrend, wenn ich diese If-Klausel ausführe, dann funktioniert sie einwandfrei. Wenn ich aber die Header anpassen will (das auskommentierte also einkommentiere), dann kommt die Fehlermeldung: "end if without block if" Und das finde ich doch ziemlich verwirrend.
Kann mir jemand helfen, was das für eine Fehlermeldung sein soll?
Vielen Dank, Eda
If Range("W" & i).Value = "x" Then
m = Range("X" & i).Value
Sheets(Range("V" & i).Value).Select
'With ActiveSheet.PageSetup
' .CenterHeader = "m" ' oder m
MsgBox (m)
Sheets("DBasis").Select
End If