Verzweigung
20.01.2013 17:05:10
Marko
ich habe wieder mal ein Problem.
Ich habe in Zelle M6 die Monatsnamen stehen. Also entweder Januar, oder Februar ..oder Dezember.
Wenn nun in dieser Zelle einer der Monate Januar, März, Mai, Juli, August, Oktober oder Dezember stehen, möchte ich das die letzte Zelle in Spalte B nicht größer als 31 ist.
Mein Code sieht so aus:
.
Loletzte = Cells (Rows.Count, 2).End(xlUp).Row
If Cells(6, 13).Value = "Januar" And Loletzte größer 31 Then
Loletzte = ""
End If
Jetzt aber dieselbe if then Verzweigung für alle Monate verwenden ist nicht die elegante Lösung.
Weiß jemand wie ich evtl. mit einer anderen Schleife oder logischen Verknüpfungen das Problem besser lösen kann?
Wenn ich das Größer Zeichen einsetze versendet er mir die Nachricht nicht?
Vielen Dank und viele Grüße
Marko