2016-06-17 17 views
2

so habe ich dieses Stück Code hier:Wie man eine Weile mit anderem macht darin

While day = "M" 
      Call Schedule(i) 
     Wend 
     While day = "T" 
      Call Schedule(i) 
     Wend 
     While day = "W" 
      Call Schedule(i) 
     Wend 
     While day = "R" 
      Call Schedule(i) 
     Wend 
     While day = "F" 
      Call Schedule(i) 
     Wend 

gibt es eine einfachere Art und Weise all diese Statements zu schreiben. um Dinge zu klären, habe ich ein Blatt, das wie 2000 Zeilen mit Informationen über Kurse und ich möchte den Code, um die Tage in der Reihenfolge der Wekk lesen: Mo, Di, Mi, Do, Fr so wie kann ich das hier tun.

Vielen Dank im Voraus

+0

Sie werden unabhängig voneinander 5 Schleifen benötigen. Eine für jeden Tag in der von Ihnen gewünschten Reihenfolge. –

+0

Es gibt wirklich nicht genug Code hier, um zu sehen, was Sie tun (wo ist 'Tag' eingestellt?) - Ich vermute, dass die einfachste Sache wäre, eine benutzerdefinierte Art zu tun. – Comintern

Antwort

1

Der einfachste Weg, um mehrere Fälle zu tun ist, mit Select Case

Select Case day 
    Case "M" 
     Schedule(i) 
    Case "T" 
     Schedule(i) 
    Case "W" 
     Schedule(i) 
    Case "R" 
     Schedule(i) 
    Case "F" 
     Schedule(i) 
End Select 
+0

Wenn dies für Sie funktioniert, akzeptieren Sie bitte mit einem grünen Häkchen. – Chrismas007

+0

Ich hatte die Fälle vorher, aber wie ich sagte, ich brauche die Tage, um in Ordnung zu sein, ich hatte buchstäblich diesen Ausschnitt vor seinem nur, dass alles ungeordnet zeigt/nicht die Art, wie ich es will –

+0

@GhaithHaddad Sie müssen mehr von Ihrem Arbeitsblatt teilen und was Sie mit den Daten zu tun versuchen. Ihre Frage, wie sie aussieht, ist unklar. Im Moment ist alles, was Sie gefragt haben, eine einfachere Möglichkeit, Ihren bestehenden Code zu schreiben. – Chrismas007