Makro mit Makro öffnen
15.01.2004 08:12:21
Jens
Ich möchte in einem
Private Sub Workbook_Open() Befehl, ein weiteres Makro automatisch starten.
Das sieht wie folgt aus.
Es erfolgt erst mal, beim Öffnen der Datei, eine automatische User Abfrage.
Dann folgt in dem
Private Sub Workbook_Open() Befehl eine Zuordnung von Stringbefehlen, bezogen auf den angemeldeten User.
Jetzt möchte ich dem angemeldeten User noch einen Befehl zuordnen, dass wenn er aufgerufen und erkannt wurde, ein in dieser Arbeitsmappe vorhandenes Makro ausgeführt wird.
Bis jetzt:
Private Sub Workbook_Open()
Dim strBenutzer As String
Dim strInitial As String
strBenutzer = UCase(Environ("username"))
Select Case strBenutzer
Case "Name"
strInitialen = "na"
strVollerName = "Name, Name"
?????Befehl????? Sub Liste_öffnen()
End Select
End Sub
Welchen Befehl muss ich anwenden?
Gruß Jens