Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

MsgBox nach Öffnen der Exceltabelle möglich ?

3 views
Skip to first unread message

Michael Herbich

unread,
Dec 18, 2002, 6:55:45 AM12/18/02
to
Hallo,

ich möchte nach dem Öffnen der Exceltabelle (Excel97) ein
Infofenster einblenden. Beim Starten fragt Excel jedesmal
ob Makros aktiviert oder deaktiviert werden sollen. Wenn
ich dann auch aktivieren gehe wird mir das Fenster nicht
angezeigt. Erst wenn ich auf Makros abspielen (ALT+F8)
gehe, dann wird mir das Textfenster eingeblendet. Wie
bekomm ich das hin, dass es gleich nach "Makros
aktivieren" angezeigt wird ?

Danke,
Michael

Otto Sauermann

unread,
Dec 18, 2002, 7:14:46 AM12/18/02
to
Hallo Michael!

Öffne den VisualBasic Editor, klicke unter VBAProject(Dateiname.xls) den
Ordner "Microsoft Excel Objekte" an, dann doppelklickst du auf
"DieseArbeitsmappe" und gibst in den VB-Editor ein:

Private Sub Workbook_Open()
MsgBox ("Guten Tag")
End Sub

Nach dem Abspeichern der Datei wird jedesmal, wenn du sie öffnest, eine
MsgBox angezeigt, die sagt: "Guten Tag"

Viel Spaß,
Otto


"Michael Herbich" <mih...@web.de> schrieb im Newsbeitrag
news:02a601c2a68c$65ed06a0$cef82ecf@TK2MSFTNGXA08...

Melanie Breden

unread,
Dec 18, 2002, 7:06:23 AM12/18/02
to
Hallo Michael,

"Michael Herbich" schrieb:

dazu musst du deine Meldung in das Workbook_Open-Ereignis in den Codebereich
von "Diese Arbeitsmappe"schreiben.

Private Sub Workbook_Open()
MsgBox "Guten Tag " & Application.UserName
End Sub

mit Gruß
Melanie


Michael Herbich

unread,
Dec 18, 2002, 7:51:35 AM12/18/02
to
Dankeschön, funktioniert.

Gruß,
Michael

0 new messages