Activate-Methode geht nicht?

Private Sub Workbook_Open() ' ThisWorkbook.Worksheets("Inhaltsverzeichnis").Activate tbl_Start.Activate Range("B3").Select ActiveWorkbook.BuiltinDocumentProperties("Author").Value = "xyz" End Sub

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Ralf,
danke für das Feedback.
Na ja, dann möchte ich meinen Kommentar neu formulieren: Ich habe alles getan, was mir möglich war. Besser?
Darum schreibe ich ja hier mein Problem rein, weil ich nicht zu faul bin, sondern weil ich das Problem nicht besser verstehe und einen Profi suche, der das Problem erkennt, bzw. eingrenzen kann.
Neben meinem PC läuft natürlich keine Kamera, die meine Aktivitäten belegen, aber ich kann versichern, das ich unter Google, in meinen Büchern hin und her suche und keine sinnvolle Erklärung gefunden habe. Denn der Code sollte eigentlich sehr wohl funktionieren. Steht auch so im Fachbuch drin.
Deine Fragestellung verstehe ich leider nicht, denn es steht in meinem bereits geschriebenen Code alles drin.
Was der Code machen soll ist eindeutig, dazu gibt es nichts zu kommentieren.
Die Fehlermeldung läuft immer nach folgendem Schema ab, wenn ich die Mappe von MS-Teams runterlade und öffne:
Meldungen >>
1. Die Mappe ist geschützt. Wenn sie der Mappe vertrauen, dann drücken sie ok, wegen der VBA-Codes.
2. Dann wird die Mappe zur Bearbeitung frei gegeben und die ersten VBA-Codes laufen automatisch durch, halt mit Workbook open
3. Dann kommt die Bug-Meldung >> Laufzeitfehler-Meldung 1004: Die Activate-Methode des Worksheet-Objektes konnte nicht ausgeführt werden.
Und da ist es egal, wenn ich folgende Aktionen probiert habe:
- Passwort im Sheet vorher öffnen und wieder schließe, oder
- nur Author aktiviere, oder
- nur das Sheet "Inhaltsverzeichnis" als erstes anzeigen lassen möchte, oder
- wie von MS beschrieben ich "Application.ScreenUpdating" ein und wieder ausschalten soll, oder
- ich die Zelle A3 nicht schützen und dann aktivieren möchte.
Egal was ich mache, es kommt immer wieder die Fehlermeldung.
Persönliche Anmerkung:
Also, auch wenn ich schon einiges in Excel gelernt habe, bin ich bis heute immer noch weit davon entfernt mit dem Wissen der Profis hier im Forum mitreden zu können. Was ich aber auch eindeutig klar stellen möchte, ich bin nicht faul, sondern versuche das Problem grundsätzlich alleine zu lösen. Das einzige was man mir nachsagen kann ist, wenn ich ein wenig länger gesucht hätte, dann wäre ich auf die Lösung selber gekommen. Das ist mir einmal passiert, weil ich hier überhaupt keine Antwort bekommen hatte.
Also, seid bitte nicht so streng mit mir, denn mit meinen Fragen habe ich durchaus auch unter Euch Profis eine interessante Diskussion angeregt. Alleine die Diskussion über Integer und Long war schon sehr spannend und lehrreich für mich.
In diesem Sinne "PEACE"
GLG Eisi :-)

Private Sub Workbook_Open() ThisWorkbook.BuiltinDocumentProperties("Author").Value = "xyz" If Application.ProtectedViewWindows.Count > 0 Then If ThisWorkbook.Name = Application.ProtectedViewWindows(1).Workbook.Name Then Exit Sub End If Application.Goto ThisWorkbook.Worksheets("Inhaltsverzeichnis").Range("A3") End Sub

Hallo Ralf,
die Lösung funktioniert, aber nachdem das Ziel ja auch sein soll, dass das Sheet Inhaltsverzeichnis aufgerufen wird, brauche ich die Abfrage nicht machen.
Dann trage ich generell den Ersteller der Excel-Mappe ein und der User muss selber das erste Sheet aufrufen. Ist zwar uncool, aber hilft nichts.
Aber vielleicht liegt es doch am Office 365 und unserer IT-Abteilung, denn es haben sich schon andere User über Excelprobleme beschwert.
Im letzten Jahr hat der Code einwandfrei funktioniert und jetzt nicht mehr. Habe ich intern belegen können.
Das wichtigste ist aber, dass die Mappe grundsätzlich genutzt werden kann, egal welches Sheet jetzt zuerst erscheint.
Mal schauen ob die IT-Abt. da noch was als Erklärung anbieten kann.
Vielen herzlichen Dank für Dein Fachwissen.
GLG Eisi :-)

Beliebteste Forumthreads (12 Monate)

15 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

15
Beiträge zum Forumthread

Beiträge zu diesem Forumthread