Microsoft Excel

Herbers Excel/VBA-Archiv

Select case



Excel-Version: 8.0 (Office 97)

Betrifft: Select case
von: Jens
Geschrieben am: 05.06.2002 - 09:21:04

Kann es sein das ich einer select case anweisung nicht daten verwenden kann?!

Hier mein Beispiel code:

Select Case B22
Case Month(B22) = Month(Hilf) Or Month(B22 + 2) = Month(Hilf)

Workbooks("kalendererstellen.xls").Worksheets("Feiertage").Range("d22").Value = "j"
End Select
Variable B22 und hilf sind vom Typ Date!

Danke im Vorraus

  

Re: Select case
von: Jens
Geschrieben am: 05.06.2002 - 09:28:16

Ich meinte Datumsangaben nicht Daten!
Sorry

  

Re: Select case
von: Joachim L.
Geschrieben am: 05.06.2002 - 10:03:56

Hallo Jens,
so würde die Select Case Anweisung funktionieren Month(B22) wird mit Month(Hilf) verglichen.

Select Case Month(B22)
Case Month(Hilf)
Workbooks("kalendererstellen.xls").Worksheets("Feiertage").Range("d22").Value = "j"
End Select

Ich würde dir eine If Anweisung vorschlagen:
If Month(B22) = Month(Hilf) Or Month(B22) + 2 = Month(Hilf) Then
Workbooks("kalendererstellen.xls").Worksheets("Feiertage").Range("d22").Value = "j"
End If

Gruß Joachim

  

Re: Select case
von: Jens
Geschrieben am: 05.06.2002 - 10:13:37

Danke hat dann auch meinen Fehler gefunden, brauch Selekt case weil ich mehrere Dinge prüfen muss!
Das ganze war nur ein BSP da ich erst nicht auf den Trichter kam in der Select Case anweisung Month zu verwenden!

 

Beiträge aus den Excel-Beispielen zum Thema "Select case"