Hallo Gemeinde,
bezüglich VBA bin ich ein Anfänger und mit meinen "kleinen" Problem etwas überfordert.
Ich habe eine Tabelle (siehe Anhang). In dieser wird eine Art Gant-Diagramm erstellt mit der Eingabe von 2 Datumsangaben. Es wird dabei unterschieden zwischen Urlaub und Projekteinsatz. BEi Urlaub werden die WE rausgerechnet, bei Projekteinsatz die komplette Dauer.
Realisiert habe ich dies mit folgender Funktion (Modul in VBA):
Function Planungstag(von, bis, AT, VP)
If AT >= von And AT <= bis Then Planungstag = 1 Else Planungstag = ""
If VP = "Urlaub" And Weekday(AT, vbMonday) >= 6 Then Planungstag = ""
End Function
AT ist das Datum in Zeile 1
VP ist das Projekt
von / bis ist klar
Felder sind blau gerahmt
Dies funktioniert sehr gut, jedoch sind bis 2000 Zeilen und 370 Spalten so zu berechnen. 740000 Zellen berechnen dauert eben.......Minuten
Wie ist die herangehensweise wenn ich das mit einem Makro lösen möchte um die Berechnungszeit zu minimieren.
Ich komme mit den Zellbestimmungen absolut nicht zurecht.
Vielen Dank für eure Bemühungen Test.pdf
