ich stehe vor einem Problem in der VBA Programmierung und würde mich sehr freuen wenn sich jemand erbarmt und einen Vorschlag zur Lösung hat.
Was wir haben:
Eine Liste: G718:G797 (in jeder Zelle ist der Bezug zu einem anderen Tabellenblatt "Nutzungsdauern $B$19", also eine "Formel")
In diese Liste soll also immer das Rein was in der einen Zelle B19 steht.
Allerdings soll die Überschreibung in einzelnen Zellen innerhalb der Liste möglich sein ohne aber den Bezug zu B19 zu verlieren, bzw. wenn ich etwas rein schreibe und es danach wieder lösche, wieder der Bezug zu B19 da ist.
Ich habe ein Makro geschrieben, der aber nicht funktioniert.
Hier der Makro:
Sub Anlagen(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("G718:G797")) Is Nothing Then
Target = Sheets("Nutzungsdauern").Cells(19, 2)
Cancel = True
End If
End Sub
Dazu kommt: Dieser Makro soll auch für andere Listen erstellt werden, dann aber mit einer anderen Bezugszelle aus dem TB Nutzungsdauern... aber eins nach dem anderen
Vielen Dank im Voraus.
Viele Grüße
Peter