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

kopieren

Forumthread: kopieren

kopieren
11.02.2019 19:57:52
cryser88
Hallo,
ich habe folgendes Problem. Ich habe ein Makro geschrieben, das ich auf Sheet1 mit einem Button ausführe. Jedoch möchte ich in dem Makro einen Bereich (variabel) von Sheet2 kopieren und in Sheet1 einfügen (Transpose). Das funktioniert bei mir leider nur,wenn ich bevor ich kopiere des Sheet2 aktiviere und das führt dazu, das wenn ich das Makro ausführe, man deutlich sieht das die Sheets gewechselt werden.
so funktioniert es:
Worksheets("temperatures").Activate
Worksheets("temperatures").Range(Cells(i, 1), Cells(i, ColumnCount)).Copy
Worksheets("evaluation").Cells(39, 2).PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
so leider nicht:
Worksheets("temperatures").Range(Cells(i, 1), Cells(i, ColumnCount)).Copy
Worksheets("evaluation").Cells(39, 2).PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: kopieren
11.02.2019 20:07:08
Werner
Hallo,
With Worksheets("temperatures")
.Range(.Cells(i, 1), .Cells(i, .ColumnCount)).Copy
Worksheets("evaluation").Cells(39, 2).PasteSpecial  _
Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Application.CutCopyMode = False
End With

Gruß Werner
Anzeige
AW: kopieren
12.02.2019 13:36:37
Daniel
Ich habe es jetzt auch immer wieder erlebt, dass solche Kopiervorgänge nur nach vorherigem .Activate des entsprechenden Worksheets funktionieren. Dabei sollte doch der eindeutige Bezug zu dem Worksheet im Kopiercode genügen? Kann jemand sagen, woran das liegt?
Grüße
Daniel
;

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