Fehlermeldung beim "pasten" von Grafiken
03.12.2015 15:24:59
Grafiken
Ich habe folgendes Problem:
Mein Makro kopiert ein Bild mehrfach von einem Tabellenblatt in ein anderes (Tabelle 1 in Tabelle 6; Tabelle 2 in Tabelle 7 usw.).
In der Regel funktioniert das sehr gut allerdings bekomme ich manchmal (ca. 5-10% der Fälle) die Fehlermeldung " Laufzeitfehler 1004, Die Paste-Methode des Worksheet-Objektes konnte nicht durchgeführt werden"
Wenn ich den Debugger aktiviere Zeigt er mir immer die gleiche Code Zeile an jedoch hängt er immer bei einem anderen Tabellenblatt. Sprich: manchmal sind die Blätter 6-8 schon mit logo versehen, manchmal nur Blatt 6 usw.
Wenn ich mein Makro ein 2. mal aktiviere funktioniert es in der Regel
Ich habe bis jetzt noch keinerlei Zusammenhang zu irgendwelchen anderen Aktivitäten in Excel oder auf dem Rechner feststellen können.
In einem anderen Makro in dem ich mit dem gleichen Programmschnipsel das Bild in eine andere Datei kopiere habe ich das gleiche Problem.
Hier mein (aus dem Internet geklauter) Programmschnipsel:
Sub Copy_Logo
dim pct1[, ...] as Picture
With Sheets("Tabelle1").Pictures("Bild 9")
.Copy
Sheets("Tabelle6").Paste 'Zeile des Anstosses
Set pct1 = Sheets("Tabelle6").Pictures("Bild 9")
pct1.Left = .Left
pct1.Top = .Top
End With
End Sub
gibt es für Bilder Spezielle Pastebefehle wie z.B.
.PasteSpecial Paste:=xlPasteFormats
(für Formate)?
Oder könnt Ihr mir sonst einen Tipp geben der diese Fehlermeldung verschwinden lässt?
Herzlichen Dank schon im voraus
Gruß SirSolaris
Anzeige