Alles klar soweit !?

Sie befinden sich hier:

Im vorherigen Beitrag haben wir uns bereits mit bedingten Abfragen beschÀfigt, kommen wir jetzt zu der wertebezogenen Auswahl (Select Case).

Am besten erlÀutern wir euch die Auswahl an einem konkreten Beispiel.

Wir deklarieren eine Variable fĂŒr die Auswahl, eine fĂŒr den auszugebenen Text und initialisieren die Zahl-Variable mit dem Wert “1″.

Dim sngZahl as Single 
Dim strText as String sngZahl = 10

Jetzt starten wir unsere Auswahl, die anhand der Variable eine Auswahl trifft.

Select Case sngZahl 
  Case 10 
    strText = "sngZahl hat den Wert 10" 
  Case 20 
    strText = "sngZahl hat den Wert 20"
  Case Else 
    strText = "sngZahl besitzt irgendeinen Wert ausßer 10 oder 20" 
End Select

Im Prinzip ist dieses Beispiel selbsterklĂ€rend, aber wir gehen trotzdem Schritt fĂŒr Schritt durch.
Durch “Select Case” wird die Suche nach dem Wert in der Variable “sngZahl” gestartet. Danach folgen die Suchkriterien. Da wir unserer Variable den Wert 10 zugeordnet haben, wird der erste Fall ausgefĂŒhrt und die Auswahl verlassen. Alle weiteren FĂ€lle werden ignoriert. Ändern wir aber die Variable auf 20 wird der zweite Fall ausgefĂŒhrt und bei einem anderen Wert wird der Else-Fall ausgefĂŒhrt.

Hinweis:
Das obige Beispiel bezieht sich auf eine einfach Auswahl, allerdings habt ihr noch weitere Möglichkeiten eure Auswahl zu erweitern.

Mehrfachauswahl:

Case 10, 20, 30, 40
  strText = "sngZahl hat den Wert 10, 20, 30 oder 40!"

Relationale Auswahl:

Case Is > 50
  strText = "sngZahl ist grĂ¶ĂŸer als 50"

Auswahl fĂŒr Bereiche:

Case 0 To 9
  strText = "sngZahl ist im Wertebereich von 0 bis 9"

Ihr habt noch Fragen oder Anregungen, dann schreibt uns einfach eine E-Mail ĂŒber unser Kontaktformular oder kommentiert diesen Beitrag!

Alles klar soweit !?

 

vorheriger Artikel: nÀchster Artikel:
» «

Geschrieben am: 2. Mai 2013 um 23:25 // Thema: VBA //  Kommentar verfassen

Auf dieses Thema gibt es noch keine Reaktion

Hinterlasse eine Antwort

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind markiert *




Impressum // KlaroBox // die kostenlose Lernkiste