allen ein frohes neues Jahr!
Nun zur Frage, wie lautet der Code (VBA) wenn ich folgendes erreichen möchte:
In Spalte B wird eine Zahl eingetragen (1-3) aufgrund dieser Angabe werden dann entsprechende Zellen schwarz gefärbt (Bedingte Formatierung) ich möchte jedoch über VBA diese Zellen sperren bzw. entsperren.
Beispiel:
In B1 steht 1 dann sollen die Zellen H1-Q1, für eine Eingabe gesperrt werden.
Steht jedoch eine 2 drinn dann sollen die Zellen M1-Q1 gesperrt werden.
Wenn eine 3 drin steht sollen die Zellen nicht gesperrt werden.
Kleine besonderheit dabei, in K1 und P1 werden anhand einer Formel Berechnungen durchgeführt diese beziehen sich jedoch nur auf einen Inhalt in H1,I1 & J1 (Formel in K1) bzw. M1,N1 & O1 (Formel in P1).
Ich möchte verhindern, dass man in besagte Zellen etwas eingibt (ich weiss man sieht es eh nicht) wenn man mit TAB weitergeht. Deswegen sperren.
In diesem Tabellenblatt habe ich bereits folgenden Code drin:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.PrintArea = "$A$1:$I" & Range("A65536").End(xlUp).Row
End Sub
Ich hoffe Ihr könnt mir helfen - ich bin ein totaler nop was VBA angeht :-((
Schöne Grüße aus Berlin
Jean-Pierre