Thema Datum  Von Nutzer Rating
Antwort
15.10.2017 14:38:18 Miri
NotSolved
15.10.2017 14:58:35 Miri
NotSolved
15.10.2017 15:30:31 Gast70117
NotSolved
Blau Sheets(i).Select
15.10.2017 15:51:50 Miri
NotSolved
15.10.2017 16:06:25 Gast87992
Solved

Ansicht des Beitrags:
Von:
Miri
Datum:
15.10.2017 15:51:50
Views:
622
Rating: Antwort:
  Ja
Thema:
Sheets(i).Select

Hallo die Meldung lautet:

Laufzeitfehler '1004':

Die Select-Methode des Worksheet-Objektes konnte nicht ausgeführt werden. 

 

das Beispiel hab ich schon gepostet: Hier nochmals:

Sub Makro()
 
Worksheets(3).Activate
 
  Dim WS_Count As Integer
  Dim i As Integer 
  WS_Count = ActiveWorkbook.Worksheets.Count
 
  For i = 3 To WS_Count 
   
Worksheets(3).Activate
   
Sheets(i).Select
 
    Call Makro2
 
  Next i
 
end Sub
 
Ich habe mehrere Excel Tabellen, wo überall die Tabelle 1 und 2 gleich sind, ab Tabelle 3 sind verschiedene Einträge, jedoch indentisch aufgebaut
 
in dem ersten Excel wo ich das alles gemacht habe funktioniert alles super toll
 
jedoch wenn ich die Makros in einem anderen Excel File kopiere oder ausführe (habe schon beides probiert) kommt dann der Laufzeitfehler....
 
 
ich habe mehrere Makros die gleich aufgebaut sind, die sollen alle Tabellen ab Tabelle 3 durchlaufen und dann bestimmte Befehle durchführen.
 
 
ich hoffe jetzt habe ich es besser beschrieben.
 
danke 

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
15.10.2017 14:38:18 Miri
NotSolved
15.10.2017 14:58:35 Miri
NotSolved
15.10.2017 15:30:31 Gast70117
NotSolved
Blau Sheets(i).Select
15.10.2017 15:51:50 Miri
NotSolved
15.10.2017 16:06:25 Gast87992
Solved