Bereich("R2").Wert = ActiveCell.Adresse

Bereich("R2").Wert = ActiveCell.Adresse

Ist es möglich, diese Adresse irgendwie zu verwenden, nachdem sie in Zelle R2 auftaucht? Bisher konnte ich die Adresse meiner kopierten Zelle in Zelle R2 einfügen, indem ich diese Zeile am Ende meines Makros zum Kopieren von Zellen eingegeben habe. Jetzt möchte ich zu dieser Zelle zurückkehren können, nachdem sie in eine andere Zelle eingefügt wurde, damit ich sie löschen kann.

Versuche immer noch (Kopieren, Inhalte einfügen, kopierte Zelle löschen), nachdem es woanders eingefügt wurde.

Dank im Voraus.

Antwort1

Ich habe endlich gefunden, wonach ich gesucht habe.

Jede dieser Zeilen, die ich meinem Code hinzugefügt habe, hat funktioniert, um zur kopierten Zelle zurückzukehren und sie zu löschen. Das ist vielleicht nicht die beste Vorgehensweise, aber es bewirkt genau das, was ich wollte.

Range(Range("R2")).Select
Selection.ClearContents

Oder

Range([indirect("R2")]).Select
Selection.ClearContents

Ich habe also ein Makro zum Kopieren, das verwendet wird, wenn Ctrl+cgedrückt wird, und das die aktive Zelle genauso kopiert wie eine normale Kopie, aber zusätzlich die Adresse der aktiven Zelle in R2 einfügt.

Dann habe ich eine, um ctrl+vnur Werte einzufügen und dann zur kopierten Zelle zurückzukehren und sie zu löschen.

verwandte Informationen