Выпадающий календарь в ячейке (выбор даты на листе Excel)

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

Надстройка samradDatePicker (русифицированная) для облегчения ввода даты в ячейки листа Excel.

Добавляет в контекстное меня ячеек пункт выбора даты, а при выделении ячеек, содержащих дату, справа от ячейки отображает значок календаря.

Поместите файл надстройки из вложения в папку автозагрузки Excel (C:\Program Files\Microsoft Office\OFFICExx\XLSTART).

В контекстном меню ячеек появляется новый пункт - "Выбрать дату из календаря".
Рядом с ячейками, в которые уже введена дата, будет отображаться маленький календарик, щелчок по которому вызовет большой календарь - для выбора даты.

Второй прикреплённый к статье файл - та же надстройка, только в которой неделя начинается с понедельника (в оригинале надстройки - с воскресенья)

Пароль на проект VBA - 1 (единица)

PS: Этот макрос написал не я (автор - samrad)
Файл с макросом взят на просторах интернета.
Поскольку макрос делал не я, - доработками его я не занимаюсь, никаких гарантий работы дать не могу, по использованию не консультирую.

Вложения:

Надстройка для выбора даты из календаря на листе Excel	183.16 КБ
Исправленная надстройка (первый день недели - понедельник)	165.6 КБ

308834 просмотра

Настройки просмотра комментариев

Выберите нужный метод показа комментариев и нажмите "Сохранить установки".

Гость, 5 Июн 2021 - 12:56.#1

Супер! Спасибо огромное!

Дмитрий Емельянов, 22 Янв 2021 - 04:09.#2

Благодарю, сам бы точно не додумался) Даже у майков на сайте есть подобные вопросы и на их сайте один из вариантов ссылает на http://samradapps.com/datepicker. Красивая обновленная версия.
Отдельное спасибо за исправление падежей в filldocuments. Теперь со склонением имен ошибку не замечал (бывает только со "слова+номер" непонимает как склонять.

Игорь (администратор сайта), 19 Янв 2021 - 23:40.#3

Здравствуйте, Дмитрий.
Эта надстройка была сделана очень давно, во времена 32-битных версий Office, и несовместима с 64-битным Excel (который у вас)
Чтобы в 64-битном тоже работало, нужно вносить много изменений в код.

Поищите в интернетах доработанную версию этой надстройки.
Искать можно по фразе samradDatePicker 64 bit

Дмитрий Емельянов, 19 Янв 2021 - 23:32.#4

здравствуйте, а у меня выдает ошибку при запуске excel (подписка 365)
Microsoft Visual Basic for Applications
Compile error in hidden module: modMouse.
This error commonly occurs when code is incompatible with
the version, platform, or architecture of this application. Click
•Help' for information on how to correct this error.
как можно исправить?

Гость, 12 Сен 2020 - 04:35.#5

а как изменить макрос на первый день недели "воскресенье"?
заранее благодарю!

Игорь (администратор сайта), 1 Сен 2020 - 19:56.#6

Да, возможно.

Гость, 1 Сен 2020 - 11:43.#7

Возможно ли сделать тоже самое с выбором времени?Что бы ставить время не руками а выбрать из списка числа и в ячейки отобразилось нужное для пользователя число.

Гость, 23 Янв 2020 - 02:44.#8

Почему-то не скачивается

Севак Спартакович, 22 Апр 2019 - 02:24.#9

Добрый день.
Полностью русифицировал, добавил отображение значка «Календарь» во всех ячейках имеющий формат «Дата», а также добавил кнопку «ТД» - текущая дата.
Для не опытных написал макрос («Включить надстройку 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

Гость, 14 Сен 2018 - 22:54.#10

Спасибо, работает как часики.

Гость, 28 Авг 2018 - 12:25.#11

КлаСС Удобно и быстро

Гость, 21 Дек 2017 - 11:55.#12

СПАСИБО ОГРОМНОЕ!!!! Очень сильно облегчило работу

Гость, 15 Июл 2017 - 16:59.#13

Супер!!!

Гость, 16 Май 2017 - 12:03.#14

Отлично работает, огромное спасибо !!!

ZusmeN, 16 Ноя 2015 - 14:42.#15

Ай, СПАСИБААА...

Гость, 14 Окт 2015 - 09:20.#16

Спасибо тебе огромное!!!

Гость, 6 Авг 2015 - 18:14.#17

дай бог тебе здоровья , добрый человек. Клевая штука, аж тащусь

WM, 30 Апр 2015 - 13:26.#18

Спасибо!!! наконец-то я нашла этот волшебный календарик!!! еще раз ОООООООООГРОМНОЕ СПАСИБО!!!!!

Алекс, 8 Апр 2015 - 21:49.#19

Крутая штука, спасибо!

Мария, 27 Мар 2015 - 19:13.#20

Спасибо!!!!!

Владимир, 20 Ноя 2014 - 17:49.#21

Спасибо

Макгрэгор, 29 Окт 2014 - 17:16.#22

Игорь, а как поменять формат вставляемой даты, допустим хочу 20.12.14, а надстройка дает 20.12.2014?

Vik, 25 Июл 2014 - 11:24.#23

Здравствуйте, классный календарик! только...
в книге с общим доступом не фурычит(не работает.)).
Можно ли как-то это исправить?

Гость, 21 Июн 2014 - 13:45.#24

В обычном режиме и режиме разметки страницы надстройка работает, а в страничном (по моему самый удобный режим) - даже не появляется в контекстном меню. Это только у меня так? И если это можно побороть, то как? Спасибо!

Гость, 30 Май 2014 - 00:59.#25

Аналогично. Запустил надстройку, но дата не отображалась. Залез в редактор, полазил. Закрыл, перезапустил ексель - и все заработало. Чудеса программирования))))

Гость, 26 Ноя 2013 - 13:15.#26

Супер! Спасибо огромное! Очень удобно

naxa, 17 Ноя 2013 - 20:12.#27

Календарь не работает в объединенных ячейках! как исправить?

Гость, 28 Сен 2013 - 14:47.#28

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

Игорь (администратор сайта), 24 Сен 2013 - 00:04.#29

если у вас 64-битная Windows, - то не будет работать
(читайте комментарии к статье, - ниже написано, как это исправить, или где найти универсальную версию)

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

Гость, 23 Сен 2013 - 23:35.#30

А для 14 офиса данный скрипт работает? Что-то никак не получается, хотя на 7 установилось с первого раза

Игорь (администратор сайта), 10 Сен 2013 - 13:23.#31

Не знаю, что у вас там катит, или не катит,
но в качестве пароля на проект VBA, цифра 1 подходит к обеим выложенным версиям надстройки
(только что проверил)

Гость, 10 Сен 2013 - 11:54.#32

единичка не катит)

Игорь (администратор сайта), 9 Сен 2013 - 18:30.#33

А вы попробуйте ВНИМАТЕЛЬНО прочитать статью (всего-то несколько предложений), - и, возможно, найдёте там пароль...

Гость, 9 Сен 2013 - 12:48.#34

у меня VBA запаролен, и изменить под 64 разрядку не получается. какой пароль или как это можно сделать по другому
?

Гость, 2 Сен 2013 - 17:21.#35

Надстройка работает в любой ячейке, необходимо вызвать контекстное меню (нажать правую клавишу мыши на требуемой ячейке), в появившемся списке кликнуть пункт "Выбрать из календаря"

Юрий, 12 Июл 2013 - 17:03.#36

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

Если нужны будут даты до сегодняшнего дня, то просто меняем список.

Быстро и сердито.

Игорь, 17 Июн 2013 - 15:33.#37

Для работы этого файла в EXCEL 2010 в системе x64 нужно исправить код, а точнее добавить PtrSafe между Declare и
Function

Евгений, 23 Май 2013 - 10:09.#38

Спасибо большое, искал такую штуку пол года

Александр, 15 Мар 2013 - 16:11.#39

Здравствуйте Антон.
Отличная программа, а почему работает только в ячейках, в которые уже внесена дата?
Помойму, чаще небходимо вносить в ячейку дату, чем ее менять.
Можно сделать так, что бы календарик появлялся на любой ячейке с форматом дата?

Алексей, 12 Фев 2013 - 10:35.#40

Подскажите пожалуйста, почему "Исправленная надстройка (первый день недели - понедельник)" не работает в связке со скриптом записи всех изменений в книге на отдельный лист LOG.
Скрипт в txt выложил на sderni.ru/168193

Игорь (администратор сайта), 11 Фев 2013 - 20:26.#41

Для этого надо в коде найти все WinAPI функции (их там 8 штук, в верхних строках модулей),
и переписать их, сделав универсальными
Как это сделать — написано здесь: http://excelvba.ru/articles/WinAPI

Например, вместо

Private Declare Function GetOSVersion Lib "Kernel32" Alias "GetVersionExA" _
                                      (lpVersionInformation As OSVERSIONINFO) As Long

написать

#If VBA7 Then    '  Office 2010
    Private Declare PtrSafe Function GetOSVersion Lib "Kernel32" Alias "GetVersionExA" _
                                          (lpVersionInformation As OSVERSIONINFO) As Long
#Else    '  Office 2003-2007
    Private Declare Function GetOSVersion Lib "Kernel32" Alias "GetVersionExA" _
                                          (lpVersionInformation As OSVERSIONINFO) As Long
#End If

И так для всех 8 функций

Гость, 11 Фев 2013 - 19:25.#42

подскажите, как настроить для 64-битной системы

Гость, 23 Авг 2012 - 10:38.#43

Сделал кто-нибудь такой вариант?
Хотелось бы чтобы иконка календарика показывалась всегда для определенного диапазона ячеек.

Саша Смирнов, 27 Июл 2012 - 04:30.#44

Просто добавьте кнопку "Выбор даты" в Normal.dotm (то есть это начиная с Word 2007).

R, 3 Июл 2012 - 11:25.#45

Подскажите пожалуйста, где нужно подправить, чтобы иконка календарика появлялась если выделено больше одной ячейки?

Денис, 19 Июн 2012 - 23:32.#46

Добрый вечер,
может кто дать готовую надстройку работающую во всех офисах и разной битности ОС.

За ранее спасибо

KOSTIK1, 6 Июн 2012 - 15:57.#47

Могу предположить, что у вас стоит "Проверка данных" на эту ячейку, поэтому и не идёт. Попробуйте эту надстройку на новом файле, должно работать без проблем.

Гость, 6 Июн 2012 - 10:25.#48

Здравствуйте. Запустил надстройку. Все работает. Только в той ячейке где вставлялась дата, потом не возможно записать уже слово или цифры. Excel ругается "Введенное значение не верно" "Набор значений которые могут быть введены в ячейку ограничен". Ставил в значениях ячейки и текст и числа все равно ругается. Как быть?

rs, 24 Май 2012 - 00:35.#49

Есть ли готовое решение для использования этого календарика не на листе екселя, а на встроенных формах vba? Было бы здорово!

Игорь (администратор сайта), 28 Апр 2012 - 23:16.#50

Да, можно.
Сделайте - вам за это даже спасибо скажут.

Выпадающий календарь в ячейке (выбор даты на листе Excel)

Комментарии

Настройки просмотра комментариев

Отправить комментарий

НАДСТРОЙКИ ДЛЯ EXCEL