Как в VBA Excel автоматически вставить текущую дату в ячейку и защитить лист