Hallo,
wenn der abzufragende Bereich verschoben werden soll, kann auch ein Parameter übergeben werden:
z.B.:
call ReCalcUeberstunden(Range("F5:S50"))
Alternativ kann der Bezug auch in einem Namen definiert werden. In dem Fall braucht nur der Name als String übergeben werden:
call ReCalcUeberstunden("UeberstundenDaten")
Der Name kann in Excel anschließend als Dynamischer Bereich definiert werden. Eine Anleitung hierzu gibt es hier. Dann kann man belibig viele Zeilen hinzufügen, ohne das man irgendwelche "Grenzen" im Hinterkopf behalten muss.
Eine Einschränkung gibt es dennoch: Der Tabellenaufbau selbst darf sich jedoch nicht ändern: In der ersten Spalte des Bereichs muss immer der Name sein, in der zweiten die abzubauenden Überstunden; ab der dritten die Überstunden pro Monat.
Werde mal eine Muster-Arbeitsmappe erstellen und hier posten.
LG, Ben
|