Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
732to736
732to736
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formatierungen bei copy-paste beibehalten

Forumthread: Formatierungen bei copy-paste beibehalten

Formatierungen bei copy-paste beibehalten
Neuling
Hallo!
Ich habe folgendes Problem:
Ein speziell formatiertes Arbeitsblatt, mit angepassten Spaltenbreiten und farbigen merged cells in den ersten beiden Zeilen soll per VBA sortiert und nach merkmal gefiltert werden. Anschließend soll die mit Autofilter auf ein Merkmal eingeschränkte Liste -am Besten das ganze Arbeitsblatt- kopiert werden und in eine neue Mappe eingefügt werden. Klappt alles auch, nur die Zellformatierungen, insbesondere die Spaltenbreite werden im neuen Workbook immer auf die Standardeinstellungen zurückgesetzt. Wie kann man bei Kopieren die Zeilen und Spaltenformatierungen mit in das neue Blatt nehmen? Gibt es da eine VBA-Lösung?
Vielen Dank schon einmal!
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Formatierungen bei copy-paste beibehalten
14.02.2006 19:02:17
ChrisL
Hallo
Copy/Paste nimmt die Formatierungen mit, jedoch nicht die Spaltenbreiten und Zeilenhöhen.
Vielleicht genügt ja schon:
Cells.EntireColumn.AutoFit
Cells.EntireRow.AutoFit
Ansonsten zeig mal deinen Code.
Gruss
Chris
AW: Formatierungen bei copy-paste beibehalten
15.02.2006 13:36:57
Neuling
@ChrisL: Danke! Hat super geklappt!
AW: Formatierungen bei copy-paste beibehalten
14.02.2006 22:37:26
Daniel
Hallo,
Wenn du die vollständigen Spalten kopierst, wird normalerweise die Breite mitgenommen. Ansonsten hilft vielleicht das her:
Range("a1").PasteSpecial xlPasteColumnWidths
Gruß, Daniel
Anzeige
AW: Formatierungen bei copy-paste beibehalten
14.02.2006 22:42:32
Lars 

Sub elegant_mit_select()
Sheets("Tabelle1").Select
Cells.Select
Selection.Copy
Sheets("Tabelle2").Select
Cells.Select
Selection.PasteSpecial Paste:=xlPasteFormats
End Sub

mfg Lars
AW: Formatierungen bei copy-paste beibehalten
15.02.2006 13:39:36
Neuling
@all: Danke für die Hilfe, hat super geklappt, habe Eure Tipps gleich mit in andere Projekte eingebunden!
Gruß,
Neuling
Anzeige
;

Forumthreads zu verwandten Themen

Pivottabelle Drill-Down Formatierung beibehalten
Squishy

Hallo zusammen
ist es überhaupt möglich beim öffnen eines Drilldown in der Pivottabelle (durch Doppelklick) dass die Formatierung spez. die Farbe von der Sourcedatei übernommen werden? z. B. ich habe auf der Grundliste in der ich die Werte über 100 grün und darunter rot eingefärbt und nun m...
03.09.2010 00:05:14
Thread-ID: 1175502
3 Beiträge
copy-paste und bedingte Formatierung
Marlon

Guten Morgen,
eine Frage zum Kopieren und Einfügen:
Wenn ich Daten mit
range(Cells(lrow, 15), Cells(lrow + 1000, 53)).Copy
Cells(lrow + 1, 15).PasteSpecial Paste:=xlPasteValues, _
Operation:=xlNone, SkipBlanks:=False, Transpose:=False
verschiebe, dann wird leider die be...
21.05.2011 12:44:08
Thread-ID: 1215456
5 Beiträge
Cells: Copy&Paste von Formatierungen
Formatierungen

Hallo Profis :-),
ich habe ein kleines Makro geschrieben was auch fast perfekt funktioniert, allerdings habe ich _ noch ein kleines Problemchen. Sub Test() Dim LetzteZeile As Double LetzteZeile = Range("Q" & Rows.count).End(xlUp).Row For i = 4 To LetzteZeile If Cells(i, 3) "" And Cel...
19.11.2014 11:02:23
Thread-ID: 1393195
5 Beiträge
Anzeige
Blatt kopieren und Seitenlayout beibehalten?
matthias

Hallo
ich kann mittels des Cods
Sub Send_Blatt_kopieren() Dim shZiel As Worksheet Dim shQuelle As Worksheet Application.ScreenUpdating = False Set shQuelle = ActiveSheet Workbooks.Add Set shZiel = ActiveSheet shZiel.Name = ActiveSheet.Name shQuelle.Cells.Copy shZiel.Cells(1, 1).PasteSp...
08.04.2015 09:57:36
Thread-ID: 1419528
19 Beiträge
eine Zelle beim Kopieren der Funktion beibehalten
Petro

ich habe in der Spalte I13 die eine zeit/text stehen.
Nun kopiere ich die Formel für die Zeilen 16-46 der Spalte G. Excel ändert dann automatisch die Zellen in der Funktion. Allerdings soll überall gleich sein. Gibts da einen Trick?
ich habs mal so versucht =I13 aber bei jede spalte wi...
18.10.2015 04:07:12
Thread-ID: 1452871
2 Beiträge
Makro copy Zellinhalt / paste ohne Formatierung
dB

Hallo zusammen,
ich suche ein Makro, dass mir den Zellinhalt einer von mir ausgewählten Zelle kopiert und in der gleichen Zeile eine Spalte nach links (hier: von H nach G) in der Zelle einfügt ohne das Quellformat zu übernehmen, sondern die Zielformatierung der Zielspalte (hier G) übernimmt...
11.02.2016 08:35:50
Thread-ID: 1474653
4 Beiträge
Absturz beim Kopieren von bedingter Formatierung
Peter
Guten Tag,
habe das Problem, dass sich beim Kopieren von 4 Zellen mit bedingter Formatierung
(Farb-Dropdowns)in eine neue Spalte, die EXCEL-Anwendung komplett "aufhängt" und nur noch über Task-Manager zu schließen ist.
Wäre nett, wenn mir jemand hierzu eine Lösungsmöglichkeit bzw. einen...
27.11.2017 18:47:25
Thread-ID: 1594002
5 Beiträge
Anzeige
Tabelle kopieren und Farbeinstellungen beibehalten
Torsten

Hallo,ich kopiere eine Tabelle in ein anderes Workbook. Leider werden dabei die bestehenden Farben nicht richtig übernommen. Kann man die Farben irgenwie mit übergeben?GRuss,
Torsten
23.09.2002 14:56:54
Thread-ID: 162782
3 Beiträge
Formatierung beim Kopieren beibehalten
Alex
ausgehend von folgendem code:

Sub Werte_Format() ' Formeln ersetzen durch Werte mit Formate Workbooks("Datei1.xls").Worksheets("Tabelle1").Range(Sheets("Tabelle1").UsedRange.Address).Copy With Workbooks("Datei2.xls").Worksheets("Tabelle1").Range("A1") .PasteSpecial Paste:=xlValues...
30.09.2003 12:45:33
Thread-ID: 317040
2 Beiträge
Anzeige
eine Zelle beim Kopieren der Funktion beibehalten
Norman
Hallo,

ich habe in der Spalte H2 die Formel WENN(E2=E56;G2;"") stehen.
Nun kopiere ich die Formel für die Zeilen 3-54 der Spalte H. Excel ändert dann automatisch die Zellen in der Funktion. Allerdings soll die Zelle E56 nicht mitgeändert werden sondern überall gleich sein. Gibts da einen...
13.10.2003 15:49:18
Thread-ID: 322888
5 Beiträge
Copy&Paste: Nur Inhalt, keine Formatierung
Daniel

Hallo,
Lässt es sich irgendwie einstellen, dass man nur den Inhalt einer Zelle kopiert und nicht auch noch die Formatierung? Als generelle Einstellung oder noch besser als individueller Schutz?
mfg
07.08.2006 14:52:48
Thread-ID: 789308
2 Beiträge
Formatierung beim Kopieren beibehalten
HalMar

Hallo,
Mit meinem Programm an sich bin ich schon fast fertig, allerdings gefällt mir das Ergebnis nicht. Konkret kopiert es einen bestimmten Bereich einer anderen Arbeitsmappe und fügt ihn dann ein. Allerdings werden die Formate nicht beibehalten, bei Kommazahlen habe ich z.B. das Problem d...
24.08.2007 08:57:00
Thread-ID: 900051
8 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Formatierungen beim Copy-Paste in Excel Beibehalten

Schritt-für-Schritt-Anleitung

Um in Excel die Formatierungen beim Copy-Paste beizubehalten, kannst du die folgenden Schritte ausführen:

  1. Daten auswählen: Markiere die Zellen, die du kopieren möchtest.
  2. Kopieren: Drücke Strg + C, um die ausgewählten Zellen zu kopieren.
  3. Zielblatt auswählen: Navigiere zu dem Arbeitsblatt, in das du die Daten einfügen möchtest.
  4. Einfügen mit Format: Klicke mit der rechten Maustaste auf die Zielzelle und wähle "Inhalte einfügen" → "Formate" oder verwende Strg + Alt + V und wähle die Option xlPasteFormats.
  5. Spaltenbreiten anpassen: Um sicherzustellen, dass die Spaltenbreiten beibehalten werden, kannst du zusätzlich folgende VBA-Anweisung verwenden: 
    Range("A1").PasteSpecial Paste:=xlPasteColumnWidths

Häufige Fehler und Lösungen

  • Problem: Die Spaltenbreiten werden nicht übernommen.

    • Lösung: Verwende die Range("A1").PasteSpecial xlPasteColumnWidths-Anweisung nach dem Kopieren.

  • Problem: Formatierungen fehlen beim Einfügen.

    • Lösung: Stelle sicher, dass du die richtige Einfügeoption wählst, um die Formatierungen zu beibehalten.

Alternative Methoden

  1. VBA-Makro für das Kopieren: Wenn du regelmäßig Daten kopierst und die Formatierungen beibehalten möchtest, kannst du ein VBA-Makro verwenden:

    Sub CopyWithFormatting()
   Sheets("Tabelle1").Cells.Copy
   Sheets("Tabelle2").Cells.PasteSpecial Paste:=xlPasteFormats
   Sheets("Tabelle2").Cells.PasteSpecial Paste:=xlPasteColumnWidths
End Sub

  2. Excel-Funktionen: Du kannst auch =A1 in die Zielzellen eingeben, um Werte und Formate dynamisch zu übernehmen.

Praktische Beispiele

  • Beispiel 1: Du hast eine Tabelle mit farbigen Zellen und möchtest diese in eine neue Tabelle übertragen. Verwende das VBA-Skript oben, um die Formatierungen beizubehalten.

  • Beispiel 2: Wenn du nur die Zahlen ohne Formatierungen kopieren möchtest, kannst du xlPasteValues verwenden:

    Cells.PasteSpecial Paste:=xlPasteValues

Tipps für Profis

  • Verwende VBA: Wenn du oft Daten kopieren und formatieren musst, automatisiere den Prozess mit VBA.
  • Kombiniere PasteSpecial: Du kannst mehrere PasteSpecial-Befehle in einem Makro kombinieren, um Zeit zu sparen.
  • Formatierungen überprüfen: Stelle sicher, dass die Zielzelle die gleiche Formatierung unterstützt, um Komplikationen zu vermeiden.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass alle Formatierungen beibehalten werden? Um sicherzustellen, dass alle Formatierungen beibehalten werden, verwende die PasteSpecial-Optionen für Formate und Spaltenbreiten.

2. Funktioniert das auch in Excel 365? Ja, die oben genannten Methoden funktionieren in Excel 365 sowie in früheren Versionen.

3. Was ist, wenn ich nur bestimmte Formate beibehalten möchte? Du kannst spezifische Formatierungen auswählen, indem du die entsprechenden Optionen im PasteSpecial-Menü verwendest oder ein benutzerdefiniertes VBA-Skript schreibst.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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