Вы можете использовать функцию рабочего листа = TODAY (), но очевидно, что она будет обновляться до текущей даты всякий раз, когда книга пересчитывается.
Единственный другой метод, о котором я могу подумать, это, как сказал 1729, кодировать событие Workbook_Open:
Private Sub Workbook_Open()
ThisWorkbook.Worksheets("Sheet1").Range("A1").Value = Date
End Sub
Вы можете уменьшить проблему необходимости того, чтобы пользователь каждый раз принимал макросы, путем цифровой подписи шаблона (в VBA IDE Tools | Digital Signature ...) и выбора цифрового сертификата, однако вам потребуется получить сертификат от коммерческий центр сертификации (см. http://msdn.microsoft.com/en-us/library/ms995347.aspx). Пользователь должен будет выбрать, чтобы всегда доверять этому сертификату при первом запуске шаблона, но после этого он не будет запрашиваться снова.