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

MsgBox für bestimmte Nutzer ausblenden

Forumthread: MsgBox für bestimmte Nutzer ausblenden

MsgBox für bestimmte Nutzer ausblenden
23.05.2024 17:34:06
Carl
Hallo Zusammen,


ich muss jeden Tag mehrere Makros hintereinander ausführen. Diese Makros rufen MsgBoxen auf, die erst nach Bestätigung den weiteren MakroCode aufrufen.

Die MsgBox zeigt Hinweise zur Benutzung der Datei an. Diese Hinweise sind jedoch nicht wichtig für mich. Gibt es die Möglichkeit eine Prüfung einzufügen, welcher Benutzer die Datei ausführt und dann wenn es sich um entsprechende Nutzer handelt, die MsgBoxes auszublenden. Ich habe schon mal unten eine Codeidee hingeschrieben. Ich kenne aber keinen Befehl für das ausblenden einer MsgBox. Ich das jetzt mal einfach MsgBox.Show genannt.



Sub MsgBoxAusblenden

Dim currentUser As String
currentUser = Environ("UserName")
If currentUser = "Name" .......
''Ab hier weiß ich dann nicht mehr weiter. Am liebsten wäre mir eine Möglichkeit einen Code zu schreiben der ungefähr so aussehen sollte.
.... then
MsgBox.show = false
else MsgBox.show = true

'weiteres Makro

MsgBox.show = true

End Sub


Dank im Voraus
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: MsgBox für bestimmte Nutzer ausblenden
23.05.2024 17:42:15
schauan
Hallöchen,

ist doch schon ganz ok... Bei Verwendung in mehreren Subs setzt Du die Variable am Besten als Public an den Anfang eines Moduls. Dann steht sie nebst ihrem Inhalt allen Subs zur Verfügung. Die Punkte habe ich weggelassen, die gehören da nicht hin.



Public Msgboxshow as Boolean
Sub ...
...
currentUser = Environ("UserName")
If currentUser = "Name" then
MsgBoxshow = false
else
MsgBoxshow = true
End If
...
If Msgboxshow = True Then Msgbox "Das bin ich nicht" Else Msgbox "Ich bin's"
...
End Sub
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige