For...Next Schleife mit variablem Startwert
13.01.2025 08:50:00
Max
Ich habe folgende Problematik:
In einem Kalender tragen sich MA ein, wenn diese ins HomeOffice gehen wollen.
Diese MA sitzen allerdings an drei unterschiedlichen Standorten und sind in zwei Arbeitsgruppen unterteilt. Das heißt ein Standort ist gesplittet.
Die Auflistung in der Tabelle ist nach Arbeitsgruppen. Die Kapazitäten der Laptops ist allerdings je Standort limitiert.
For lngZeileStartPdm = 33 To lngZeileMaxPdm 'Schleife für Postdam
If Not .Cells(lngZeileStartPdm, lngSpalte).Interior.ColorIndex = xlNone Then
lngIndexPdm = lngIndexPdm + 1
End If
Next lngZeileStartPdmIn dieser Schleife ist der Start mit Zeile 33 festgelegt. Sollte allerdings personelle Veränderung stattfinden müsste jedesmal im Editor dieser Wert verändert werden.
Im worst-Case sind das vier Schleifen die von Menschen geändert werden müssen, die wenig Ahnung von VBA haben.
Ich hätte gerne das Excel sich den Startwert (aktuell 33) aus einer Zelle eines Arbeitsblattes zieht.
Sämtliche Variablen sind aktuell als Long definiert.
Aus Datenschutzgründen kann ich nicht die Datei hochladen, aber ich denke der Abschnitt ist der relevante und die Informationen sind aussagekräftig genug.
Gruß Max
Anzeige