Datumsfixierte Zellen

[blickfang]

Hallo zusammen,

mein Problem ist wahrscheinlich relativ simpel für Euch.

Ich habe eine Tabelle, in der ich die Tagestätigkeiten eintragen möchte.

Der aktuelle Tag immer oben links, rechts dann der kommende Tag und unter dem aktuellen Tag der vergagende Tag ( siehe Anhang).

Meine Formel soll nun selbstständig das Datum jeden Tag ändern das habe ich mit f(x)=HEUTE() gelöst.

Die dazugehörigen Felder (siehe Anhang) A1-A3 sollen ebenfalls selbstständig zu dem nächsten Tag wandern.

Kurze Erläuterung: Was ich in das aktuelle Datum reinschreibe, soll dann mit dem Datum Fixiert nach unten rutschen.

Ist das irgendwie verständlich, was ich meine?

   




Vielen Dank im Vorraus

Kim Klein

[Kuwer]

Hallo Kim,

schreibe das Datum in A2 als Wert rein.
Folgendes Makro schiebt den Tag dann runter und setzt das Datum einen Tag hoch.

Sub NeuerTag()

 Range("A1:E6").Copy

 Range("A7").Insert

 Range("A2").Value = Range("A8").Value + 1

 Application.CutCopyMode = False

End Sub

Gruß Uwe