Thema Datum  Von Nutzer Rating
Antwort
Rot ActiveSheet.Paste funktioniert nicht
16.07.2024 12:28:49 Ani
NotSolved
16.07.2024 14:36:58 xlKing
NotSolved
16.07.2024 15:37:28 Ani
NotSolved
17.07.2024 17:11:30 xlKing
Solved
18.07.2024 09:13:31 Ani
NotSolved
16.07.2024 14:51:41 ralf_b
Solved
18.07.2024 09:36:04 Ani
NotSolved
18.07.2024 09:54:50 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
Ani
Datum:
16.07.2024 12:28:49
Views:
317
Rating: Antwort:
  Ja
Thema:
ActiveSheet.Paste funktioniert nicht

Hallo zusammen,

ich habe ein Problem und bin langsam am Verzewiefeln. Bisher hat mein Makro immer wunderbar funktioniert. Seit paar Tagen bekomme ich jedoch immer bei dem Befehl "ActiveSheet.Paste die Fehlermeldung "Laufzeitfehler 1004: Die Paste-Methode des Worksheet-Objektes konnte nicht ausgeführt werden."

Bei meinen Kollegen läuft das Makro einwandfrei durch. Hat jemand eine Idee, woran das liegen könnte? 

Danke und Gruß

Ani

 

Code:

Sub DatenKopieren()


Dim Pfad As String
Dim urdatei
Set urdatei = Worksheets(ActiveSheet.Index)


    Application.DisplayAlerts = False
    
    Pfad = Sheets(1).Range("V48")
    Workbooks.Open Pfad & "\" & Sheets(1).Range("V49"), Local:=True
    
    Sheets(1).Select
    Range("A1").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    
    ActiveWindow.Close
    Sheets("Tabelle1").Select
    Range("A1").Select
    
    ActiveSheet.Paste
        
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 ActiveSheet.Paste funktioniert nicht
16.07.2024 12:28:49 Ani
NotSolved
16.07.2024 14:36:58 xlKing
NotSolved
16.07.2024 15:37:28 Ani
NotSolved
17.07.2024 17:11:30 xlKing
Solved
18.07.2024 09:13:31 Ani
NotSolved
16.07.2024 14:51:41 ralf_b
Solved
18.07.2024 09:36:04 Ani
NotSolved
18.07.2024 09:54:50 ralf_b
NotSolved