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

Selektieren vermeiden

Forumthread: Selektieren vermeiden

Selektieren vermeiden
29.12.2005 09:01:03
M.
Guten Morgen,
Ich möchte von einem Tabellenblatt auf das nächste Daten übertragen. Dazu benutze ich den folgenden code:
Worksheets("A").Range("A1"). copy _
Destination:=Worksheets("B").Range("A1")
Wie muß ich diesen erweitern, wenn ich nur Formate übertragen möchte? Dieses gelingt mir bisher nur über das "select"ieren, und das soll man ja nicht ;-)
Gruß aus den Schnee
Martin
P.S: Gibt es in vba die Möglichkeit z.B. Werte und Formate nicht jedoch die Formeln zu übertragen? Wie sähe das dann aus?
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Selektieren vermeiden
29.12.2005 09:16:31
Hajo_Zi
Hallo Martin,
Worksheets("A").Range("A1"). copy
With Worksheets("B").Range("A1")
.PasteSpecial Paste:=xlPasteValues
End With
Application.CutCopyMode = False
zu Ps schaue mal in die Hilfe bei Deiner Version ist es möglich
xlPasteValuesAndNumberFormats


AW: Selektieren vermeiden
29.12.2005 09:18:33
IngGi
Hallo Martin,
zu deiner eigentlichen Frage:

Sub kopieren()
Worksheets("A").Range("A1").Copy
Worksheets("B").Range("A1").PasteSpecial Paste:=xlPasteFormats
End Sub
...und zu deinem PS:

Sub kopieren()
Worksheets("A").Range("A1").Copy
Worksheets("B").Range("A1").PasteSpecial Paste:=xlPasteValues
Worksheets("B").Range("A1").PasteSpecial Paste:=xlPasteFormats
End Sub
Gruß Ingolf
Anzeige
;

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