Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
496to500
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
496to500
496to500
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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
Anzeige
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
Anzeige
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
Anzeige
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.
Anzeige
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

Links zu Excel-Dialogen

UserForm MessageBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige