Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zellformat beim kopieren behalten

Zellformat beim kopieren behalten
01.07.2004 10:30:01
Martina
Guten Tag,
ich kopiere mittels VBA bestimmte Zellen auf ein anderes Blatt. Leider geht mir dabei das Format aus Tabelle "Daten" verloren. Aus dem "Zeitformat" in der Form 2:45 wird eine Kommazahl....
Worksheets("Zeit").Cells(a, 4) = Worksheets("Daten").Cells(x, 21)
Was mauss da noch zufügen? Vielen Dank schonmal für eure Hilfe!!!!!
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zellformat beim kopieren behalten
01.07.2004 10:32:29
Rolf
Hi,
Tabellenblätter kann man besser Kopieren mit:
Recte Maustaste auf das zu Kopierende Tabellenblattregister klicken
Verschieben/Kopieren wählen
So behälst du alle Formatierungen und Inhalte!
Gruss Rolf
AW: Zellformat beim kopieren behalten
01.07.2004 10:35:21
Hendrik
Ansonsten auch .Style mitkopieren!
AW: Zellformat beim kopieren behalten
Rolf
Im Makro kannst du es mal mit
Selection.Copy
ActiveSheet.Paste
Probieren.
Wenn man das nämlich manuel macht, bleibt das Format erhalten!
Gruss Rolf
Anzeige
AW: Zellformat beim kopieren behalten
WernerB.
Hallo Martina,
genau genommen kopierst Du nicht, sondern machst eine Wertzuweisung.
"Echtes" Kopieren könnte so aussehen (ungetestet!):

Sub Martina1()
Worksheets("Daten").Cells(x, 21).Copy _
Destination:=Worksheets("Zeit").Cells(a, 4)
Application.CutCopyMode = False
End Sub


Sub Martina2()
Worksheets("Daten").Cells(x, 21).Copy
With Worksheets("Zeit").Cells(a, 4)
.PasteSpecial Paste:=xlFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
.PasteSpecial Paste:=xlValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End With
Application.CutCopyMode = False
End Sub

Viel Erfolg wünscht
WernerB.
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige