Всплывающий календарь

Если вам часто приходится вводить даты в ячейки листа, то делать это вручную неудобно. Для ввода именно сегодняшней даты можно воспользоваться функцией СЕГОДНЯ (TODAY), сочетанием клавиш Ctrl+; или макросом, но если нужны разные даты из прошлого или будущего, то вбивать их руками долго. 

К сожалению, в стандартном арсенале средств Excel нет встроенного выпадающего календаря (в отличие от Word), да еще и в последних версиях, начиная с Excel 2007, Microsoft зачем-то убрала из стандартного комплекта поставки библиотеку mscalc.osx, которая позволяла быстро создать пользовательскую форму с календарем.

Естественно, это "узкое место" не осталось без внимания опытных пользователей и экспертов Excel MVP, которые оперативно создали несколько интерактивных календарей на макросах для удобного ввода дат. Вот подборка неплохих, на мой взгляд, бесплатных вариантов:

calendar-ron.png Windows Date Picker
Автор: Ron de Bruin
Цена: бесплатно
Ссылка

  • Устанавливается как надстройка (есть версии для старых Excel 200-2003 и для новых Excel 2007-2010 и, отдельно, для Excel 2013. 
  • Вызывается через контекстное меню ячейки (правой кнопкой мыши по ячейке - Date Picker). 
  • Позволяет вставлять дату в нескольких форматах, вплоть до номера недели (по разным стандартам). 
  • Автоматически подстраивается под российский стандарт недели (с понедельника).

calendar-jim-cone.png Excel Date Picker
Автор: Jim Cone
Цена: бесплатно
Ссылка

  • Макрос (не надстройка!) с открытым кодом VBA - можно посмотреть как всё устроено и модернизировать "под себя". Но надо копировать код в каждый используемый файл и вызывать нажатием на кнопку или сочетанием клавиш, т.е. универсальность хромает. 
  • Удобная система прокрутки лет и месяцев. 
  • Российскую неделю (с понедельника) знает. 
  • Каких-либо настроек нет.
calendar-vertex.png Mini Calendar and Date Picker
Автор: VERTEX
Цена: бесплатно.
Ссылка в Office Apps Store

  • Работает только в Excel 2013, добавляется через магазин приложений Office App Store на вкладке Вставка - Приложения для Office (Insert - Office Apps Store)
  • Вставляется на лист как постоянный графический объект и добавляет выбранную дату в любую выделенную предварительно ячейку. 
  • Умеет менять стандарты недели, отображать номера недель, вводить не только дату, но и время. 
  • Есть возможность задавать темы оформления. 
  • Нет кнопки перехода к текущему дню.
datepicker.jpg Date Picker
Автор: Sam Radakovitz, руководитель команды программистов Excel в Microsoft
Цена: бесплатно 
Сайт автора умер, ссылки не работают, но можно скачать заботливо сохраненную мной когда-то копию здесь.

  • Устанавливается как надстройка. 
  • Вызывается через правую кнопку мыши по ячейке - Pick from calendar или с помощью удобного всплывающего значка календарика справа от ячейки с датой. 
  • Красивый дизайн, отображение количества дней до выбранной даты от текущей. 
  • Использует USA-стандарт недели (отображает неделю с воскресенья). 
  • Настроек нет. 
 

P.S.

Установка надстроек:

  • в Excel 2003 и старше - меню Сервис - Надстройки - Обзор (Tools - Add-ins - Browse)
  • в Excel 2007 и новее - Файл - Параметры - Надстройки - Перейти - Обзор (File - Options - Add-ins - Go To - Browse)

Ссылки по теме

 


WarlocK
07.10.2012 12:55:26
Супер! Спасибо огромное!!! Как раз искал способ занесения даты из календаря!!! ВОобще сайт здоровский! Благодаря "фишкам", выложенным тут, я в Excele стал разбираться неплохо! ;)
WarlocK
07.10.2012 12:56:56
Вот здесь полностью русифицированная версия, включая пункты меню и подсказки калькулятора времени по правилам русской орфографии:
http://slil.ru/25559987
Иван
07.10.2012 13:02:38
По ссылке AlexZZZ скачал русскоязычный календарь. Всё работает на 2007-ом Офисе. Никаких вирусов Каспер не увидил.Спасибо за примочку.
А как поставить Воскресение на место?
Serg
07.10.2012 12:57:59
Огромное спасибо! Программка то что надо! Всё работает отлично!
олег
07.10.2012 12:58:31
Минус то что как только срабатывает надстройка пропадает возможность отмены последних действий, и если не сохранишься ,нельзя сделать пару шагов назад, а это иногда необходимо.
07.10.2012 13:04:20
Ну, так это же макрос по-сути. Отмена действий после любого макроса в Excel невозможна, к сожалению :(
30.05.2013 21:18:21
Отмена последнего действия возможна с помощью команды
Application.OnUndo <Заголовок>,<имя восстанавливающего макроса>
31.05.2013 10:51:09
Вадим, команда Application.OnUndo не делает отмену действий, выполненных перед этим макросом, а а всего лишь определяет имя процедуру (которую вы должны сами перед этим написать), при нажатии на кнопку Undo. Так что придется отдельно писать еще и "анти-макрос".
18.04.2014 10:00:36
В общем, я это и имел в виду. Просто есть разница  между "это сложно сделать" и "это невозможно сделать" :)
Сергей М
07.10.2012 12:59:31
А кто-нибудь решал вопрос автоподключения Календаря 10 или Календаря 11 при открытии файла? Файл в котором будет использоваться Календарь используется множеством пользователей и всех конечно же разные версии Excel стоят, вот и выдает ошибку..
Alex_ST
07.10.2012 13:00:19
Сергей М, как раз этот календарь и не использует никакой "экзотики", которая может быть не у всех установлена. Поэтому то и код такой огромный, что им задаётся новая форма, выполняющая функции элемента управления. Это, конечно, достоинство данного календаря, но при построении новых таблиц таскать везде так много кода уж очень лениво. Поэтому в файлах "для себя и своих" я предпочитаю использовать Microsoft MonthView Control 6.0 (SP4) или Элемент управления Календарь 11.0, а уж если для распространения, то придётся юзать такого программного монстра, зато будет работать у всех.
Andrey35
07.10.2012 13:01:52
У меня Office 2010 х64 и то же не работает, может кто помочь?
07.10.2012 13:05:20
Под 64-битным Office не работают многие макросы, т.к. объектная модель другая - надо переписывать код (иногда весьма кардинально).
Вета
07.10.2012 13:03:09
Спасибо! Календарик очень удобный. Нравится, что дата запоминается по последнему введенному числу, не перескакивает на текущую дату.
15.01.2013 17:13:26
А куда делся нормальный календарик, который был на старом сайте???
16.01.2013 18:28:10
Что значит "нормальный"?
03.02.2013 17:52:09
"Нормальный" -  я имел ввиду календарик-макрос. Он был очень удобный. И еще, там в обсуждении было написано где взять его форму, если она изначально отсутствует....
03.02.2013 19:02:09
Начиная с 2007 версии элемент Календарь больше не поддерживается системой. Даже если скопировать библиотеку со старого Office - придется шаманить с бубном, чтобы она в новом заработала. Поэтому я эту статью и не стал переносить со старого сайта - устарела морально, вопросов вызывает больше, чем ответов.
04.02.2013 09:36:45
Честно говоря, я с успехом безо всяких шаманских танцев использовал календарик в 2010м. Просто эксперимент с 2013м оффисом прошел неудачно и пришлось возвращаться на 2010й и вот тут засада. Календарик из библиотеки опять пропал. Вот хотел обновить  - а его нет больше на сайте!!! :oНельзя ли как-то его опять выложить чтоли? Спасибо!
07.02.2013 00:53:31
ОК, подниму архивы
07.02.2013 09:18:24
Ага, спасибо! Буду очень благодарен!
19.01.2013 16:05:25
Для работы этого файла в EXCEL 2010 в системе x64 нужно исправить код, а точнее добавить между Declare и
Function


PtrSafe
07.02.2013 09:17:48
Работаю в Эксель 2010 в системе х64 - ничего не исправлял. Добавил как написано и все работает.....8)
14.03.2013 21:44:23
Система Windows 64-битная или Office 64-битный? Это разные вещи.
06.11.2013 23:55:55
Ооо! Спасибо! Заработало! =)
07.11.2013 00:17:11
по этой ссылке можно скачать русскоязычный "календарик" от AlexZZZ, оптимизированный под 64-битный офис - http://yadi.sk/d/Wn4cOE6_CGCT8
13.03.2013 12:49:25
Это все прекрасно, но как добавить всплывающий календарь в экселевскую таблицу в гугл.докс?
14.03.2013 21:45:05
Это не ко мне. Это вопрос к разработчикам Google Docs.
15.03.2013 19:56:08
Не плохо бы было чтобы календарик сей был еще и с выбором времени!)
Не имеется ли такого?
16.03.2013 12:15:07
Что-то похожееесть у меня в надстройке PLEX
21.03.2013 19:05:43
Николай, а Вы в архивах старый календарик и обсуждения к ниму не поднимали еще?
2010й офис (Win7 x64) на  файлик, который вынесен в шапку, ругается на неверный код.
Файлик, который дан ниже в комментариях ("русифицированный";) требует лишь добавить PtrSafe, о чем так же написано чуть ниже в обсуждении.

Можно ли "правильный" файлик с пометкой про  PtrSafe так же добавить в шапку? - когда "горит", трудно вчитываться в переписку :)


Могу добавить "исправленный" файл, если найду способ, как

заранее спасибо
А какой пароль к VBA?
04.06.2013 23:59:10
Это надо не меня, а автора этой надстройки спрашивать :)
02.11.2013 16:55:30
Николай, не могу скачать файлик с календарем. Проверьте, пожалуйста, ссылку. Давно искала способ работы с календарем в Excel. Но скачать не получается. Помогите :)
03.11.2013 01:09:50
Боюсь, что это с их сайтом проблемы - у них даже картинки не грузятся. Подождите до завтра и попробуйте еще, может технические работы.
07.11.2013 00:18:47
по этой ссылке можно скачать русскоязычный "календарик" от AlexZZZ, оптимизированный под 64-битный офис - http://yadi.sk/d/Wn4cOE6_CGCT8
08.11.2013 15:29:24
Я тоже скачала "календарик" AlexZZZ, все работает! Класс!
26.11.2013 22:43:38
ссылки битые все
03.12.2013 15:21:29
Поправил, а точнее - полностью переписал статью. Пользуйтесь! :)
04.12.2013 11:52:56
Подскажите пожалуйста как вставить даный календарь Excel Date Picker в файл?
05.12.2013 02:52:08
Николай, спасибо Вам за статью.

Проблема с календарем всплывала у меня относительно часто, по каким-то магическим причинам старый объект календарь контрол не работал у клиентов даже в той же версии экселя, где я писал. Пытался шаманить - не шаманилось, духи были на вражеской стороне.

Решение нашел на данном сайте -- https://sites.google.com/site/e90e50/calendar-control-class. Ребята написали календарь в виде класса, который можно импортировать в свой проект. Очень удобно, работает во всех версиях. Понравилось, что можно раскрасить календарь под свой вкус и цвет.

Думаю можно добавить в Вашу статью эту ссылку, может кому поможет.
09.12.2013 09:22:02
Добрый день! Хочу поблагодарить за этот сайт, все удобно и понятно.
16.03.2014 14:58:29
Спасибо, Андрей!
03.02.2014 16:25:27
13.03.2014 13:12:12
Доброго времени суток Николай! Для начало хотелось бы выразить свою благодарность за ответ на мой вопрос и сказать большое спасибо за сайт и возможность черпать необходимую информацию с Вашего сайта!
И вопрос: можно ли создать календарь где в каждой ячейке с датой находилась бы информация т.е таблица excel с проделанной работой или шаблоны с этой таблицей? Для удобства дальнейшего их архивирования и для востоновления сценариев проделанной работы по мере необходимости. Думаю было бы очень удобно в разворачиваемом окне календаря иметь необходимую для работы таблицу.Зарание спасибо!
19.04.2014 09:25:59
Ихтиёр, это уже больше на систему управления задачами похоже (или на Outlook). Я бы делал в каждой ячейке гиперссылку с переходом на соответствующий лист, где хранится информация о задачах в этот день.
31.12.2014 10:30:18
Спасибо за надстройку!
Windows Date Picker
Автор: Ron de Bruin  
13.08.2015 17:45:24
Просто потрясающий сайт. С вопросом своим бьюсь не одну неделю, может поможете.. Есть расписание занятий, где в таблице хаотично расставлены даты, можно ли их систематизировать на отдельном листе по порядку, чтобы они выдавали какие выпадают в этот день ,например, школы и номера занятий...какая формула поможет это сделать? Может можно сюда выложить образец для наглядности?
26.08.2016 17:08:06
Наталья, пришлите лучше файлик с примером мне в почту - гляну, ок?
24.12.2015 09:31:38
Добрый день!
Николай, огромное спасибо вам за сайт на котором очень много информации и полезных статей.
У меня есть вопрос: нашел в интернете календарь переделал под себя все работает, но есть один маленький нюанс когда выбираешь дату то в userform-у дата ставится с не понятным форматом месяц/день/год код пересмотрел не один раз и не могу понять почему такой ставится формат.
Хотелось бы чтоб был что ставилась обычная дата например: 15.01.2015. Буду очень благодарен если по можете в решение проблемы

https://yadi.sk/i/cL-p5ULpmSnGm
26.08.2016 09:03:39
Николай подскажите пожалуйста как в этом календаре изменить формат на дату с временем? Пример: 20.08.2016  16:45:00
26.08.2016 17:07:01
Артур, а какой именно календарь вы имеете ввиду (их в статье 5 штук упоминается)?
28.08.2016 21:41:59
Который самый первый.
Windows Date Picker
Автор: Ron de Bruin
Цена: бесплатно
Ссылка
24.10.2016 09:50:00
Вопрос см. ниже
28.08.2016 21:41:38
Который самый первый.
Windows Date Picker
Автор: Ron de Bruin
Цена: бесплатно
Ссылка  
24.10.2016 08:21:23
Николай Павлов , Здраствуйте
Стоит windows 10 x64 + Exel 2013
На win xp+exel2010 написал макрос в форме vba для ввода даты через  MSCOMCT2.OCX,
Чтоб в форме быстро выбрать дату.
Сейчас при перустоновке системы на новую я снова установис эту библиотеку( всеми спосабами), но все равно у мен яен появляется это наадстройка. Есть вариант приучить ее или пеерходить на другую( какая из присутствующих будут в форму монтироваться)
24.10.2016 08:24:24
userform>toolbox календарь - Microsoft MonthView так и не появился
09.11.2016 13:03:02
Добрый день! Установил Windows Date Picker в Надстройки к Excel 2013, но почему-то всегда после закрытия и сохранения файла данный календарь не появляется в файле.Помогите, что нужно и как сделать так, чтобы календарь открывался после сохранения и нового открывания? Всем откликнувшимся БОЛЬШОЕ СПАСИБО!!!!!
01.02.2017 10:25:19
Добрый день, скачала надтройку для календаря, но мне нужна именно функция, чтобы при занесении руками цифр в столбцы автоматически вплывал календарь, как мне можно это реализовать?
03.10.2018 20:33:07
Добрый день.
Календарь Excel Date Picker .
Все замечательно!
Вопрос, как и где изменить код, чтобы при нажатии кнопки Insert дата появлялась в определенной ячейке, например С6?
Буду очень благодарен за решение.
18.02.2019 11:49:00
Николай Павлов , Здраствуйте.
Скачал Excel Date Picker. Работает отлично. Вот только один вопрос: Как скопировать календарь в новую книгу, чтобы ссылка не открывала скачанный файл. Копирую модули и форму, при нажатии кнопки выдает ошибки. Пользователь я пока не ахти.  
28.02.2019 16:27:09
Добрый день.

Нужна помощь, что нужно изменить что бы при удалении в столбцах L5:P370 значения дата в колонке "А" не проставлялась:

Private Sub Worksheet_Change(ByVal Target As Range)
   
   For Each cell In Target   'проходим по всем измененным ячейкам
      If Not Intersect(cell, Range("L2:P370") Is Nothing Then  'если изменененная ячейка попадает в диапазон A2:A100
          With Range("A" & cell.Row)        'вводим в соседнюю справа ячейку дату
              .Value = Now
              .EntireColumn.AutoFit  
           End With
      End If
   Next cell
End Sub
22.04.2019 00:25:54
Добрый день.
Полностью русифицировал, добавил отображение значка «Календарь» во всех ячейках имеющий формат «Дата», а также добавил кнопку «ТД» - текущая дата.
Для не опытных написал макрос («Включить надстройку Excel через vba.xlsm»), чтобы автоматически установить надстройки.

Инструкция:
1) Две файлы вложить в одну папку («samradDatePicker2019.xla» и «Включить надстройку Excel через vba.xlsm»;
2) Запустить файл «Включить надстройку Excel через vba.xlsm»;
3) Нажать кнопку «Запустить настройку».

Макрос автоматически задаст пути и начнёт установку:
- Полный путь к файлу «samradDatePicker2019»
- Полный путь к папке «AddIns» + «samradDatePicker2019»
- Полный путь к папке «XLSTART» + «samradDatePicker2019»

Скачать: http://sevak-world.web-box.ru/blog/Date-Picker-excel
29.03.2020 16:29:59
Опробовал макрос на exel 2010 - Excel Date Picker.
отлично работает, супер! сейчас приступил к русификации!
06.05.2020 11:00:24
в 2020 году что-нибудь эволюционировало?
01.11.2022 11:20:03
Windows Date Picker - Office 2016. Отлично работает. Русский язык присутствует. Спасибо огромное!
Наверх