"Одноразовая" функция в Excel

Excel | 7/2013

Задача: Выполнить функцию только при первом открытии рабочей книги. При последующих редактированиях данной книги функцию не выполнять и содержимое ячеек не менять.

Решение: Необходимо добавить в рабочую книгу макрос:

Private Sub Workbook_Open()
Range("B4").Select
If Excel.ActiveCell.FormulaR1C1 = "" Then ActiveCell.FormulaR1C1 = Now
End Sub

При открытии книги проверяется содержимое ячейки B4.
Если ячейка пуста она заполняется результатом выполнения функции NOW.
Вставляется текущая дата и время.

При следующих открытиях этой книги изменения содержимого ячейки производиться не будет.

Форматирование ячейки можно выполнить заранее.

Смотрите файл примера Book01.zip


Категории: Текст и расчеты, Excel

Выполнение работ

Обучение

  • индивидуальное
  • групповое
  • разработка документации
  • инфографика

 

Программирование
  • конструкторские задачи
  • 2D-3D CAD-системы
  • технологическое ПО
  • задачи в архитектуре, машиностроении, геодезии
  • скрипты и макросы AutoCAD
  • автоматизация офисной работы
  • скрипты и макросы Word, Excel, Visio, ...
  • интранет
  • административные скрипты
  • конвертация документов разных форматов, парсеры