Ausgewählte Zellen ohne Formatierung verschieben

Ausgewählte Zellen ohne Formatierung verschieben

Ich muss eine Auswahl von Zellen innerhalb eines formatierten Rasters mithilfe von Rändern verschieben (per Drag & Drop). Das Problem ist, dass jedes Mal, wenn die Auswahl Ränder hat, auch die Formatierung verschoben wird. Gibt es eine Möglichkeit (und auch ein gutes Skript), das Verschieben der Formatierung zu vermeiden?

Antwort1

Wenn du die Zellen nicht ausschneiden, sondern "kopieren" würdest (oder in deinem Fall per Drag&Drop), könntest du sie ohne Ränder einfügen (Inhalte einfügen). Beim Ausschneiden funktioniert das leider nicht.

Der Workaround könnte aus den folgenden beiden Makros bestehen:

Wählen Sie einen Bereich aus und führen Sie Makro1 aus:

  • Referenzieren Sie die Auswahl in einem Bereich (rng1).
  • Erstellen Sie ein neues Arbeitsblatt
  • füge rng1 in das neue Arbeitsblatt (wks1) ohne Ränder ein (Inhalte einfügen) und referenziere es als rng2

Wählen Sie die Zielzelle aus und führen Sie Makro2 aus

  • Inhalt von rng1 löschen
  • rng2 ausschneiden und in den Zielbereich einfügen
  • wks1 löschen

Viel Glück und lassen Sie uns wissen, wenn Sie auf Probleme stoßen

verwandte Informationen