Hallo,
meine Fragen sind schon sehr speziell und weil ich gerade lange gesucht habe, wollt ich hier mal wieder fragen ob meine speziellen Dinge sich mit VBA umsetzen lassen. Geht nicht, gibts nicht. Normalerweise xD
Anbei hab ich ein Bild, was aber nur ein Entwurf zur richtigen Excel Datei ist.
Zum Bild:
-F6 ist die erste bewegliche Zelle. Sprich links und oberhalb ist alles fixiert.
-Habe nach Rechts spaltenweise alle Tage bis 2020 bis ins nirgendwo. (AAA)
Ich würde gern via VBA folgendes erreichen:
1.) Sobald die Excel Datei geöffnet wird und sich =HEUTE() in der KW47 befindet, soll sich die gesamte KW46 Woche (Spalten F-L) hinter die fixierten Spalten (C,D,E) schieben. Die oberen Zeilen 1-5 sollen aber immer gleich bleiben. Die aktuelle Kalenderwoche soll immer als erstes nach den fixierten Zeilen kommen. Ist besonders Tricky und ich weiß noch nicht wie ich das realisieren könnte.
2.) Super wäre natürlich auch, wenn man alles was länger als 8 Wochen zurück liegt (also dann [8x7] 56 Spalten löschen könnte.
3.) Hab in meinem richtigen Excel File ein Kalendertabellenblatt, was mir die Tage in Zeilen und Spalten ausgibt. Eventuell könnte man die Tage automatisch in das Haupttabellenblatt laden (also genau 1 Jahr voraus) und immer wieder wenn vorne was rausfällt, hinten "nachpuffern".
4.) Die Zeilen 6,7,8 im Bild immer kalenderwochen-, monats-, und jahresweise Zentrieren und den Text zentriert hinschreiben. Automatisiert.
5.) Der Druckbereich: Diese sollte sich wie zB hier von C1 bis CA33 erstrecken.
Also die 8 Wochen was hinter den fixierten Spalten sind, sollen nicht mitgedruckt werden. Nur die, die auch tatsächlich sichtbar sind.
Hoffe ich konnte auch meine Ideen und Vorstellungen schildern und hoffe das irgendjemand ein paar passende Codeschnipsel in seiner Schatztruhe hat
Wär jedenfalls fürs jede Hilfe dankbar!
Wünsch noch einen schönen Abend,
Markus