Case

Forumthread: Case

Case

07.10.2004 08:31:07

Jörg

Guten Morgen,
Könnte mir jemand in wenigen Worten den Befehl "Case" erklären und wie man ihn einsetzten kann?
Recht herzlichen Dank im Voraus
Gruss
Jörg

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Case

07.10.2004 08:47:05

DieterB
AW: Case

07.10.2004 09:19:22

Jörg
AW: Case

07.10.2004 09:27:52

DieterB
AW: Case

Jörg

AW: Case

07.10.2004 08:47:05

DieterB

Hallo Jörg,
Case prüft (z.B.) Felder ab, ob eine Bedingung wahr oder falsch ist.
Ist in manchen Fällen einfacher als verschachtelte If-Abfragen.
Hier mal ein Beispiel (VBA):
Select Case h 'ScreenResolution(0)
'Bildschirmauflösung
'1600*1200
Case 1600
ActiveWindow.Zoom = 195
i = 1200
'1280*1024
Case 1280
ActiveWindow.Zoom = 156
i = 1024
'1152*864
Case 1152
ActiveWindow.Zoom = 139
i = 864
End Select
ausführung eines Befehles (z. B. Messagebox)
Dieses Case prüft ab, welche Bildschirmauflösung der User nutzt.
Je nach Auflösung wird die Excel-Tab gezoomt.
Gruß
DieterB

AW: Case

07.10.2004 09:19:22

Jörg

Lieber Dieter,
Recht herzlichen Dank für die schnelle Antwort.
Ich habe jetzt wieder etwas gelernt.
Nun habe ich einen bestimmten Fall:
In einem Userform gebe ich eine ob eine Zahlung durch "Bank" oder "Cash" gemacht wird. Dazu kann ich Case einsetzen. Das ist OK.
Nun kommt aber noch der FAll von 4 verschiedenen Währungen hinzu. Diese Währungen werden in einem Tabellenblatt definiert.
Ich muss also Buchungen an 8 verschiedene Blätter zuordnen
Cash Währung 1
Bank Währung 1
Cash Währung 2
Bank Währung 2
etc.
Das habe ich noch nicht im Griff.
Gruss
Jörg

AW: Case

07.10.2004 09:27:52

DieterB

Hallo Jörg,
warum 8 versch. Blätter?
Wenn die Währungen in einem anderen Blatt dfiniert werden, kannst du in
deinem 2. Blatt eine Hilfsspalte nehmen, dort mit =tabname!zelle den Wert aus der DefinitionsTab raus holen.
Andere Möglichkeit (ohne VBA), =wenn(cash,und(währung = $.......
oder so ähnlich, sprich, und verknüpfungen und SVerweis
das könnte auch klappen. Es muss ja nicht immer VBA sein.
Wobei: das klingt eher nach einer Datenbankanwendung :-)))
Gruß
DieterB
P.S. es ist manchmal gar nicht einfach, ein Problem nachzuvollziehen, wenn man die Tabelle nicht kennt.

AW: Case

Jörg

Danke Dieter.
Warum in die Ferne schweifen wenn das gute ist so nah.
Ja, hätte ich daran denken müssen.
Gruss
Jörg

Beliebteste Forumthreads (12 Monate)

Forumthread: Case

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

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread