Anzeige
Archiv - Navigation
1308to1312
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Makro beim öffnen jeder Datei ausführen

Makro beim öffnen jeder Datei ausführen
29.04.2013 10:22:42
\/\/
Liebe Community,
ich versuche gerade eine eigene Passwortabfrage zu schreiben, da ich den Blatt-/Arbeitsmappenschutz von Excel nicht für besonders sicher halte. Da ich aber nicht jedem das Makro in alle Dateien einspielen möchte, wollte ich wissen, ob es eine Möglichkeit gibt, dass Makro so in der persönlichen Mappe zu hinterlegen und zu schreiben, dass es beim öffnen jeder Excel Datei startet.
Kennt jemand von euch eine Methode, wie dies machbar ist?
Vielen Dank im voraus.
LG \/\/ 03 2 /\/\ "/_

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro beim öffnen jeder Datei ausführen
29.04.2013 10:25:16
Rudi
Hallo,
das kannst du mit einem Addin, das eine eigene Klasse der Application enthält, realisieren.
Sicherer wird das aber auch nicht.
Gruß
Rudi

AW: Makro beim öffnen jeder Datei ausführen
29.04.2013 10:29:40
\/\/
Hallo rudi,
Danke, hast du noch genauere infos zum thema addins und dieser application für mich?

AW: Makro beim öffnen jeder Datei ausführen
29.04.2013 11:05:20
Rudi
Hallo,
ein Addin ist auch nur eine Arbeitsmappe, die als Addin gespeichert wurde.
In DieseArbeitsmappe:
Option Explicit
Dim objApp As clsApplication
Private Sub Workbook_Open()
Set objApp = New clsApplication
End Sub

Klassenmodul 'clsApplication':
Option Explicit
Private WithEvents myApp As Application
Private Sub Class_Initialize()
Set myApp = Application
End Sub
Private Sub Class_Terminate()
Set myApp = Nothing
End Sub
Private Sub myApp_WorkbookOpen(ByVal Wb As Workbook)
'was soll passieren?
End Sub

Gruß
Rudi

Anzeige
AW: Makro beim öffnen jeder Datei ausführen
29.04.2013 11:09:26
\/\/
Super, vielen dank. Ich glaube damit wäre meine frage beantwortet. Ich werde dies einmal probiere

318 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige