Tak týmto makrom vložíš aktuálny dátum (každý den bude iný-aktuálny dátum) do aktuálnej bunky.
Myšou klepneš na bunku a spustíš makro. Na spustenie makra si môžeš priradiť klávesovú skratku.
Sub Makro()
'Vloženie funkcie "=DNES" "=TODAY()"
ActiveCell.FormulaR1C1 = "=TODAY()"
'úprava aktuálnej bunky na obyčajnú hodnotu (zrušenie funkcie)
'a to skopírovaním aktuálnej bunky a vloženie iba hodnoty.
ActiveCell.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
PS - toho ohraničenia bunky sa nelakaj to je výberom pre kopírovanie.
PS2 - to takto na rýchlo bez nejakého rozmýšlania - ber to ako jeden nápad pre tvoju inšpiráciu.