Thema Datum  Von Nutzer Rating
Antwort
18.10.2016 14:10:52 Konstantin
NotSolved
Blau Select Case-Anweisung fehlerhaft
 18.10.2016 14:26:46 Gast72456
Solved
18.10.2016 14:42:44 Konstantin
Solved
18.10.2016 14:54:48 Gast44766
NotSolved

Ansicht des Beitrags:
Von:
Gast72456		 Datum:
18.10.2016 14:26:46		 Views:
698		 Rating:
     
Antwort:
 Nein
Thema:
Select Case-Anweisung fehlerhaft

Hallo,

probiers mal hiermit:

For Each Status In Range(Cells(4, 11), Cells(LastEntry, 11))
   If Not IsError(Status.Value) Then
         Select Case Status.Value
             Case Is = "Future"
                 Status.Interior.ColorIndex = 39
                 Cells(LoopCounterStatus, 14).Interior.ColorIndex = 39
             Case Is = "Ongoing"
                 Status.Interior.ColorIndex = 43
                 Cells(LoopCounterStatus, 14).Interior.ColorIndex = 43
             Case Is = "Due"
                 Status.Interior.ColorIndex = 44
                 Cells(LoopCounterStatus, 14).Interior.ColorIndex = 44
             Case Is = "Overdue"
                 Status.Interior.ColorIndex = 3
                 Cells(LoopCounterStatus, 14).Interior.ColorIndex = 3
             Case Is = "Today"
                 Status.Interior.ColorIndex = 45
                 Cells(LoopCounterStatus, 14).Interior.ColorIndex = 45
             Case Is = "Closed"
                 Status.Interior.ColorIndex = 33
                 Cells(LoopCounterStatus, 14).Interior.ColorIndex = 33
               
         End Select
         LoopCounterStatus = LoopCounterStatus + 1
   End If
Next

Gruß,

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
18.10.2016 14:10:52 Konstantin
NotSolved
Blau Select Case-Anweisung fehlerhaft
 18.10.2016 14:26:46 Gast72456
Solved
18.10.2016 14:42:44 Konstantin
Solved
18.10.2016 14:54:48 Gast44766
NotSolved