Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Rahmen kopieren

Rahmen kopieren
04.02.2022 17:00:24
Alfred
Guten Tag,
kürzlich hatte ich ein Problem, Zeilen schneller einzufügen, als mit meinem selbstgebastelten Makro. Nun hat Gerd mir sehr gut geholfen, siehe:
Hier steht die ursprüngliche Fragestellung
Mein einziges noch vorhandenes Problem besteht darin, dass die Umrandung der kopierten Zellen nicht mitgenommen wird. Es sollen alle Zellen einfach umrandet sein.
Ich habe schon einiges hierzu gelesen jedoch differieren die einzelnen Hinweise so, dass mir der Durchblick fehlt. Kann mir jemand noch helfen? Evtl. Gerd nochmal?
Danke
Gruß Alfred Schulz
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Rahmen kopieren
04.02.2022 17:42:53
Herbert_Grom
Hallo ALfred,
das sollte damit gehen:
Anstatt Paste:=xlPasteFormulas nimm Paste:=xlPasteAll
Servus
AW: Rahmen kopieren
04.02.2022 19:08:54
Alfred
Hallo Herbert,
zunächst vielen Dank für die schnelle Antwort.
Leider hat die Änderung des Makros nichts gebracht. Ich habe eine Zeile per Makro in der Tabelle 1. Quartal eingefügt und die Tabelle hochgeladen: https://www.herber.de/bbs/user/150890.xlsm
Ich vermute, dass zuerst etwas aus der Zeile 4 geholt wird, dort haben die Zellen nur unten einen Rahmen. Dies soll auch so bleiben. Ich habe das Makro nur in der Tabelle 1. Quartal. die anderen Tabellen sind noch im uralten Stand...
Gruß Alfred
Anzeige
AW: Rahmen kopieren
04.02.2022 19:57:39
Firmus
Hallo Alfred,
du willst den Rahmen übernehmen beim INSERT?
Dein Code:

.Range("A5:P5").Resize(X).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow
Damit wird die Formatierung von den Zellen darunter übernommen (leere Zellen).
Mit diesem Code:

.Range("A5:P5").Resize(X).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

Wird die Formatierung von den Zellen darüber (Zeile 5) übernommen - die Rahmen werden eingetragen.
Quelle: https://docs.microsoft.com/de-de/office/vba/api/excel.xlinsertformatorigin
Gruß,
Firmus

Anzeige
AW: Rahmen kopieren
05.02.2022 12:50:55
Alfred
Zunächst möchte ich mich bei allen bedanken, die sich die Zeit genommen haben, sich in mein Problem einzuarbeiten, um eine Lösung anbieten zu können.
Ich habe nun mein Problem gelöst. Zuerst änderte ich in der Zeile, in der die Kopie erfolgen soll den Beginn der Range auf A5. Danach hatte ich die Zeile, wie ich sie haben möchte, allerdings beginnend ab Spalte N. Dann habe ich die Range in der Zeile Paste auch auf beginnend in A5 geändert. Das einzige unschöne Verhalten ist jetzt noch in den Spalten A:M zu sehen, da hier die Werte mit übernommen werden. Da die Inhalte danach gelöscht werden, ist meine ursprüngliche Absicht, den Vorgang gegenüber meinem ersten Makro erheblich zu beschleunigen, erfüllt.
Wenn jetzt noch jemand den Vorgang dahingehend abändern kann, dass von Spalte A:M nur die Formatierung und N:P Formatierung und Formeln übernommen werden, wäre die Tabelle perfekt.
Private Sub CommandButton1_Click() Dim Q As Long With ActiveSheet X = .Range("C2") If X > 0 And X >
Viele Grüße
Alfred Schulz
Anzeige
AW: Rahmen kopieren
05.02.2022 13:01:35
Alfred
Muss meinen letzten Eintrag zurücknehmen, hatte die falsche Tabelle zum Testen verwendet. Habe das Problem durch eine Designänderung umgangen.
;
Anzeige
Anzeige

Infobox / Tutorial

Rahmen kopieren in Excel: So geht's


Schritt-für-Schritt-Anleitung

  1. Zellen auswählen: Markiere die Zellen, deren Rahmen du kopieren möchtest.
  2. Kopieren: Nutze den Shortcut Strg + C, um die Zellen zu kopieren.
  3. Einfügen: Wähle die Zielzelle aus und drücke Strg + V, um die Zellen einzufügen.
  4. Rahmenformatierung: Um nur den Rahmen zu kopieren, nutze die Funktion „Format übertragen“. Klicke auf das Pinsel-Symbol in der Symbolleiste und wähle die Zielzellen aus.

Für das Übertragen von Rahmen mithilfe von VBA kannst du den folgenden Code verwenden:

.Range("A5:P5").Resize(X).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow

Dieser Code sorgt dafür, dass die Formatierung der Zellen darunter übernommen wird.


Häufige Fehler und Lösungen

  • Fehler: Rahmen werden nicht übernommen.

    • Lösung: Stelle sicher, dass du die Option CopyOrigin:=xlFormatFromRightOrBelow oder CopyOrigin:=xlFormatFromLeftOrAbove verwendest, je nachdem, von wo du die Formatierung übernehmen möchtest.
  • Fehler: Kopierte Zellen enthalten unerwünschte Werte.

    • Lösung: Verwende PasteSpecial und wähle nur die Formatierung aus, um sicherzustellen, dass nur der Rahmen ohne Werte übernommen wird.

Alternative Methoden

  • Format übertragen: Mit dem Format-Pinsel kannst du schnell die Formatierung einschließlich der Rahmen auf andere Zellen anwenden.
  • Makros: Erstelle ein Makro, das die gewünschten Zellen kopiert und nur die Rahmen überträgt. Hier ein Beispiel:
Sub RahmenKopieren()
    Selection.Copy
    Range("Zielbereich").PasteSpecial Paste:=xlPasteFormats
End Sub

Praktische Beispiele

  • Beispiel 1: Wenn du die Zellen A1 bis A10 umrandet hast und diese in Zellen B1 bis B10 kopieren möchtest, wähle die Zellen A1:A10 aus, kopiere sie und füge sie in B1:B10 ein, indem du den Formatübertragung-Button verwendest.

  • Beispiel 2: Um einen Standardrahmen in einer ganzen Tabelle anzuwenden, kannst du die gesamte Tabelle markieren und den Rahmen über das Menü „Start“ > „Rahmen“ auswählen.


Tipps für Profis

  • Nutze den Excel Format übertragen Shortcut: Klicke Strg + Umschalt + C, um das Format zu kopieren, und dann Strg + Umschalt + V, um es einzufügen.
  • Experimentiere mit verschiedenen Excel Standard Rahmenlinien, um das Design deiner Tabellen zu verbessern.
  • Verwende VBA, um komplexere Rahmenkopier-Szenarien zu automatisieren.

FAQ: Häufige Fragen

1. Wie kann ich nur den Rahmen ohne Werte kopieren?
Nutze die Funktion „PasteSpecial“ und wähle nur die Formate aus.

2. Was bedeutet xlFormatFromRightOrBelow?
Dieser Parameter in VBA bestimmt, dass die Formatierung von den Zellen rechts oder darunter übernommen wird.

3. Gibt es einen Shortcut für das Übertragen von Formaten?
Ja, der Shortcut ist Strg + Umschalt + C für das Kopieren und Strg + Umschalt + V für das Einfügen von Formaten.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige