Zeile Einfügen
19.05.2004 18:58:39
Alex
also ich habe folgendes Problem.
Ich habe eine Datenbank über mehrere Arbeitsblätter.
Auf der ersten Seite habe Symbol eingebaut die einen Makro hintelegt habe, so das bei Klick in das gewünscht Tabellenblatt und die Vorgegebene Zelle springt. Dies habe ich mittels.Folgender Formel gemacht.
Sub JumptoPuzzle1()
Worksheets("Puzzle1").Activate ' Tabellenblatt 1 aktivieren
Cells(2, 1).Select ' Zelle selektieren
End Sub
Jetzt möchte ich aber in der Mitteb der Tabelle eine oder mehrer neue Zeilen einfügen. Nur leider verschiebt sich dadurch der Zellenbezug.
Das heisst, nach der Einfügung einer oder mehrerer Zeilen springt der Makro nicht mehr zu seinem Bezugspunkt. Das heisst ich müsste alle Formeln ändern mit dem neuen Zellbezug. Gibt es nicht einen VBA dafür das sich der Zellbezug automatisch mitverschiebt, ohne das ich alles ändern muß. Da ich fast 200 sollcher Zellbezüge habe.
Ich hoffe ihr versteht mein Problem und helft mir da raus.
Alex