Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
420to424
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
420to424
420to424
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

paste error

paste error
THomas
Hallo zusammen,
ich möchte von der einen Mappe 12 zellen in die andere Mappe kopieren.
Dazu habe ich zum rauskopieren diesen Befehl:
ActiveCell.Range(Cells(1, 1), Cells(1, 12)).Select
Selection.Copy
und zum reinkopieren diesen befehl:
On Error GoTo pasteer
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
...Die Fehlermeldung pasterr hab ich extra eingebaut....
Das Problem ist, bei manchen arbeitsmappen pasted er, bei manchen nicht&gtgeht zu pasteer...ich kann aber nicht rausfinden warum er bei einigen arbeitsmappen nicht pasten kann. blattschutz oder so hab ich selbstverständlich schon kontrolliert, daran lags nicht....
kann mir jemand einen tip geben?
Vielen Dank und Grüße
Thomas

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: paste error
Nike
Hi,
mal ohne select arbeiten?

Sub test()
With ActiveCell.Range(Cells(1, 1), Cells(1, 12))
.Copy
.PasteSpecial Paste:=xlValues
'End With
End With
Application.CutCopyMode = False
End Sub

Bye
Nike

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige