If - then | HERBERS Excel Forum

Forumthread: If - then

If - then

13.09.2018 10:45:29

Reiner

Guten Morgen zusammen,
ich hab mal wieder ein Problem :
Wenn ein User ( der nicht in festgelegt ist )eine Datei öffnet,
soll eine UserForm erscheinen - wo er seine Userdaten eintragen muß !
mein Code sieht so aus :
beim Öffnen der Datei wird dem Parameter "gast" der Username zugewiesen
gast = Application.UserName
mit dem folgenden Code möchte ich für Meyer & Mueller die Userform NICHT anzeigen,
für alle andern die nicht im Kdo stehen - soll die UsFo angezeigt werden !
If Not gast = "Meyer, Marion" & "Mueller, Peter" Then
UsFo_Gast.Show
End If
Leider erscheint die UserForm bei ALLEN Usern - auch bei Meyer & Mueller !
Wo liegt mein Fehler ?
Besten Dank vorab und einen schönen Tag !!
Gruß
Reiner

10
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: If - then

13.09.2018 10:50:05

Torsten
AW: If - then

13.09.2018 11:00:16

Reiner
AW: AND und nicht OR

13.09.2018 11:10:03

Robert
AW: AND und nicht OR

13.09.2018 11:12:02

Torsten
AW: AND und nicht OR

13.09.2018 11:17:16

Reiner
Gerne und Danke für die Rückmeldung (owT)

13.09.2018 11:28:58

Robert
AW: If - then

13.09.2018 11:11:17

Torsten
IF Formulierungen von Ausschlüssen

13.09.2018 11:18:48

Ausschlüssen
besser Select Case

13.09.2018 13:00:20

Rudi
De gustibus non est disputandum ;-) (owT)

13.09.2018 13:17:05

EtoPHG

AW: If - then

13.09.2018 10:50:05

Torsten

versuch mal
If Not gast = "Meyer, Marion" Or Not gast = "Mueller, Peter" Then

AW: If - then

13.09.2018 11:00:16

Reiner

Hallo Torsten,
leider funktioniert das nicht mit
If Not gast = "Meyer, Marion" Or Not gast = "Mueller, Peter" Then
UserForm.show
end if

AW: AND und nicht OR

13.09.2018 11:10:03

Robert

Hallo,
die Userform soll ja angezeigt werden, wenn der Benutzer nicht "Meyer, Marion" ist und nicht "Müller, Peter", also:

If Not gast = "Meyer, Marion" And Not gast = "Mueller, Peter" Then

Gruß
Robert

AW: AND und nicht OR

13.09.2018 11:12:02

Torsten

Da hast du recht, Robert :-P

AW: AND und nicht OR

13.09.2018 11:17:16

Reiner

Hallo Robert,
funktioniert wunderbar !!!
Vielen Dank an Dich und auch an Torsten für die schnelle Hilfe !!
Grüsse
Reiner

Gerne und Danke für die Rückmeldung (owT)

13.09.2018 11:28:58

Robert

AW: If - then

13.09.2018 11:11:17

Torsten

Was genau funktioniert nicht? Wird die UF nicht angezeigt, oder das gleiche wie vorher, dass bei jedem die UF angezeigt wird?
kannst du die Datei mal hochladen?

IF Formulierungen von Ausschlüssen

13.09.2018 11:18:48

Ausschlüssen

Hallo Reiner,
Ich schlag Dir einen einfachen Trick für solche Ausschluss - If-Formulierungen vor.
1. Formuliere die Ausschluss-Kriterien POSITIV: gast = "Meyer, Marion" OR gast = "Mueller, Peter"
2. Nun setze den Ausdruck aus 1. in Klammern und NEGIERE ihn mit NOT.
3. Am Schluss kommt also raus

If NOT (gast = "Meyer, Marion" OR gast = "Mueller, Peter") Then

Das ist einfacher für das 'geistige' Nachvollziehen und später auch für Code-Leser/Analysen.
Gruess Hansueli

besser Select Case

13.09.2018 13:00:20

Rudi

Hallo,

Select Case gast
case "Meyer, Marion" , "Mueller, Peter"
'mach nix
Case Else
UsFo_Gast.Show
End Select

Application.Username würde ich nicht nehmen. Den kann ja jeder ändern wie er will.
Environ("Username")!
Gruß
Rudi

De gustibus non est disputandum ;-) (owT)

13.09.2018 13:17:05

EtoPHG

Beliebteste Forumthreads (12 Monate)

If - then

Forumthread: If - then

10 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

10
Beiträge zum Forumthread

Beiträge zu diesem Forumthread