Wie kopiert man ausschließlich die Rahmen eines markierten Bereichs in Excel?
Beim Arbeiten in Microsoft Excel müssen Sie häufig eine bestimmte Formatierung von einem Bereich auf einen anderen übertragen. Mit Standard-Kopier- und Einfügevorgängen können Sie Zellwerte, Formeln oder sogar die gesamte Zellenformatierung mithilfe der Funktion „Inhalte einfügen“ kopieren. Manchmal möchten Sie jedoch ausschließlich den Rahmenstil eines markierten Bereichs übernehmen – ohne andere Formatierungen wie Farben, Schriftarten oder Füllmuster zu beeinflussen. Beispielsweise möchten Sie vielleicht ein einheitliches Tabellenrahmen-Design in mehreren Bereichen Ihres Arbeitsblatts beibehalten oder Rahmenvorlagen auf neue Tabellenblätter übertragen. Leider bietet Excel keine direkte integrierte Option, um ausschließlich Zellenrahmen zu kopieren und einzufügen. In diesem Tutorial zeigen wir Ihnen eine praktische Methode, mit der Sie nur die Rahmen eines beliebigen markierten Bereichs kopieren und auf einen neuen Bereich in Excel anwenden können – ohne dabei andere Zelleneigenschaften zu verändern.
Verwenden Sie VBA-Code, um ausschließlich die Rahmen von Bereich auswählen zu kopieren
Alternative Lösung: Rahmen manuell mit dem Mit Format-Pinsel replizieren
Verwenden Sie VBA-Code, um ausschließlich die Rahmen von Bereich auswählen zu kopieren
Mit einem einfachen VBA-Makro können Sie den exakten Rahmenstil einer Zelle oder eines Bereichs effizient kopieren und an einer anderen Stelle Ihres Arbeitsblatts anwenden – unabhängig vom Inhalt oder anderen Formatierungsmerkmalen. Diese Lösung ist ideal für automatisierte, sich wiederholende Aufgaben oder zur Beschleunigung Ihres Workflows bei der Bearbeitung benutzerdefinierter Tabellen und Vorlagen. Befolgen Sie die nachfolgenden detaillierten Schritte, um den VBA-Code sicher auszuführen, und beachten Sie dabei die hilfreichen Hinweise zu den Parametern.
1. Drücken Sie gleichzeitig die Tasten Alt + F11 auf Ihrer Tastatur. Dadurch öffnet sich das Fenster des Microsoft Visual Basic for Applications (VBA)-Editors. Falls die Registerkarte „Entwickler“ in Excel nicht sichtbar ist, verwenden Sie einfach diese Tastenkombination – sie öffnet den VBA-Editor direkt in jeder modernen Excel-Version.
2. Klicken Sie im VBA-Editor in der Menüleiste auf Einfügen und wählen Sie dann Modul. Es öffnet sich ein neues leeres Modulfenster. Kopieren Sie den folgenden VBA-Code und fügen Sie ihn in dieses Fenster ein.
VBA-Code: Nur Rahmen von Bereich auswählen in Excel kopieren
Sub CopyBorders()
'Updated by Extendoffice 20211203
Dim xRg, yRg As Range
On Error Resume Next
Set xRg = Application.InputBox("Select Range with Borders to Copy...", "Kutools For Excel", , , , , , 8)
Set yRg = Application.InputBox("Select Cell to Apply Borders to range..", "Kutools For Excel", , , , , , 8)
With yRg.Borders(xlEdgeLeft)
.LineStyle = xRg.Borders(xlEdgeLeft).LineStyle
.ColorIndex = xRg.Borders(xlEdgeLeft).ColorIndex
.TintAndShade = xRg.Borders(xlEdgeLeft).TintAndShade
.Weight = xRg.Borders(xlEdgeLeft).Weight
End With
With yRg.Borders(xlEdgeTop)
.LineStyle = xRg.Borders(xlEdgeTop).LineStyle
.ColorIndex = xRg.Borders(xlEdgeTop).ColorIndex
.TintAndShade = xRg.Borders(xlEdgeTop).TintAndShade
.Weight = xRg.Borders(xlEdgeTop).Weight
End With
With yRg.Borders(xlEdgeBottom)
.LineStyle = xRg.Borders(xlEdgeBottom).LineStyle
.ColorIndex = xRg.Borders(xlEdgeBottom).ColorIndex
.TintAndShade = xRg.Borders(xlEdgeBottom).TintAndShade
.Weight = xRg.Borders(xlEdgeBottom).Weight
End With
With yRg.Borders(xlEdgeRight)
.LineStyle = xRg.Borders(xlEdgeRight).LineStyle
.ColorIndex = xRg.Borders(xlEdgeRight).ColorIndex
.TintAndShade = xRg.Borders(xlEdgeRight).TintAndShade
.Weight = xRg.Borders(xlEdgeRight).Weight
End With
With yRg.Borders(xlInsideHorizontal)
.LineStyle = xRg.Borders(xlInsideHorizontal).LineStyle
.ColorIndex = xRg.Borders(xlInsideHorizontal).ColorIndex
.TintAndShade = xRg.Borders(xlInsideHorizontal).TintAndShade
.Weight = xRg.Borders(xlInsideHorizontal).Weight
End With
With yRg.Borders(xlInsideVertical)
.LineStyle = xRg.Borders(xlInsideVertical).LineStyle
.ColorIndex = xRg.Borders(xlInsideVertical).ColorIndex
.TintAndShade = xRg.Borders(xlInsideVertical).TintAndShade
.Weight = xRg.Borders(xlInsideVertical).Weight
End With
End Sub
3. Nachdem Sie den Code eingefügt haben, führen Sie das Makro aus, indem Sie die Taste F5 drücken oder über die Symbolleiste des VBA-Editors Ausführen auswählen. Sobald im ersten Dialogfeld „Kutools für Excel“ dazu aufgefordert werden, markieren Sie mit der Maus den Bereich, dessen Rahmen Sie replizieren möchten, und bestätigen Sie Ihre Auswahl mit einem Klick auf „OK“.
4. Anschließend erscheint ein zweites Dialogfeld mit dem Titel „Kutools für Excel“. Wählen Sie nun die obere linke Zelle des Zielbereichs aus, auf den der kopierte Rahmenstil angewendet werden soll. Sobald Sie Ihre Zielzelle (und ggf. einen Bereich) ausgewählt haben, klicken Sie auf „OK“. Siehe untenstehende Abbildung:
Nach Abschluss dieser Schritte wurde das Rahmen-Design des ursprünglichen Bereichs auf die von Ihnen ausgewählte neue Position übertragen. Dabei wird ausschließlich die Rahmenformatierung übernommen – Zellendaten, Farben und andere Merkmale bleiben unverändert. Das ist besonders praktisch, um einheitliche Tabellen zu gestalten oder das optische Erscheinungsbild eines Arbeitsblatts konsistent zu übertragen. Ein Beispielergebnis finden Sie unten:
Alternative Lösung: Rahmen manuell mit dem Mit Format-Pinsel replizieren
Für Anwender, die eine Lösung ohne Programmierung bevorzugen, bietet der in Excel integrierte Formatpinsel eine schnelle Möglichkeit, die Rahmenformatierung – zusammen mit weiteren Formatierungsstilen – von einem Bereich auf einen anderen zu übertragen. So verwenden Sie ihn:
- Wählen Sie den Bereich aus, der die Rahmen enthält, die Sie kopieren möchten.
- Klicken Sie auf der Registerkarte Start in der Gruppe Zwischenablage auf den Formatpinsel (Symbol eines Pinsels).
- Ihr Mauszeiger verwandelt sich in einen Pinsel. Wählen Sie den Zielbereich aus, auf den die Rahmen übertragen werden sollen – dabei übernimmt das Tool nicht nur die Rahmen des ursprünglichen Bereichs, sondern auch weitere Formatierungen wie Schriftart und Füllfarbe.
Vorteile: Einfach und direkt in Excel integriert – ideal für schnelle, visuelle Kopieraufgaben.
Nachteile: Kann nicht ausschließlich den Rahmenstil kopieren (überträgt auch andere Zellenformate wie Füllfarbe, Schriftartänderungen usw.). Daher nicht ideal, wenn Inhalt und Formatierung der Zielzellen bis auf die Rahmen unverändert bleiben sollen.
Jede Methode besticht durch ihre eigenen Stärken und eignet sich ideal für unterschiedliche Workflow-Anforderungen: VBA ermöglicht eine präzise Übertragung ausschließlich der Rahmen, während der Formatpinsel die schnelle Übernahme sämtlicher Formatierungen erleichtert.
Verwandte Artikel:
- Wie kopiert und fügt man Werte in Excel ein, ohne Duplikate zu übernehmen?
- Wie kopiert man Zellendaten in Excel inklusive Zeilenhöhe und Spaltenbreite?
- Wie kopiert man eine Zelle in Excel als reinen Textwert – und nicht als Formel?
- Wie kopiert man Daten in die nächste leere Zeile eines anderen Arbeitsblatts in Excel?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins