A po vás chtějí ve škole věci, které jste se neučili? 
Jinak by mělo stačit něco takového:
Range("A1").Value = Date
poradna.net
Neregistrovaný Přihlásit Registrovat