Hallo,
ich kopiere einen Bereich aus einer Arbeitsmappe in eine andere:
' lz =letzte belegte Zeile in der Quelle
with wsQ
.Range(.Cells(3, "A"), .Cells(lz, "Z")).Copy
end with
wsZ.Cells(3, "A").PasteSpecial Paste:=xlPasteFormats
Dies funktioniert einwandfrei.
Drückt man während der Makroausführung im falschen Augenblick (warum auch immer) "Druck", gibt es einen Fehler bei
wsZ.Cells(3, "A").PasteSpecial Paste:=xlPasteFormats.
Offenbar überschreibt "Druck" den Inhalt, der mit .Copy gesetzt wurde und dann kann die Formatierung nicht ausgeführt werden.
Denn:
wsZ.Cells(3, "A").PasteSpecial
alleine (ohne "Paste:=xlPasteFormats.") funktioniert, aber dann wird der Screenshot in die Arbeitsmappe übertragen.
Wie vermeide ich, dass Tastatureingaben während des Makrolaufes dazwischen funken?
Vielen Dank für jeden Tipp!
VG Stefan