ich bin zu doof. Bitte helft mir. Für euch ist es bestimmt ein Klacks.
Ein lieber Fachmann hat mir für einiger Zeit bei der Erstellung eines Dienstplanes sehr geholfen und diesbezüglich etwas in VBA programmiert.
Nun habe ich ein paar Zeilen zusätzlich eingefügt in denen diese Programmierung nicht läuft.
Ich vermute mal dass nur der Wirkungsbereich irgendwo verändert werden muss.
Habe da auch etwas gefunden was da lautet:
Auszug:
Set Bereich = ActiveSheet.Range("J4:AK" & xRow)
If Intersect(Target, Bereich) Is Nothing Then
Application.EnableEvents = True
Exit Sub
Auszug Ende
Also der Bereich fängt jetzt bei J4 an und geht bis Zelle AK51
Er soll aber erweitert werden von J4 bis AK81
Vielleicht Könnt ihr mir helfen?
Ich lade mal eine Datei zur bessern Verdeutlichung hoch.
Gruß Rolf