Часто необходимо заполнять ячейки с датами? Тогда не пропустите этот урок!
🔔 Вместо того чтобы вручную вводить каждую дату, можно написать функцию VBA, которая автоматически заполнит ячейки с датами в заданном диапазоне. Кроме того, функция для автоматического заполнения дат может быть полезна, когда вам нужно заполнить ячейки с определенным диапазоном дат. Например, заполнить столбец с датами на протяжении нужного периода.
Сегодня в уроке рассмотрим примеры которые помогут создать собственную функцию для автоматического заполнения дат.
📢 Не забудьте скачать файл с исходным кодом, размещенным в конце статьи 🔽
▶️ Пример 1. Заполнить ячейки датой с определенным шагом
Функция заполнит столбец A, начиная от определенной даты startDate, заканчивая датой endDate, с шагом stepSize:
🔘 Как использовать функцию?
🔔 Функцию fillDates следует использовать как подпрограмму, а не как формулу.
Для этого необходимо создать следующую процедуру, которая заполнит диапазон ячеек столбца A:
✔️ Результат:
▶️ Пример 2. Заполнить ячейки текущей датой
Функция использует встроенную функцию DateAdd, чтобы добавлять день к текущей дате для каждой следующей ячейки. Таким образом, ячейки будут заполнены датами с интервалом в 1 (один) день.
Код функции выглядит следующим образом:
Данная функция заполняет столбец A с датами, начиная с startRow и заканчивая endRow.
🔘 Пример использования функции:
Код заполнит ячейки в столбце A, начиная с 1-й строки и заканчивая 10-й строкой, текущей датой:
Можно настроить формат даты, используя функцию Format. Чтобы даты отображались в формате "DD MMMM YYYY", изменим код функции:
✔️ Результат: