Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1236to1240
1236to1240
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Befehl Copy - nur Inhalte mitnehmen, keine Formate

Forumthread: Befehl Copy - nur Inhalte mitnehmen, keine Formate

Befehl Copy - nur Inhalte mitnehmen, keine Formate
Stefan
Hallo,
ich verwende den Copy-Befehl, um Zellen von einer Datei in eine andere zu kopieren.
With Worksheets("Bedingungen")
.Cells(iCntRows, 1).Copy ThisWorkbook.Worksheets("Daten").Cells(iLastRowZF + 1, 1)
End With
Leider nimmt der Copy-Befehl die Formatierungen mit.
Kann ich das irgendwie umgehen?
Danke Euch.
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Befehl Copy - nur Inhalte mitnehmen, keine Formate
23.11.2011 20:43:22
Hajo_Zi
Hallo Stefan,
Columns("B:C").Copy
Columns("B:C").PasteSpecial Paste:=xlValues
Application.CutCopyMode = False 'Zwischenspeicher löschen

AW: Befehl Copy - nur Inhalte mitnehmen, keine Formate
23.11.2011 20:50:18
Stefan
Hallo Hajo,
und wenn ich das Zellenweise machen will?
Muss es dann so aussehen?
.Cells(iCntRows, 1).Copy ThisWorkbook.Worksheets("Daten").Cells(iLastRowZF + 1, 1).PasteSpecial Paste:=xlValues
Danke Dir.
Anzeige
AW: Befehl Copy - nur Inhalte mitnehmen, keine Formate
23.11.2011 20:53:35
Hajo_Zi
Hallo Stefan,
schaue Dir meinen Beitrag an. es steht nicht in einer Zeile.
Ansonsten ist es korrekt.
Gruß Hajo
Alternative : Wertzuweisung in EINER Codezeile
24.11.2011 01:09:58
NoNet
Hallo Stefan,
grundsätzlich würde ich das auch wie in Hajos Beitrag beschrieben lösen.
Allerdings gibt es bei reiner Wertübernahme auch die Möglichkeit, der Zielzelle lediglich den Wert der Quellzelle zuzuweisen - das kann dann auch in EINER Codezeile erfolgen :
ThisWorkbook.Worksheets("Daten").Cells(iLastRowZF + 1, 1).Value = .Cells(iCntRows, 1).Value
Gruß, NoNet
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum