Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Wie kann man ein Modul ausschließlich auf Knopfdruck starten

Forumthread: Wie kann man ein Modul ausschließlich auf Knopfdruck starten

Wie kann man ein Modul ausschließlich auf Knopfdruck starten
04.09.2025 11:11:06
Karl
Hallo zusammen,

ich hoffe hier Hilfe zu finden. Hier ist die Ausgangslage:

Ich verwalte eine Datei, in der viele Kollegen gleichzeitig arbeiten müssen. D.h. die Datei ist freigegeben. Einige Teile sind auch als Schutz gesperrt.
Ich habe mir nun, um meine Arbeit zu erleichtern, fünf Buttons angelegt, um
1. die Freigabe aufzuheben
2. den Blattschutz aufzuheben
3. alle Autofilter zu löschen
4. den Blattschutz wieder zu aktivieren
5. die Datei wie frei zu geben.
Ich weiß, dass das Aufheben des Blattschutzes per Button bei einer freigegebenen Datei nicht funktioniert, dort bekomme ich eine Fehlermeldung. Gibt es die Möglichkeit, die Blattschutzbuttons so zu programmieren, dass das hinterlegte Modul erst gestartet wird, wenn man den Button drückt? Dass also ein automatischer Start beim Öffnen der Datei verhindert wird.

Ich hoffe jemand hat eine Idee. Vielen Dank schon mal im Voraus.
Anzeige
AW: Wie kann man ein Modul ausschließlich auf Knopfdruck starten
04.09.2025 11:32:53
MCO
Moin!

Du kannst du funktion des Knopfes auch einfach beibehalten aber die Ausführung entspechend anpassen.

Nur Funktion wenn nicht freigegeben:

If ActiveWorkbook.MultiUserEditing Then MsgBox "Mappe ist noch freigegeben, keine Ausführung", vbInformation + vbOKOnly: Exit Sub

'dein Code


'Gruß, MCO
Anzeige
AW: Wie kann man ein Modul ausschließlich auf Knopfdruck starten
04.09.2025 13:08:30
Marc
Ich empfehle da eine Datenbank (Access z.B)
die Daten werden dort gespeichert,
Die Excel Datei dient dann nur zum auslesen, anpassen der Daten..
hier könntest du dann ein Rechte System implementieren, in der Du bestimmte die dann sperrst oder frei gibst..
AW: Wie kann man ein Modul ausschließlich auf Knopfdruck starten
04.09.2025 13:39:45
GerdL
Hallo Karl!
Sub Schaltfläche1_Klicken()


If Application.Caller = "Schaltfläche 1" Then
MsgBox "mach was"
End If

End Sub

Gruß Gerd
Anzeige
AW: Wie kann man ein Modul ausschließlich auf Knopfdruck starten
04.09.2025 11:44:22
Karl
Vielen Dank erst mal. Leider bleibt der Fehler beim Starten der Datei bestehen. Der nennt sich

Systemfehler &H8000FFF (-2147418113), Schwerwiegender Fehler

Google gibt dazu nicht viel her, und die Hilfe bringt gar nichts.
AW: Wie kann man ein Modul ausschließlich auf Knopfdruck starten
04.09.2025 11:49:33
Karl
Ich muss dazu sagen, dass der Fehler nur auftritt, wenn die Datei freigegeben ist. Wenn ich Datei öffne, wenn sie nicht freigegeben ist, kommt auch kein Fehler.
Anzeige
AW: Wie kann man ein Modul ausschließlich auf Knopfdruck starten
04.09.2025 12:10:27
Onur
"Dass also ein automatischer Start beim Öffnen der Datei verhindert wird. " ?
Verstehe ich nicht - es gibt keinen Grund für das Makro, automatisch beim Öffnen zu starten - es sei denn, du hast es selbst einprogrammiert.
AW: Wie kann man ein Modul ausschließlich auf Knopfdruck starten
04.09.2025 12:40:36
Karl
Ich bin davon ausgegangen, weil der Fehler nur auftritt, wenn der Blattschutz aktiv ist und es somit nur an einem der Module liegen kann. Danke für deine Richtigstellung.
Anzeige
AW: Wie kann man ein Modul ausschließlich auf Knopfdruck starten
04.09.2025 12:58:42
Onur
Wenn der Fehler beim Starten der Datei schon auftritt, hat es wohl kaum etwas mit diesen 5 Makros zu tun (genau weiss ich nicht, da ich ja deine Datei nicht kenne).
Ist wohl ein ganz anderes Problem.
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18