VBA Addition

[maninweb]

Hallo,

ich hätte ein paar Anmerkungen zum Handwerklichen; unsortiert.

Im Code zu Schicht_berechnen() hast Du If i < 1 Then Exit For drin. Das macht keinen Sinn, da Du zuvor auf > 0 geprüft hattest.
Im Code zur Funktion indx könntest Du die For-Schleife verlassen, wenn der Wert gefunden wurde.

Du referenzierst mit Cells(...), wodurch Du implizit das aktive Blatt adressierst. Es ist sauberer , eine vollständige Referenzierung
zu verwenden - beispielsweise ThisWorkbook.Worksheets("Januar").Cells(...) und ggf. mit Verwendung von With. Das eliminiert
mögliche Fehler.

Du deklarierst eine (unnötige) globale Variable arr, zudem noch in einem anderem Modul. Das macht es (später, wenn es mal
komplexer wird) schwerer lesbar. Zudem lassen sich Variablen (auch Arrays) an Prozeduren/Funktionen übergeben.

Du typisiert einige Variablen und andere wiederum nicht. Warum? Besser wäre es, das einheitlich zu gestalten und allen
Variablen einen Typ zu geben, wie Dim z As Long.

Integer brauchst Du in der Regel nicht mehr, nimm Long. Nicht verwendete Variablen sollten besser entfernt werden z.B. in
Woche in Schicht_berechnen.

Schreibe ganz oben im Modul als erste Zeile Option Explicit rein, was z.B. die Deklarieren von Variablen erfordert und auch vor
Tippfehler schützt. Nutze dann auch aus dem Menü Debuggen / Kompilieren.

Einrückungen sind gut und machen den Code lesbarer. Das würde ich dann aber konsequent in gleicher Form überall machen.

Gruß