Thema Datum  Von Nutzer Rating
Antwort
Rot Laufzeitfehler 1004 Pastespecial
 28.05.2021 22:43:06 Ilker
Solved
29.05.2021 16:09:43 Gast53680
Solved
29.05.2021 16:50:02 Werner
Solved

Ansicht des Beitrags:
Von:
Ilker		 Datum:
28.05.2021 22:43:06		 Views:
307		 Rating:
     
Antwort:
 Nein
Thema:
Laufzeitfehler 1004 Pastespecial

Hallo zusammen,

ich bekomme beim Ausführen von Pastespecial ein Laufzeitfehler. Wenn ich die aktivierte Zelle ändere, läuft das Makro durch. Beim zweiten mal aber wieder mit Fehler. Könnte jemand mal schauen und mir bitte helfen. Vielen Dank im Voraus.

Sub TransferDetailedEstimate()
Clave = "test"
If MsgBox("This command will owerwrite everything in this Sheet. Do you really want to transfer?", vbYesNo + vbQuestion) = vbYes Then
Application.ScreenUpdating = False
Sheets("Detailed Estimate").Select
Range("D4:D2000").Select
Selection.Copy
Sheets("Detailed Forecast").Select
ActiveSheet.Unprotect Clave
Range("D4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Sheets("Detailed Estimate").Select
Range("L4:L2000").Select
Selection.Copy
Sheets("Detailed Forecast").Select
Range("E4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Range("A4").Select
ActiveSheet.Protect Clave
Sheets("Detailed Estimate").Select
Range("A4").Select
ActiveSheet.Protect Clave
Application.ScreenUpdating = True
Sheets("Detailed Forecast").Select
Else
Exit Sub
End If
End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Laufzeitfehler 1004 Pastespecial
 28.05.2021 22:43:06 Ilker
Solved
29.05.2021 16:09:43 Gast53680
Solved
29.05.2021 16:50:02 Werner
Solved