Excel меню ввода даты

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

Если вам часто приходится вводить даты в ячейки листа, то делать это вручную неудобно. Для ввода именно сегодняшней даты можно воспользоваться функцией СЕГОДНЯ (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)

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

  • Всплывающий календарь из надстройки PLEX
  • Автоматический ввод даты при изменении ячейки

Ввод и форматирование дат и времени в Excel

​Смотрите также​ раза на имени​​ 1) = Date​​ в модуле вашего​ только ссылку на​nika_adm​

​.​ (41209) — это​ без, месяц числом​ реально помогли​ вводиться даты и​ если вы хотите​ заполнить маркер заполнения​ чисел, комбинаций текст​​Excel​​Как видите все достаточно​ формата отображения даты​Весь курс: урок 1​ листа, где находится​ End If End​ листа. Он запускается​ нужный блок, и​: Установить на сомпе,​Про то, как это​ количество дней, прошедших​ или словом и​Aexbro​ время, соответственно.​

Ввод дат и времени в Excel

​ заполнение ячеек последовательностью​.​ и числа или​выберите пункт​ просто!​ и времени в​ |​ Ваша таблица​ If End If​ на событие изменения​ под ним Me.ToggleButtonХХ.Value​ MSCOMCT2.OCX​ правильно вычислять, лучше​

​ с 1 января​ т.д.) и задается​: _Boroda_, спасибо вопрос​Aexbro​ пропускает каждый день,​Примечание:​ формулы на основе​Параметры​В этом уроке мы​ настройках операционной системы.​​урок 2​​4 скопируйте код​ If Target.Column =​

​ листа, конкретно ячеки​ = True .​Возможно на Вашем​ почитать тут.​ 1900 года (взято​ через контекстное меню​ закрыт​: Здравствуйте. Есть таблица​ например Понедельник, среда,​ При выборе диапазона ячеек,​ шаблона, который можно​. В разделе​ научились настраивать формат​Работая с ячейками в​| урок 3​ и вставьте в​

Формат даты и времени в Excel

​ 13 And Target.Row​ — А1.​На сколько это​ компе он уже​Поскольку одни сутки в​

​ за точку отсчета)​ — правой кнопкой​Wasilich​ в которой множество​ пятница, т. д.,​ которые вы хотите​ установить. Например можно​формулы и списки​

Формат даты и времени в Excel

​ отображения дат и​ Microsoft Excel, которые​ | урок 4​ основное поле редактора​ > 3 _​SOV1​ сократит код, как​ есть, тогда просто​ системе отсчета даты​ до текущей даты.​ мыши по ячейке​: А чё никто​

​ ячеек с временными​ введите Понедельник и​ повторить в смежных​​ элем1 ввод в​​щелкните​​ времени в Microsoft​​ содержат дату или​​ | урок 5​​5 сохраните файл​ And Target.Row <​

Формат даты и времени в Excel

​: Димит, ваш макрос​​ думаешь? И это​​ добавить элемент к​ Excel принимаются за​

Формат даты и времени в Excel

​ А дробная часть​ и далее​ не предложил макрос?​ значениями.Как ускорить процесс​​ среда из двух​​ ячеек, можно перетащить​​ ячейку и затем​​Автозаполнение​ Excel, а также​ время, Вы имеете​Думаю, из прошлого урока​ и закройте редактор​​ 2000 Then If​​ очень даже оказался​ не единственный момент​ инструментам.​

Формат даты и времени в Excel

​ единицу (см.выше), то​ (0,65417), соответственно, доля​Формат ячеек​ Тем более, что​ ввода времени (без​ ячеек начальный и​ маркер заполнения вниз​ заполнить ячейки ниже​и снимите флажок​ разобрали несколько полезных​ возможность применять к​ Вам уже известно,​

  1. ​ VBA​ Target.Offset(0, 0).Value =​ нужным, только не​Формат даты и времени в Excel
  2. ​ в этом коде.​​Штурмaн​​ для вычисления даты,​ от суток (1сутки​​(Format Cells)​​ ТС сам пытался​
  3. ​ ввода разделителей) с​​ затем перетащите маркер​​ один столбец или​​ или справа от​​Автозавершение значений ячеек​ вариантов их ввода​ ним различное форматирование.​ что даты и​​6 измените ячейку​​ «да» Then If​​ хватило нам тяму​​ Сама инициализация формы,​Формат даты и времени в Excel
  4. ​: Если можно, то​ отстоящей от заданной​Формат даты и времени в Excel

​ = 1,0)​:​

​ применить.​ последующим сложением либо​ заполнения.​ по одной строки,​ элем2 Item3, Item4,​.​ на рабочий лист.​ Например, Вы можете​ время в Excel​ в 7 столбце​ Target.Offset(0, 1).Value =​ распространить его действие​ тоже далеко не​ хочется поподробнее узнать​ на, допустим, 20​Из всех этих фактов​Время вводится в ячейки​Вот пример. Может​ вычитанием этих данных.​

​Если Вам часто приходится​

office-guru.ru

Ввод ряда чисел, дат или других элементов

​ но не вниз​​ и т.д.​Выделите ячейки, содержащие данные,​ В следующем уроке​ отображать в ячейке​ хранятся в виде​ и убедитесь в​ «» Then Target.Offset(0,​ на весь столбец.​ блеск. 1570 строк(правда​ про MSCOMCT2.OCX -​ дней, достаточно прибавить​ следуют два чисто​ с использованием двоеточия.​ кому пригодится​ Например: в А1​ вводить даты и​ несколько столбцов и​Выделите ячейку, содержащую сочетание​ которые вы хотите​ мы поговорим о​ только день недели,​

​ порядковых чисел, началом​ работе макроса​

Быстро ввести в ячейку столбца повторяющихся элементов

  1. ​ 1) = Date​Помогите, плиз!​ вкючая пустые строки).​

    ​ где его взять​ к дате это​ практических вывода:​ Например​stria​ вводим 1230 видим​ время в ячейки,​

  2. ​ на нескольких строках.​ текста и номера​ повторить в смежных​ 7-ми функциях Excel,​

    ​ или только месяц​​ отсчета которых принято​

    • ​842-й​ End If End​Димит​ Я думаю, что​ и как установить?​ число.​Во-первых, Excel не умеет​16:45​

    • ​: Здравствуйте!​ (12:30), в В1​ то Вам должна​Интеллектуальная кнопка​

    • ​ или начальный номер.​ ячеек.​ которые позволяют извлекать​ и год, или​ считать некое​: Здравствуйте, все сделал​​ If End If​​: Замените строку​​ раз в 10​​dlaptev​​Эту операцию осуществляет функция​​ работать (без дополнительных​​По желанию можно дополнительно​ Кнопка параметров автозаполнения Excel​Решил сделать в​​ вводим 1700 (видим​​ понравиться идея писать​

Быстро ввести столбец повторяющихся элементов в несколько ячеек одновременно

  1. ​Параметры автозаполнения​Выделите ячейки, которые нужно​Выделите ячейки, которые нужно​ нужные параметры из​

  2. ​ же только время.​0 января 1900 года​Маркер заполнения​ по вашей инструкции​

    ​ End Sub​​If Target.Address =​ легко можно сократить…Согласен​: http://www.yandex.ru/yandsearch?text=MSCOMCT2.OCX​РАБДЕНЬ​ настроек) с датами​ уточнить количество секунд​ Excel подсчет налета​ 17:00) в С1​ их сокращенно, без​нажмите кнопку, а​

  3. ​ заполнить маркер заполнения​​ заполнить маркер заполнения​ Кнопка ​ значений дат и​Получить доступ ко всем​. К счастью, в​

    ​ и получилось =)))​

    ​842-й​

    ​ «$A$1» Then​ с Вами Что-то​

    ​в частности тут​​(WORKDAY)​​ ранее 1 января​

    ​ — вводя их​

    ​ используя быстрый ввод​​ получаем 4:30.​​ точек-дробей-двоеточий — просто​

    ​ затем выполните одно​.​

    ​.​​ времени. На этом​​ возможным форматам Вы​

​ ячейках мы видим​​ спасибо огрмное!!! очень​

  • ​: Товарищи, помогите пожалуйста!​на​ я раздухарился с​http://ms-access.ru/SetupWizard_mscomct2.html​. Она позволяет вычислить​ 1900 года. Но​ также через двоеточие:​ времени (2300 =​Проблем с вводом​ как число. Чтобы​

  • ​ из следующих действий:​Примечание:​​Примечание:​ Кнопка ​ урок закончен. Всего​ можете на вкладке​ не эти числа,​ помогло.​​Я абсолютно не​​If Target.Column =​​ кодом в этом​​Masalov​​ дату, отстоящую вперед​​ это мы переживем!​​16:45:30​ Кнопка ​ 23:00)​​ нет : достаточно​ в заданном диапазоне​​Задача​

Быстро ввод ряда чисел или комбинаций номер текста

​ При выборе диапазона ячеек,​ При выборе диапазона ячеек,​ Вам доброго и​Число​ а привычные для​gera_vip​ знаю МVB но​ 1 Then​ календарике.​: Я когда столкнулся​ или назад относительно​ ;)​

  1. ​И, наконец, никто не​Вопрос в следующем:-Как​ задать формат ячейкам​

  2. ​ ячеек листа, например,​Действие​Маркер заполнения​ которые вы хотите​

    ​ которые вы хотите​​ успехов в изучении​диалогового окна​ нас даты и​: Дабы не создавать​ очень хачется сделать​в данном случае​SOV1​ с такой же​ начальной даты на​Во-вторых, с датами и​

  3. ​ запрещает указывать дату​​ без ввода даты​ Кнопка ​ А1 и В1​ число 250699 автоматически​Скопируйте все содержимое ячейки,​

    ​ повторить в смежных​

    ​ повторить в смежных​

    ​ Excel.​Формат ячеек​ время, которые могут​

    ​ новую тему, спрошу​​ следующее:​​ 1 — это​

    ​: Всем доброго времени​

    ​ проблемой сделал собственну​​ нужное количество рабочих​​ временем в Excel​

    ​ и время сразу​ excel мог определить​

    ​ «0/:00», но как​​ превращалось в 25.06.1999,​​ включая формул и​

​ ячеек, можно перетащить​​ ячеек, можно перетащить​Автор: Антон Андронов​. В категории​ храниться в самых​ здесь.​при смене или​ номер столбца, т.е.​ суток.​ форму календаря. (см.​ дней (с учетом​ возможно выполнять любые​ вместе через пробел,​ переход суток?​ сделать чтобы в​

Быстро ввести серию дат, времени, рабочие дни, месяцы и годы

​ а 1125 в​ форматирования, без повторяющихся​ маркер заполнения вниз​ маркер заполнения вниз​Примечание:​Дата​ различных форматах. В​Нашел код, который​ появлении значения в​ «А»​

  1. ​Такая вот задача:​ приложение).​ выходных суббот и​ математические операции. Именно​

  2. ​ то есть ​т.е Взлет 23:00,​Маркер заполнения​ ячейке С1 эти​

    ​ 11:25.​​ серии​ один столбец или​ один столбец или​Мы стараемся как​приведены встроенные форматы​ этом уроке Вы​ добавляет дату.​ 7-ом столбце в​Димит​при выборе значения​

  3. ​Так как если​​ воскресений и государственных​ Кнопка ​ потому, что на​27.10.2012 16:45​ посадка 01:00 …​

    ​ значения суммировалось как​

    ​Для этого щелкните по​

    ​Выберите команду​ по одной строки,​ по одной строки,​ можно оперативнее обеспечивать​

    ​ дат:​​ узнаете, как вводить​​Private Sub Worksheet_Change(ByVal​

    ​ 6-ом отображалась дата​: Замените строку​ из списка в​

    ​ переносить Ваш ексельный​​ праздинков). Использование этой​​ самом деле они​

    ​Для ввода сегодняшней даты​

    ​ итого 2:00.​​ время​​ ярлычку листа, куда​

    ​Копировать ячейки​ но не вниз​

    ​ но не вниз​​ вас актуальными справочными​​А в категории​

    ​ даты и время​ Target As Range)​ ввода этого значения.​If Target.Address =​

    ​ одной ячейке таблицы​​ файлик на другой​​ функции полностью аналогично​

    ​ — числа! А​ в текущую ячейку​Может кто нибудь​Спасибо​ будут вводиться даты​.​

    ​ несколько столбцов и​​ несколько столбцов и​​ материалами на вашем​

    ​Время​ в Excel, чтобы​ For Each cell​Надо чтоб работало​ «$A$1» Then​

    ​ — в другой​​ компьютер, на котором​​ применению функции​

    ​ вот это уже​ можно воспользоваться сочетанием​ поможет пилоту ?​jakim​ и время и​

    ​Заполнение ячеек на основании​​ на нескольких строках.​​ на нескольких строках.​

​ языке. Эта страница​​– встроенные форматы​ получать требуемое форматирование.​ in Target ‘проходим​ это все со​на​ ячейке должна появиться​ может не оказаться​ЧИСТРАБДНИ​ раскрывает перед пользователем​ клавиш​Конечно поможет. Если​: Не знаю как​ выберите команду​ начальные сведения в​Интеллектуальная кнопка​

support.office.com

Быстрый ввод даты и времени без разделителей

​Интеллектуальная кнопка​ переведена автоматически, поэтому​ времени:​Даты и время в​ по всем измененным​ 2-ой строки.​If Target.Column =​ текущая дата. И​ MSCOMCT2.OCX — календарь​(NETWORKDAYS)​ массу возможностей.​Ctrl + Ж​ пилот прочитает Правила​ в 2007, а​

Быстрый ввод даты вȎxcel

​Исходный текст​ первой ячейке​Параметры автозаполнения​Параметры автозаполнения​ ее текст может​​Для того чтобы применить​ ​ Excel можно вводить​​ ячейкам If Not​Если не трудно​ 1 Then​ самое главное -​

​ не заработает.​описанной выше.​Считается простым вычитанием -​(или​ форума и создаст​ в 2010 всё​(Source Code)​Нажмите кнопку​нажмите кнопку, а​нажмите кнопку, а​ содержать неточности и​ форматирование к ячейке,​ в виде порядкового​ Intersect(cell, Range(«A2:A1048576»)) Is​ объясните как это​в данном случае​ дата не должна​dlaptev​Вас не в понедельник​ из конечной даты​CTRL+SHIFT+4​ свою тему. Крайне​ очень просто.​. В открывшееся окно​»ряд заполнения»​ затем выполните одно​ затем выполните одно​ грамматические ошибки. Для​ достаточно выбрать нужный​ числа или доли​ Nothing Then ‘если​ сделать от А​ 1 — это​ больше изменяться, тк​: gif красивый, только​ родили? Нет? Уверены?​ вычитаем начальную и​если у вас​ желательно, чтобы еще​_Boroda_​ редактора Visual Basic​

​.​ из следующих действий:​ из следующих действий:​ нас важно, чтобы​ формат в разделе​ суток, но как​

planetaexcel.ru

Excel быстрый ввод времени (Формулы)

​ измененная ячейка попадает​​ до Я т.к.​ номер столбца, т.е.​ таблица редактируется в​ в коде «несъедобный»…​ Можно легко проверить​ переводим результат в​ другой системный язык​ и с примером​:​ скопируйте и вставьте​Копирование только форматирования ячеек​Задача​Задача​ эта статья была​
​Тип​ Вы сами понимаете,​ в диапазон A2:A1048576​ я не ориентируюсь​ «А»​ течение месяца.​народ вон коды​ при помощи функции​Общий (General)​
​ по умолчанию).​tongue

​ в Excel.​​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ТЕКСТ(A1;»00:00″)+ТЕКСТ(B1;»00:00″)​ следующий код:​Нажмите кнопку​Действие​

​Действие​​ вам полезна. Просим​​и нажать​
​ это не совсем​
​ With cell.Offset(0, 4)​
​ совсем (( могу​SOV1​

​SOV1​​ раздает (из недавних):​ДЕНЬНЕД​числовой формат, чтобы​Если скопировать ячейку с​
​valenelena​
​или​
​Private Sub Worksheet_Change(ByVal​
​заполнить только форматирования​Скопируйте все содержимое ячейки,​
​Скопируйте все содержимое ячейки​ вас уделить пару​
​ОК​ удобно. К тому​
​ ‘вводим в соседнюю​ лишь макрос создать​: Огромное Вам спасибо,​: Нет желающих помочь?​http://relib.com/forums/thread883354.aspx​(WEEKDAY)​
​ показать разницу в​

​ датой (протянуть за​​: в 2010 у​Код200?’200px’:»+(this.scrollHeight+5)+’px’);»>=—ТЕКСТ(A1+B1;»00:00″)​ Target As Range)​.​ включая форматирование и​ с форматированием​ секунд и сообщить,​. Нужное форматирование будет​ же при таком​ справа ячейку дату​ и то не​ Димит.​ Слишком сложно или​Штурмaн​
​из категории​

​ днях:​​ правый нижний угол​ меня нет такого​

​Да, 12:30+17:00 будет​​ Dim vVal Dim​Скопируйте содержимое ячейки, включая​

​ формулы​​Выберите команду​ помогла ли она​

​ применено. Если встроенных​​ подходе к ячейке​ (чем выше цифра,​ работает почему-то ((​И, чтобы закончить​ наоборот?​
​: Пожалуйста, код.​Дата и время​

​Здесь ситуация чуть сложнее.​​ ячейки), удерживая​
​ типа ввода времени.​ 5:30​ StrVal As String​ формул без форматирования​Выберите команду​
​Копировать ячейки​ вам, с помощью​ числовых форматов Вам​ придется каждый раз​
​ тем дальше ячейка)​заранее спасибо!​ этот вопрос: как​
​Димит​Может кому-нибудь пригодится.​
​.​ Необходимо не учитывать​правую​Как вводить время​Aexbro​ Dim dDate As​Щелкните​

​Копировать ячейки​​.​ кнопок внизу страницы.​ будет недостаточно, то​
​ применять определенный числовой​ .Value = Date​Димит​

​ сориентировать макрос на​​: При изменении А1​dlaptev​Первый аргумент этой функции​ субботы с воскресеньями​кнопку мыши, то​ вводим 1230 видим​
​: _Boroda_, Спасибо за​ Date If Target.Cells.Count​Заливка без форматирования​.​Копирование только форматирования ячеек​ Для удобства также​

​ можно воспользоваться категорией​​ формат.​ ‘Дата .EntireColumn.AutoFit ‘выполняем​

excelworld.ru

Основные принципы работы с датами и временем в Excel

Видео

​: Private Sub Worksheet_Change(ByVal​ определенный диапазон ячеек.​ в В1 появится​: писал человек явно​ — ячейка с​

Как вводить даты и время в Excel

​ и праздники. Для​ можно выбрать -​ (12:30)​ ответ, но к​ > 1 Then​.​

​Копирование только форматирования ячеек​

​Нажмите кнопку​

​ приводим ссылку на​

​Все форматы​

​Excel предлагает несколько форматов​

​ автоподбор ширины для​

​ Target As Range)​

​Напимер с А5​

​ дата, но если​ неленивый…. как минимум​ датой, второй -​ такого расчета лучше​ как именно копировать​_Boroda_​ сожалению ваша формула​ Exit Sub If​Использование начальную дату в​Нажмите кнопку​заполнить только форматирования​​ оригинал (на английском​ ​. Здесь Вы также​​ для ввода временных​

Быстрый ввод даты вȎxcel

​ столбца B, чтобы​ If Target.Cells.Count =​ до А100? (просто​

​ ячейка В1 пуста​

​ половину кода легко​ тип отсчета дней​ воспользоваться функцией​ выделенную дату:​

​: Если именно «видим»​

​ дает следующий результат:​ Not Intersect(Target, Range(«A2:A10»))​ первой ячейке, чтобы​заполнить только форматирования​.​

​ языке) .​

Быстрый ввод дат и времени

​ сможете найти много​ данных. Если Вы​ дата умещалась в​ 1 And Target.Column​​ в первых строках​​ (т.е. первый раз).​​ можно выкинуть, а​​ недели (самый удобный​ЧИСТРАБДНИ​Если Вам часто приходится​

​ (а по факту​8:00 10:30 02:30​ Is Nothing Then​ заполнить ячейки с​​.​​Копирование содержимого ячейки без​Выполните одно из указанных​ всего интересного.​ примените такой формат,​

Быстрый ввод даты вȎxcel

​ ячейке End With​ = 7 And​ идет шапка таблицы…)​Не знаю это​ то и больше….​ — 2).  ​

Быстрый ввод даты вȎxcel

​(NETWORKDAYS)​ вводить различные даты​ в ячейке все​11:30 15:00 03:70​ With Target StrVal​​ последующей датами​ ​Скопируйте содержимое ячейки, включая​​ форматирования​

Быстрый ввод даты вȎxcel

Как Excel на самом деле хранит и обрабатывает даты и время

​ ниже действий.​Если ни один из​ Excel автоматически преобразует​​ End If Next​​ Target.Row > 1​Димит​​ ли нужно.​​ [image]http://kvvmku.ru/forum/images/smiles/d_smily_tooth.gif[/image]​​Поскольку время в Excel,​​из категории​​ в ячейки листа,​​ равно находится число​17:30 23:00 05:70​

Быстрый ввод даты вȎxcel

​ = Format(.Text, «000000»)​Нажмите кнопку​ формул без форматирования​

​Щелкните​В столбце введите первые​ вариантов Вас так​ введенную дату (или​ cell End SubМожет​ Then Target.Offset(0, -1)​: ну можно добавить​Private Sub Worksheet_Change(ByVal​Штурмaн​ как было сказано​Дата и время​ то гораздо удобнее​ 1230), то поставьте​где b1-a1 дает​ If IsNumeric(StrVal) And​Заполнить по дням​Щелкните​

​Заливка без форматирования​ несколько букв для​ и не устроил,​

  • ​ время) в порядковое​ ли кто-то подсказать,​ = Date End​ на ограничение по​ Target As Range)​: Ну ну, интересно​ выше, такое же​
  • ​. В качестве аргументов​ это делать с​ формат ячейки 00:00​ 2:30​ Len(StrVal) = 6​.​Заливка без форматирования​.​ записи.​ то можно создать​

Количество дней между двумя датами

​ число (долю суток)​ как его модернизировать,​ If End SubНу​ строкам, типа:​​ If Target.Address =​​ что-же там можно​ число, как дата,​ этой функции необходимо​

Быстрый ввод даты вȎxcel

Количество рабочих дней между двумя датами

​ помощью всплывающего календаря:​А вот если​где b2-a2 дает​ Then Application.EnableEvents =​Используйте имя начального дня​.​​Примечания:​ ​Если при вводе знаков​​ пользовательский числовой формат.​​ и применит к​​ чтобы при удалении​ обьяснять тут особо​If Target.Column =​ «$A$1» Then If​ выкинуть ?​ но только дробная​ указать начальную и​Если нужно, чтобы в​

Быстрый ввод даты вȎxcel

​ Вам действительно нужно​​ 3:70 вместо 3:30​ False dDate =​ недели в первой​Примечание:​ ​ совпадает с существующей​ Его создать достаточно​​ ячейке формат​​ значения из колонки​ не чего​​ 1 And Target.Row​ ​ Target.Offset(0, 1).Value =​​dlaptev​ его часть, то​​ конечную даты и​ ​ ячейке всегда была​​ преобразовать во время,​где b3-a3 дает​ DateValue(Left(StrVal, 2) &​​ ячейке для заполнения​​ Узор заливки можно изменить,​Чтобы быстро ввести те​​ записи в этом​ ​ легко, если в​​Даты​

Количество полных лет, месяцев и дней между датами. Возраст в годах. Стаж.

​ А, удалялась и​Макрос срабатывает на​ > 4 Then​

Сдвиг даты на заданное количество дней

​ «» Then Target.Offset(0,​: to Штурмaн​ с временем также​ ячейки с датами​ актуальная сегодняшняя дата​ то нужен Ваш​ 5:70 вместо 5:30​ «/» & Mid(StrVal,​ ячейки с последующей​ выбрав два или​

Сдвиг даты на заданное количество рабочих дней

​ же данные в​​ столбце, Excel отображает​ ​ качестве образца использовать​​(или Времени), установленные​ дата. А то​ изменение одной ячейки​SOV1​ 1) = Date​Точно не ленивый​ возможны любые математические​ выходных (государственных праздников,​ — лучше воспользоваться​ файл. Конечно, в​я бьюсь над​​ 3, 2) &​ ​ рабочие дни (исключая​​ больше начальной ячеек,​

Вычисление дня недели

​ несколько ячеек одновременно,​ меню список записей,​ встроенные числовые форматы.​ по умолчанию.​​ получается если в​ ​ в 7 столбце​​: Димит, еще раз​​ End If End​​ :-)​

Быстрый ввод даты вȎxcel

​ операции, как и​ больничных дней, отпусков,​ функцией​ новой теме.​ этим уже неделю,​ «/» & Right(StrVal,​

Вычисление временных интервалов

​ суббота и воскресенье)​ прежде чем перетащить​ выделите все ячейки,​ уже используется в​ Чтобы создать пользовательский​На рисунке ниже представлена​ колонке А (даже​ и строке 2​ большое спасибо! Изначальная​ If End Sub​Проще установить MSCOMCT2.OCX​ с датой -​

​ отгулов и т.д.):​СЕГОДНЯ​valenelena​ испробывал десятки вариантов​ 2)) .NumberFormat =​Щелкните​ заливки маркера. Например​ введите нужные сведения​ столбце.​ числовой формат, выполните​ таблица вариантов ввода​ пустой) нажать клавишу​​ и дальше.​​ цель достигнута. Получилось​

Быстрый ввод даты вȎxcel

planetaexcel.ru

Быстрый ввод даты на форме в Excel

​SOV1​​ на компе, и​ сложение, вычитание и​Примечание​(TODAY)​: все разобралась .​ и постоянно прихожу​ «dd/mm/yyyy» .Value =​Заливка дней недели​

​ если вы хотите​​ и нажмите клавиши​Нажмите клавишу Стрелка вниз,​
​ следующие действия:​ даты и времени,​ Del, то тоже​Макрос должен находится​ следующее (может еще​

​: Спасибо, Димит, что​​ не заморачиваться…​ т.д.​: Эта функция появилась​:​ Спасибо​

​ к этим же​​ CDate(DateSerial(Year(dDate), Month(dDate), Day(dDate)))​
​.​
​ заполнение ячеек последовательностью​

​ CONTROL + RETURN.​​ чтобы выбрать совпадающие​Выделите ячейку, к которой​ которые поддерживает Excel.​ происходит запись даты​ в модуле листа.​
​ кому-нибудь пригодится): при​ откликнулись!​Максимум чем может​Нюанс здесь только один.​ в стандартном наборе​Если выделить ячейку с​Как обычно, кому надо​

​ результатам​​ End If End​Заливка ячеек и последующие​
​ чисел, например 2,​ Этот метод работает​
​ записи и нажмите​

​ необходимо применить требуемый​​ В левой колонке​
​ в соответствующий столбец.​

​842-й​​ появлении значения в​Проблемму решили другим​ отличаться созданный собственноручно​ Если при сложении​ функций Excel начиная​ датой и установить​

​ быстро — смотрим​​спасибо​ With End If​ месяцы года с​

​ 4, 6, 8…,​​ через все выделенные​
​ клавишу RETURN.​ числовой формат.​
​ показаны значения, которые​А нужно время​: Спасибо!!! ))​
​ столбце №7 в​ способом: «знакомые» помогли​ контрол, это внешним​ нескольких временных интервалов​ с 2007 версии.​ для нее​

​ видео. Подробности и​Aexbro​
​ If Not Intersect(Target,​
​ помощью начального название​
​ введите 2 и​
​ ячейки.​
​Примечания:​
​Откройте диалоговое окно​ нужно вводить в​ от времени очищать​А это как?​ ячейках с 4​ написать макрос вставки​ видом, а функционально,​ сумма получилась больше​ В более древних​Общий формат​ нюансы — в​: jakim, не все​ Range(«B2:B10»)) Is Nothing​ месяца в первой​
​ 4 из двух​Если вы не хотите​ ​Формат ячеек​ ячейку, а в​ таблицу полностью.​ я просто совсем​ по 2000 и​ даты при нажатии​ все придет к​ 24 часов, то​ версиях сначала необходимо​(правой кнопкой по​ тексте ниже:​ так просто как​ Then With Target​

CyberForum.ru

Автоматический ввод текущей даты в Excel

​ ячейке​​ ячеек начальную и​ интеллектуальная кнопка​
​Excel автоматически завершается только​
​и перейдите на​ правой — результат​Заранее спасибо!​ не в курсе​ в столбце №13​ кнопки «Дата». Но​ одному… MSCOMCT2.OCX. :-)ИМХО​ Excel обнулит ее​ подключить надстройку​ ячейке​Если иметь ввиду российские​

​ может показаться, посмотрите​​ vVal = Format(.Value,​Нажмите кнопку​ затем перетащите маркер​

​Параметры автозаполнения​​ для тех записей,​ вкладку​ преобразования. Стоит отметить,​gera_vip​ ((​
​ в ячейках с​ этот вариант тоже​
​Например,дикое количество вот​ и начнет суммировать​Пакета анализа​Формат ячеек​ региональные настройки, то​ мой ответ Borode​ «0000») If IsNumeric(vVal)​Заполнить по месяцам​ заполнения.​

​для отображения при​​ которые содержат текст​Число​
​ что датам, вводимым​: Помогли решить проблему!​вот что мне​ 4 по 2000​ интересный.​ таких строк:​ опять с нуля.​
​. Для этого идем​- вкладка​ Excel позволяет вводить​ я видно не​ And Len(vVal) =​
​.​Можно быстро заполнение ячеек​ перетаскивании маркера заполнения,​

​ или сочетание текста​​.​ без указания года,​Если кому-то пригодится:​
​ надо сделать чтобы​ — справа от​Только объясните «чайнику»​Me.ToggleButton1.Value = True​ Чтобы этого не​ в меню​Число​ дату очень разными​

​ совсем ясно поставил​​ 4 Then Application.EnableEvents​Чтобы заполнить ячейки с​ последовательностью даты, времени,​ его можно отключить.​ и чисел. Операции,​В категории​
​ присваивается текущий год,​

​Private Sub Worksheet_Change(ByVal​​ у меня в​
​ этих ячеек появляется​ — у нас​
​Me.ToggleButton2.Value = False​
​ происходило, нужно применить​Сервис — Надстройки​
​-​ способами — и​ свой вопрос. Мне​ = False .Value​

​ последующей ежегодный шагом​​ рабочие дни, месяцы​
​ В меню​ которые содержат только​
​Все форматы​
​ а именно выставленный​ Target As Range)​
​ документе работало то,​ дата и больше​ макрос запускается кнопкой,​Me.ToggleButton3.Value = False​

​ к итоговой ячейке​​(Tools — Add-Ins)​Общий​
​ понимает их все:​ необходимо водить время​ = Left(vVal, 2)​ с помощью начальную​
​ и годы. Например,​Excel​ числа, даты или​в поле​

​ в настройках Вашей​​ For Each cell​ что вы написали​ не изменяется.​
​ а как подключить​——————————​ формат​

​и ставим галочку​​), то можно увидеть​»Классическая» форма​ без разделителей и​ & «:» &​ дату в первой​ можно ввести понедельник​выберите пункт​ времени не завершена.​Тип​ операционной системы.​ In Target If​ выше ?​Private Sub Worksheet_Change(ByVal​ данный макрос?​Me.ToggleButton43.Value = True​37:30:55​
​ напротив​ интересную картинку:​3.10.2006​ потом производить вычисления​ Right(vVal, 2) .NumberFormat​ ячейке​ в ячейке и​Параметры​Элементы, которые находятся в​введите необходимый код​Это не все возможные​ cell <> «»​Извините за откровенную​ Target As Range)​И еще макрос​Я уж не​:​Пакет анализа​То есть, с точки​Сокращенная форма​ с этими данными.​ = «[h]:mm» End​Нажмите кнопку​ затем заполнить ячейки​. В разделе​ строке не включаются​ числового формата. В​

​ варианты, которые поддерживает​​ Then If Not​
​ безграмотность в этом​ If Target.Column =​ «найти» перестает работать​ говорю, что такие​
​nika_adm​(Analisys Toolpak)​ зрения Excel, 27.10.2012​3.10.06​ А в вашем​
​ If End With​Заполнить по годам​ ниже или справа​
​средства разработки​ в список соответствующих​ нашем случае мы​ Excel. Но даже​ Intersect(cell, Range(«W9:W3000»)) Is​ вопросе.​ 7 And Target.Row​ при защите листа….​ вещи в цикле​
​: Есть форма, требуется​

​. После этого в​​ 15:42 = 41209,65417​С использованием дефисов​ примере мне по​ End If Application.EnableEvents​.​ Вторник, среда, четверг​нажмите кнопку​ записей.​ введем:​ этих вариантов Вам​ Nothing Then With​
​Димит​ > 3 _​Димит​ можно делать, но​ вводить даты -​
​ Мастере функций в​На самом деле любую​

​3-10-6​​ прежнему необходимо вводить»:»​
​ = True End​Примечание:​ и т.​Изменить​
​Если вы не хотите​ДДДД ДД.ММ.СС чч:мм:cc​ будет предостаточно.​ cell.Offset(0, -1) .Value​: 1 откройте файл​ And Target.Row <​
​: Могу только посоветовать​ вот то, что​ надо найти компонент,​

​ категории​​ дату Excel хранит​С использованием дроби​
​спасибо​ Sub​
​ Узор заливки можно изменить,​Выделите ячейку, содержащую начальную​и снимите флажок​ к записям, которые​и нажмем​
​Некоторые варианты отображения дат,​ = Date .EntireColumn.AutoFit​ Excel​
​ 2000 Then If​ изменить макрос или​ можно было это​
​ чтобы при активации​Дата и время​ и обрабатывает именно​3/10/6​

​Aexbro​​Диапазоны A2:A10 и B2:B10​ выбрав два или​ дату, время, день​Показать параметры вставки интеллектуальные​ введите сравниваемое автоматически​

​ОК​​ представленные в правой​ End With End​2 нажмите клавиши​
​ Target.Offset(0, 0).Value =​ защиту.​
​ сделать единым блоком,​ текстбокса появлялся календарь,​появится необходимая нам​ так — как​Внешний вид (отображение) даты​: _Boroda_, обе формулу​ замените на свои​ больше начальной ячеек,​ недели, месяц или​ кнопки​ для других записей,​.​ колонке, могут отличаться.​ If End If​ Alt+F11​ «да» Then If​Если Вы хотите​ где всем ToggleButton’ам​ затем, полсе выбора​ функция​ число с целой​ в ячейке может​ не работают​ области листа, куда​ прежде чем перетащить​ год.​.​ можно отключить этот​Пользовательский числовой формат будет​ Это зависит от​ Next cell End​3 в окне​ Target.Offset(0, 1).Value =​ воспользоваться моим кодом,​ присваивать False, а​
​ даты, инфа сохранялась​ЧИСТРАБДНИ​ и дробной частью.​
​ быть очень разным​

​Aexbro​​ будут подобным образом​
​ заливки маркера. Например​
​Выделите ячейки, которые нужно​Excel можно продолжить ряда​ параметр. В меню​ применен к ячейке.​ региональных настроек и​ Sub​ Project-VBAProject щёлкните 2​ «» Then Target.Offset(0,​ то разместите его​ под ToggleButtonХХ_Click писать​ в текстбоксе​(NETWORKDAYS)​ Целая часть числа​ (с годом или​

CyberForum.ru

​: _Boroda_, огромное спасибо​

Создание раскрывающегося списка

Создание раскрывающегося списка

Чтобы упростить работу пользователей с листом, добавьте в ячейки раскрывающиеся списки. Раскрывающиеся списки позволяют пользователям выбирать элементы из созданного вами списка.

Ваш браузер не поддерживает видео. Установите Microsoft Silverlight, Adobe Flash Player или Internet Explorer 9.

  1. На новом листе введите данные, которые должны отображаться в раскрывающемся списке. Желательно, чтобы элементы списка содержались в
    таблице Excel
    . Если это не так, список можно быстро преобразовать в таблицу, выделив любую ячейку диапазона и нажав

    Ctrl+T

    .

    Таблица Excel, используемая в качестве источника для списка проверки данных

    Примечания: 

    • Почему данные следует поместить в таблицу? Когда ваши данные находятся в таблице при
      добавлении или удалении элементов из списка
      , любые раскрывающиеся списки, основанные на этой таблице, будут автоматически обновляться. Дополнительные действия не требуются.

    • Сейчас самое время
      отсортировать данные в диапазоне или таблице
      в раскрывающемся списке.

  2. Выделите на листе ячейку, в которую требуется поместить раскрывающийся список.

  3. Перейдите на вкладку
    данных

    на ленте, затем


    в проверку данных

    .

    Примечание: 
    Если вы не можете щелкнуть

    проверку данных

    , возможно, рабочий лист защищен или общедоступен.
    Разблокируйте определенные области защищенной книги
    или прекратите совместное использование листа, а затем повторите шаг 3.

  4. На вкладке

    Параметры

    в поле

    Разрешить

    щелкните

    Список

    .

  5. Щелкните поле

    Источник

    и выделите диапазон списка. В примере данные находятся на листе «Города» в диапазоне A2:A9. Обратите внимание на то, что строка заголовков отсутствует в диапазоне, так как она не является одним из вариантов, доступных для выбора.

    Параметры списка проверки данных

  6. Если можно оставить ячейку пустой, установите флажок

    Игнорировать пустые

    ячейки.

  7. Установите флажок

    Список допустимых значений

  8. Откройте вкладку

    Сообщение для ввода.

    • Если вы хотите, чтобы при выборе ячейки появлялось всплывающее сообщение, установите флажок

      Отображать подсказку, если ячейка является текущей

      и введите заголовок и сообщение в соответствующие поля (до 225 символов). Если вы не хотите, чтобы сообщение отображалось, снимите этот флажок.

      Вкладка "Сообщение для ввода" в диалоговом окне "Проверка данных"

  9. Откройте вкладку

    Сообщение об ошибке.

    • Если вы хотите, чтобы при вводе значения, которого нет в списке, появлялось всплывающее сообщение, установите флажок

      Выводить сообщение об ошибке,

      выберите параметр в поле

      Вид

      и введите заголовок и сообщение. Если вы не хотите, чтобы сообщение отображалось, снимите этот флажок.

      Параметры сообщения об ошибке для раскрывающегося списка проверки данных

  10. Не знаете, какой параметр выбрать в поле

    Вид

    ?

    • Чтобы отобразить сообщение, не препятствующее вводу данных, которые не содержатся в раскрывающемся списке, выберите вариант

      Сведения

      или Предупреждение. Если выбрать вариант «Сообщение», сообщение будет отображаться со значком
      В сообщении отображается значок информации, но это не мешает людям выбирать элементы из раскрывающегося списка
      , а если «Предупреждение» — со значком
      В сообщении отображается значок предупреждения, но это не мешает людям выбирать элементы из раскрывающегося списка
      .

    • Чтобы заблокировать пользователям ввод данных, которые не содержатся в раскрывающемся списке, выберите вариант

      Остановка

      .

      Примечание: 
      Если вы не добавили заголовок и текст, по умолчанию выводится заголовок «Microsoft Excel» и сообщение «Введенное значение неверно. Набор значений, которые могут быть введены в ячейку, ограничен».

Предлагаем скачать образец книги с несколькими примерами проверки данных, аналогичными примеру в этой статье. Вы можете воспользоваться ими или создать собственные сценарии проверки данных.
Скачать примеры проверки данных Excel
.

Ввод данных станет быстрее и точнее, если ограничить значения в ячейке вариантами из раскрывающегося списка.

Раскрывающийся список со значениями "Высокий", "Средний" и "Низкий"

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

  1. Создайте список допустимых элементов для раскрывающегося списка. Для этого введите элементы на листе в одном столбце или строке без пустых ячеек.

  2. Выделите ячейки, для которых нужно ограничить ввод данных.

  3. На вкладке

    Данные

    в группе

    Инструменты

    щелкните

    Проверка данных

    или

    Проверить

    .

    Меню "Данные" на панели инструментов Excel с выбранной кнопкой "Проверка данных"

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

  4. Откройте вкладку

    Параметры

    и во всплывающем меню

    Разрешить

    щелкните

    пункт Список

    .

  5. Щелкните поле

    Источник

    и выделите на листе список допустимых элементов.

    Диалоговое окно свернется, чтобы было видно весь лист.

  6. Нажмите клавишу ВВОД или кнопку

    Развернуть
    Кнопка "Развернуть" в диалоговом окне "Проверка данных"
    , чтобы развернуть диалоговое окно, а затем щелкните

    ОК

    .

    Советы: 

    • Значения также можно ввести непосредственно в поле

      Источник

      через запятую.

    • Чтобы изменить список допустимых элементов, просто измените значения в списке-источнике или диапазон в поле

      Источник

    • Можно указать собственное сообщение об ошибке, которое будет отображаться при вводе недопустимых данных. На вкладке

      Данные

      щелкните

      Проверка данных

      или

      Проверить

      , а затем щелкните

      Сообщение об ошибке

      .

См. также

Применение проверки данных к ячейкам

  1. На новом листе введите данные, которые должны отображаться в раскрывающемся списке. Желательно, чтобы элементы списка содержались в
    таблице Excel
    .

    Примечания: 

    • Почему данные следует поместить в таблицу? Когда ваши данные находятся в таблице при
      добавлении или удалении элементов из списка
      , любые раскрывающиеся списки, основанные на этой таблице, будут автоматически обновляться. Дополнительные действия не требуются.

    • Теперь следует
      отсортировать данные в том порядке, в котором они должны отображаться
      в раскрывающемся списке.

  2. Выделите на листе ячейку, в которую требуется поместить раскрывающийся список.

  3. Откройте вкладку

    Данные

    на ленте и щелкните кнопку

    Проверка данных

    .

  4. На вкладке

    Параметры

    в поле

    Разрешить

    щелкните

    Список

    .

  5. Если вы уже создали таблицу с элементами раскрывающегося списка, щелкните поле

    Источник

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

    Источник

    через запятую. Например:


    Фрукты;Овощи;Зерновые культуры;Молочные продукты;Перекусы

  6. Если можно оставить ячейку пустой, установите флажок

    Игнорировать пустые

    ячейки.

  7. Установите флажок

    Список допустимых значений

  8. Откройте вкладку

    Сообщение для ввода.

    • Если вы хотите, чтобы при выборе ячейки появлялось всплывающее сообщение, установите флажок

      Показывать сообщения

      и введите заголовок и сообщение в соответствующие поля (до 225 символов). Если вы не хотите, чтобы сообщение отображалось, снимите этот флажок.

  9. Откройте вкладку

    Сообщение об ошибке.

    • Если вы хотите, чтобы при вводе значения, которого нет в списке, появлялось всплывающее сообщение, установите флажок

      Показывать оповещения

      , выберите параметр в поле

      Тип

      , и введите заголовок и сообщение. Если вы не хотите, чтобы сообщение отображалось, снимите этот флажок.

  10. Щелкните

    ОК

    .

После создания раскрывающегося списка убедитесь, что он работает так, как нужно. Например, рекомендуется проверить,
изменяется ли ширина столбцов и высота строк
при отображении всех ваших записей. Если вы решили изменить элементы раскрывающегося списка, см. статью
Добавление и удаление элементов раскрывающегося списка
. Чтобы удалить раскрывающийся список, см. статью
Удаление раскрывающегося списка
.

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community или попросить помощи в сообществе Answers community.

См. также

Добавление и удаление элементов раскрывающегося списка

Видео: создание раскрывающихся списков и управление ими

Общие сведения о таблицах Excel

Применение проверки данных к ячейкам

Блокировка и разблокировка определенных областей защищенного листа

Нужна дополнительная помощь?

Быстрый ввод даты в excel

Тема с организацией удобного ввода дат понятна. Например, массовый ввод всяких бухгалтерских сумм обычно производится на правой цифровой клавиатуре. Кнопка «точка» (Del) там угодливо принимает в Excel вид десятичного разделителя локали, во всяком случае, у меня в Excel она остается «запятой» и в русской, и в латинской раскладках (хотя в других приложениях переключается). Поэтому при такой «всегда запятой» массовый ввод дат на правой клавиатуре оказывается не совсем удобным для тех, кто привык разделять компоненты даты точкой. Их, конечно, можно еще разделять слэшем (/) или минусом (-), но таких знатоков гораздо меньше, чем любителей точки. К тому же, на правой клавиатуре эти кнопки расположены над цифровыми, что также может быть не очень удобным…

Короче, весь день сегодня держал открытым прилагаемый файл и, когда появлялся небольшой квант свободного времени, ковырялся с макросом. В итоге получилось

Private Sub Worksheet_Change(ByVal Target As Range)

Dim cellText As String, cellDate As Date
Dim datArray, dd, mm, yy

If Target.Cells.Count > 1 Then Exit Sub
If Intersect(Target, Range(«B13:C35»)) Is Nothing Then Exit Sub
If IsEmpty(Target) Then Exit Sub

dd = Day(Now): mm = Month(Now): yy = Year(Now) ‘инициализация частей — текущей датой

‘в качестве разделителя компонентов даты можно использовать
‘любой удобный разделитель с цифровой клавиатуры: * + , (/ или — нельзя)
‘особенно удобен «плюс» — он большой 🙂
‘разделители даже можно смешивать в одном вводе
cellText = Replace(Replace(Replace(Target.Value2, «+», «.»), «*», «.»), «,», «.»)
datArray = Split(cellText, «.»)

dd = datArray(0)
If UBound(datArray) > 0 Then mm = datArray(1)
If UBound(datArray) > 1 Then yy = datArray(2)

Application.EnableEvents = False
On Error Resume Next

cellDate = CDate(dd & «.» & mm & «.» & yy)
If Err Then
Target.Value = «ОШИБКА: » & Target.Value2
Err.Clear
Else
Target.Value = cellDate
End If

Application.EnableEvents = True
End Sub

В качестве разделителя дат при вводе макрос разрешает использовать плюс, звездочку и запятую, которая вводится клавишей «. Del». И самой удобной представляется, конечно, кнопка «плюс» — она же большая, как Enter, и по ней можно клацать, практически не глядя.

Слэш и минус я не задействовал. Как мы выяснили, у них свой смысл при вводе дат и они успевают преобразовать ввод до того, как наступает событие листа Change, несколько «мешая» моему макросу. По этой же причине не задействовал и «точку», вводимую с основной клавиатуры, тем более, что выискивать «точку» на основной клавиатуре — потеря времени набора. Использование любого из этих трёх разделителей ( / — . ) в зеленом диапазоне B13:C35 приводит к ошибке.

Правильные же кнопки-разделители в зеленой зоне скоростного ввода дат:
, [+], [. Del]. При вводе неполной даты (например, только числа или числа и месяца) оставшиеся компоненты (месяц и год или только год) автоматически берутся из текущей даты.

Быстрый ввод даты в excel

Иногда просто даешься диву как в такой замечательной программе как MS Excel не предусмотрен стандартный инструмент для вставки дат или времени в ячейку? Если вы часто работаете с датами вы уже, наверное, пальцы стерли. Тем не менее кое-какой инструмент в MS Excel имеется.

Для того чтобы вставить текущую дату в MS Excel предусмотрено сочетание клавиш, а именно Shift+Ctrl+4. Встаньте в ячейку в которую необходимо вставить дату и нажмите это сочетание клавиш. Чтобы ввести текущее время используйте сочетание клавиш Shift+Ctrl+6. Чтобы ввести и то, и другое нажмите вначале Shift+Ctrl+4 потом нажмите пробел и нажмите Shift+Ctrl+6 в ячейку введется и дата, и время.

Также для вставки даты в ячейку можно воспользоваться формулой «=СЕГОДНЯ()» эта формула возвращает текущую дату (установленную на компьютере).

Для вставки текущей даты и времени можно использовать формулу «=ТДАТА()«. При использовании данного способа необходимо задать ячейке соответствующий формат (показывать и дату, и время).

Важно:

  • При использовании формул помните, что когда дата переведется в компьютере то и у вас соответственно в ячейке дата поменяется.

Чтобы быстро вставлять в ячейки даты отличные от сегодняшней читайте статью «Как быстро вставить необходимую дату в ячейку?».

Вставка текущих даты и времени в ячейку

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

Вставка фиксированного значения даты или времени в ячейку Excel

Фиксированное значение на листе не изменяется при пересчете или открытии листа. При нажатии клавиш CTRL+; для вставки текущей даты в ячейку Excel «делает снимок» текущей даты, который вставляется в ячейку. Поскольку значение ячейки не меняется, оно считается статичным.

Выделите на листе ячейку, в которую требуется вставить текущую дату или время.

Выполните одно из действий, указанных ниже.

Чтобы вставить текущую дату, нажмите клавиши CTRL+; (точка с запятой).

Чтобы вставить текущее время, нажмите клавиши CTRL+SHIFT+; (точка с запятой).

Чтобы вставить текущие дату и время, нажмите клавиши CTRL+; (точка с запятой), затем клавишу ПРОБЕЛ, а после этого — CTRL+SHIFT+; (точка с запятой).

Изменение формата даты и времени

Чтобы изменить формат даты или времени, щелкните ячейку правой кнопкой мыши и выберите команду Формат ячеек. Затем в диалоговом окне Формат ячеек на вкладке число в разделе Категориявыберите пункт Дата или время , а затем в списке тип выберите тип и нажмите кнопку ОК.

Вставка фиксированного значения даты или времени в ячейку Excel

Фиксированное значение на листе не изменяется при пересчете или открытии листа. При нажатии клавиш CTRL+; для вставки текущей даты в ячейку Excel «делает снимок» текущей даты, который вставляется в ячейку. Поскольку значение ячейки не меняется, оно считается статичным.

Выделите на листе ячейку, в которую требуется вставить текущую дату или время.

Выполните одно из действий, указанных ниже.

Чтобы вставить текущую дату, нажмите клавиши CTRL+; (точка с запятой).

Чтобы вставить текущее время, нажмите клавиши +; (точка с запятой).

Чтобы вставить текущие дату и время, нажмите клавиши CTRL +; (точка с запятой), нажмите клавишу пробел, а затем — клавишу +; (точка с запятой).

Изменение формата даты и времени

Чтобы изменить формат даты или времени, щелкните ячейку правой кнопкой мыши и выберите команду Формат ячеек. Затем в диалоговом окне Формат ячеек на вкладке число в разделе Категориявыберите пункт Дата или время , а затем в списке тип выберите тип и нажмите кнопку ОК.

Вставка фиксированного значения даты или времени в ячейку Excel

Фиксированное значение на листе не изменяется при пересчете или открытии листа. При нажатии клавиш CTRL+; для вставки текущей даты в ячейку Excel «делает снимок» текущей даты, который вставляется в ячейку. Поскольку значение ячейки не меняется, оно считается статичным.

Выделите на листе ячейку, в которую требуется вставить текущую дату или время.

Выполните одно из действий, указанных ниже.

Чтобы вставить дату, введите дату (например, 2/2) и нажмите кнопку раскрывающегося списка Формат номерадома > (на вкладке число ) >Краткая дата или длинный день.

Чтобы вставить время, введите время и нажмите кнопку раскрывающегося списка Формат номерадома > (на вкладке число ) >time (время).

Изменение формата даты и времени

Чтобы изменить формат даты или времени, щелкните ячейку правой кнопкой мыши и выберите пункт Числовой Формат. Затем в диалоговом окне Формат номера в разделе Категориявыберите значение Дата или время , а затем в списке тип выберите тип и нажмите кнопку ОК.

Вставка обновляемого значения даты или времени

Дата или время обновляемые при пересчете листа или открытии книги, считаются «динамическими», а не статическими. Наиболее распространенным способом получения динамической даты или времени в ячейке на листе является использование функции листа.

Для вставки обновляемой текущей даты или времени используются функции СЕГОДНЯ и ТДАТА, как показано в приведенном ниже примере. Дополнительные сведения об использовании этих функций см. в статьях Функция СЕГОДНЯ и Функция ТДАТА

Текущая дата (значения могут быть разными)

Текущие дата и время (значения могут быть разными)

Выделите текст в таблице, приведенной выше, и нажмите клавиши CTRL+C.

На пустом листе выберите один раз в ячейке a1, а затем нажмите клавиши CTRL + V. Если вы работаете в Excel Online, повторите копирование и вставку для каждой ячейки в примере.

Важно: Чтобы пример правильно работал, его нужно вставить в ячейку A1.

Чтобы переключиться между просмотром результатов и просмотром формул, возвращающих эти результаты, нажмите клавиши Ctrl+` (знак ударения) или на вкладке Формулы в группе Зависимости формул нажмите кнопку Показывать формулы.

Скопировав пример на пустой лист, можно настроить его в соответствии со своими потребностями.

Примечание: Результаты, возвращаемые функциями СЕГОДНЯ и ТДАТА, изменяются только при пересчете листа или при выполнении макроса, содержащего эту функцию. Постоянного обновления ячеек, содержащих эти функции, не происходит. В качестве значений даты и времени используются показания системных часов компьютера.

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community, попросить помощи в сообществе Answers community, а также предложить новую функцию или улучшение на веб-сайте Excel User Voice.

Примечание: Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Была ли информация полезной? Для удобства также приводим ссылку на оригинал (на английском языке).

Сводные таблицы Excel

Если вам часто приходится вводить даты и время в ячейки, то вам должна понравиться идея писать их сокращенно, без точек-дробей – просто как число. Чтобы в заданном диапазоне ячеек листа, например, число 250616 после ввода и нажатия клавиши Enter автоматически превращалось в 25.06.2016.

Как в Excel настроить быстрый ввод даты без разделителей

Для реализации такого возможны два варианта.

Первый – использовать функцию преобразования текста в дату ДАТАЗНАЧ (DATEVALUE) и функции извлечения фрагментов из текста ЛЕВСИМВ (LEFT), ПРАВСИМВ (RIGHT) и ПСТР (MID), чтобы разделить шесть введенных чисел по два, добавить к ним точки и составить из них полноценную дату в соседней ячейке.

Для реализации быстрого ввода даты возможны два варианта

В англоязычном варианте: =DATEVALUE(LEFT(D1;2)&”.”&MID(D1;3;2)&”.”&RIGHT(D1;2)) .

Если же хочется выполнять это преобразование прямо в той же ячейке, куда вводятся числа, то без макроса не обойтись. Для этого щелкните по ярлычку листа, куда будут вводиться даты и время, и выберите команду Исходный текст (View Code). В открывшееся окно редактора Visual Basic вставьте следующий код.

Private Sub Worksheet_Change(ByVal Target As Range) Dim vVal Dim StrVal As String Dim dDate As Date If Target.Cells.Count > 1 Then Exit Sub If Not Intersect(Target, Range(«A2:A10»)) Is Nothing Then With Target StrVal = Format(.Text, «000000») If IsNumeric(StrVal) And Len(StrVal) = 6 Then Application.EnableEvents = False dDate = DateValue(Left(StrVal, 2) & «/» & Mid(StrVal, 3, 2) & «/» & Right(StrVal, 2)) .NumberFormat = «dd/mm/yyyy» .Value = CDate(DateSerial(Year(dDate), Month(dDate), Day(dDate))) End If End With End If Application.EnableEvents = True End Sub

Диапазон A2:A10 в коде замените на свою область листа, куда подобным образом собираетесь вводить даты.

Excel. Основы. Ввод времени

В Excel время представляет собой дробную часть целого числа (а целые числа обозначают даты, то есть отдельные сутки). Например, 12:00 дня для Excel это число 0,5. Один час для Excel — это 1/24 = 0,416666, одна минута — это 1/24/60 = 0,00069444 и т.д. Максимальная точность значения времени, которая доступна в Excel — одна тысячная секунды, то есть число 0,00000001.

Зачем нужны такие сложности? Это необходимо для того, чтобы мы могли использовать значения времени в формулах и своих расчетах, что очень удобно. Кроме того, пользователю вовсе необязательно знать описанные выше тонкости (хотя для понимания общих принципов работы программы это весьма полезно). Чтобы ввести значение времени в 00:00:01 (1 секунда), нам не нужно будет искать числовой эквивалент и вводить его. Достаточно воспользоваться одним из допустимых в программе способов ввода времени.

Правильные способы ввода времени

1) Через двоеточие (с указанием секунда или без указания)

Например, 15:30 (половина четвертого), или 16:30:24 (шестнадцать часов тридцать минут и двадцать четыре секунды).

2) В двенадцатичасовом формате

Например, 4:30 PM (половина пятого вечера) или 8:15 AM (восемь пятнадцать утра).

Если Вы все ввели по правилам, то при выделении ячейки с введенным временем в строке формул увидите введенное значение в формате, который установлен в соответствии с региональными настройками даты и времени (для России обычно в формате ЧЧ:ММ:СС).

Недопустимые способы ввода времени

1) Через запятую

Например, нельзя ввести половину десятого утра как 9,30.

Ошибочным будет и ввод половины десятого как 9-30

При вводе времени допускается указывать его вместе с датой (в таком случае сначала вводится дата, а затем через пробел — значение времени), например: 16.05.2017 18:30. Если вводить время без даты, то Excel автоматически применяет к нему дату 0 января 1900 года (минимально допустимая дата на листе Excel эквивалентная числу ноль).

Если при вводе времени Вы превысите суточный размер (24 часа), то время будет введено как соответствующий час одной из следующих дат. Например, если ввести 01.01.2017 26:30, то Excel отобразит 02.01.2017 02:30 (то есть, половину третьего следующих суток).

Когда Вам нужно работать со значениями времени, превышающими 24 часа (безотносительно дат), не забывайте применять к ячейкам соответствующий числовой формат.

Максимальное значение времени, которое может принять Excel, установлено на отметке 9999:59:59 (без одной секунды десять тысяч часов). Если Вы введете время, превышающее указанное, то формат ячеек будет преобразован в текстовый, а значение будет восприниматься программой как обычный текст (что сделает невозможным его использование в каких-либо расчётах).

Видеоверсию данной статьи смотрите на нашем канале на YouTube

Чтобы не пропустить новые уроки и постоянно повышать свое мастерство владения Excel — подписывайтесь на наш канал в Telegram Excel Everyday

Куча интересного по другим офисным приложениям от Microsoft (Word, Outlook, Power Point, Visio и т.д.) — на нашем канале в Telegram Office Killer

Вопросы по Excel можно задать нашему боту обратной связи в Telegram @ExEvFeedbackBot

Вопросы по другому ПО (кроме Excel) задавайте второму боту — @KillOfBot

Содержание

    • 0.1 P.S.
    • 0.2 Ссылки по теме
  • 1 Добавить «Всплывающий календарь» в Excel 2016, 2013, 2010, 2007
  • 2 Как работать с надстройкой:
  • 3 Как задать формат даты в Excel 2007/2010?
  • 4 Как задать свой собственный формат даты? Как преобразовать дату в год, месяц либо день недели?
  • 5 Как установить систему дат 1904?
  • 6 Как вводить дату в ячейку?
  • 7 Как в Excel вводить даты при помощи надстройки?
  • 8 Как вставить в ячейку статическую, фиксированную, не обновляемую дату?
  • 9 Как вставить в ячейку текущую автоматически обновляемую дату?
    • 9.1 Другие материалы по теме:
    • 9.2 Интерактивный календарь в Excel
    • 9.3 Создаем таблицу с событиями
    • 9.4 Настраиваем календарь
    • 9.5 Задаем имя диапазону дат в календаре
    • 9.6 Определяем ячейку с выделенной датой
    • 9.7 Добавляем макрос на событие Worksheet_selectionchange()
    • 9.8 Настраиваем формулы для отображения деталей при выборе даты
    • 9.9 Добавление анонса
    • 9.10 Настраиваем условное форматирование для выделенной даты
    • 9.11 Форматируем

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

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

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

как сделать выпадающий календарь в ячейке excel Windows Date Picker
Автор: Ron de Bruin
Цена: бесплатно
Ссылка

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

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

  • Работает только в Excel 2013, добавляется через магазин приложений Office App Store на вкладке Вставка — Приложения для Office (Insert — Office Apps Store)
  • Вставляется на лист как постоянный графический объект и добавляет выбранную дату в любую выделенную предварительно ячейку. 
  • Умеет менять стандарты недели, отображать номера недель, вводить не только дату, но и время. 
  • Есть возможность задавать темы оформления. 
  • Нет кнопки перехода к текущему дню.
как сделать выпадающий календарь в ячейке excel 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)

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

  • Всплывающий календарь из надстройки PLEX
  • Автоматический ввод даты при изменении ячейки

Каждый раз при вводе даты в ячейку возникают вопросы: печатать ДД-ММ-ГГГГ или в другом порядке? Использовать «-» или «/» в качестве разделителя? Распознает ли Excel введённое значение как дату и отобразит ли её в нужном формате? Именно в этих случаях пригодится всплывающий, или выпадающий, календарь. Он незаменим для работы с личными и рабочими списками дел, расписаниями и планами, графиками выполнения проектов и финансовыми отчётами в Excel.

«Всплывающий календарь» — это надёжный и проверенный инструмент выбора дат, которому доверяют 30 000+ пользователей Excel:

  • Интуитивен в использовании: выберите ячейки — вставьте дату
  • Выпадает рядом с ячейкой, отображает номера недель, дни недели, текущую дату
  • Заполняет датами столбцы, строки и любые диапазоны в секунды
  • Множество вариантов формата даты по умолчанию
  • Работает в 64- и 32-разрядных версиях Excel

Язык видео: английский. Субтитры: русский, английский. (Внимание: видео может не отражать последние обновления. Используйте инструкцию ниже.)

Добавить «Всплывающий календарь» в Excel 2016, 2013, 2010, 2007

Подходит для: Microsoft Excel 2016 – 2007, desktop Office 365 (32-бит и 64-бит).

Скачать надстройку XLTools

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

Как работать с надстройкой:

  • Как вставить или изменить дату в ячейке с помощью «Всплывающего календаря»
  • Как из календаря вставить текущую дату в ячейку
  • Как заполнить датами целый столбец, строку или несмежные диапазоны
  • Как заполнить диапазон последовательными датами
  • Как вставить сразу и дату и время в ячейку
  • Как вставить только время (без даты) в ячейку
  • Как изменить формат даты по умолчанию для «Всплывающего календаря»
  • Как изменить комбинацию горячих клавиш для «Всплывающего календаря»
  • Как добавить/удалить иконку «Всплывающего календаря»
  • Как добавить/удалить «Всплывающий календарь» из контекстного меню
  • Как встроить всплывающий календарь в книгу Excel

Внимание: отмена последнего действия (UNDO) невозможна. Рекомендуем сохранять резервную копию файлов или использовать «Контроль версий» XLTools для отслеживания изменений.

Как вставить или изменить дату в ячейке с помощью «Всплывающего календаря»

  1. Выберите ячейку.
  2. В группе Дата/Время нажмите на кнопку «Вставить дату» > Календарь всплывёт рядом с ячейкой.
    Или: по правому клику мыши выберите пункт «Вставить дату».
    Или: используйте сочетание клавиш Ctrl+; (точка с запятой на английской раскладке).
  3. Выберите нужную дату из календаря > Готово.
    Обратите внимание на формат: это то, что вам нужно? Вы можете изменить формат даты по умолчанию.
  4. Чтобы изменить значение даты, нажмите на иконку календаря справа от ячейки > Измените дату.

«Всплывающий календарь» запоминает последнюю использованную дату, чтобы вам было проще вводить следующую дату.

Внимание: после ввода даты, ячейке автоматически присваивается формат Число/Дата. Если вы позднее удалите значение из ячейки, сама ячейка сохранит свой формат Дата, а иконка календаря для этой пустой ячейки останется доступной. Чтобы убрать иконку, измените формат ячейки на Общий.

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

Как из календаря вставить текущую дату в ячейку

  1. Выберите ячейку, в которую нужно вставить текущую дату.
  2. В группе Дата/Время нажмите на кнопку «Вставить дату» > Календарь появится рядом с ячейкой.
    Или: по правому клику мыши выберите пункт «Вставить дату».
    Или: используйте сочетание клавиш Ctrl+; (точка с запятой на английской раскладке).
  3. Нажмите по надписи «Сегодня» в нижней части календаря > Готово.

Как заполнить датами целый столбец, строку или несмежные диапазоны

С помощью «Всплывающего календаря» вы можете заполнить значениями дат целый диапазон (ограничение до 4000 ячеек). Даты можно вставить в столбцы таблицы, строки, объединённые ячейки или любой произвольный диапазон точно так же, как одну ячейку: 

  1. Выберите диапазон.
  2. В группе Дата/Время нажмите на кнопку «Вставить дату» > Появится всплывающий календарь.
    Или: по правому клику мыши выберите пункт «Вставить дату».
    Или: используйте сочетание клавиш Ctrl+; (точка с запятой на английской раскладке).
  3. Выберите дату > Готово. Весь диапазон заполнен значением выбранной даты.
    Совет: узнайте, как заполнить ячейки последовательными датами.
  4. Чтобы изменить значение даты, нажмите на иконку календаря справа от ячейки > Измените дату.

Внимание: после ввода даты, ячейкам автоматически присваивается формат Число/Дата. Если вы позднее удалите значения из ячеек, сами ячейки сохранят свой формат Дата, а иконка календаря для этих пустых ячеек останется доступной. Чтобы убрать иконку, измените формат ячеек на Общий.

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

Как заполнить диапазон последовательными датами

С надстройкой «Всплывающий календарь» вы можете быстро заполнить диапазон последовательными датами (дни по порядку):

  1. Вкладка XLTools > Кнопка «Настройки» > Вкладка Дата/Время > Отметьте флажком «Включить автоувеличение дат при заполнении диапазона ячеек» > OK.
  2. Выберите диапазон.
  3. В группе Дата/Время нажмите на кнопку «Вставить дату» > Всплывающий календарь появятся рядом с ячейкой.
    Или: по правому клику мыши выберите пункт «Вставить дату».
    Или: используйте сочетание клавиш Ctrl+; (точка с запятой на английской раскладке).
  4. Выберите начальную дату > Готово, весь диапазон будет автоматически заполнен последовательными значениями дат с шагом в 1 день.

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

Как вставить сразу и дату и время в ячейку

  1. Выберите ячейку.
  2. В группе Дата/Время нажмите на кнопку «Вставить дату и время» > Всплывающий календарь с часами появятся рядом с ячейкой.
    Или: по правому клику мыши выберите пункт «Вставить дату и время».
    Или: используйте сочетание клавиш: нажмите Ctrl+; (точка с запятой на английской раскладке), затем отпустите клавиши и нажмите Ctrl+Shift+; (точка с запятой на английской раскладке).
  3. Установите время при помощи колеса прокрутки мыши или стрелок Вверх/Вниз > Выберите дату из всплывающего календаря > Готово.
    Обратите внимание на формат: это то, что вам нужно? Вы можете задать другой формат по умолчанию для Всплывающего Календаря и Часов.
  4. Чтобы изменить значение, нажмите на иконку справа от ячейки > Измените дату и время.

Внимание: после ввода даты и времени, ячейке автоматически присваивается формат Число/Дата. Если вы позднее удалите значение из ячейки, сама ячейка сохранит свой формат Дата, а иконка календаря с часами для этой пустой ячейки останется доступной. Чтобы убрать иконку, измените формат ячейки на Общий.

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

Как вставить только время (без даты) в ячейку

Используйте надстройку «Всплывающие часы» для установки и вставки времени в ячейки и диапазоны:

  1. Выберите ячейку или диапазон.
  2. В группе Дата/Время нажмите на кнопку «Вставить время» > Всплывающие часы появятся рядом с ячейкой.
    Или: по правому клику мыши выберите пункт «Вставить время».
    Или: используйте сочетание клавиш Ctrl+Shift+; (точка с запятой на английской раскладке).
  3. Установите время при помощи колеса прокрутки мыши или стрелок Вверх/Вниз > Нажмите Ввод (Enter) > Готово.

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

Как изменить формат даты по умолчанию для «Всплывающего календаря»

Чтобы изменить формат, заданный по умолчанию для «Всплывающего Календаря»:

  1. Нажмите кнопку «Настройки» на панели XLTools > Вкладка Дата/Время.
  2. Отметьте флажком «По умолчанию использовать формат даты и времени, установленный ниже».
    Внимание: при снятии флажка Всплывающий календарь будет использовать формат, установленный в ваших системных настройках.
  3. Выберите подходящий формат, напр., принятый в вашей стране или на вашем языке.
    Или: задайте «Свой формат».
  4. Нажмите OK > Готово.

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

Вы можете обнаружить, что некоторые ячейки не подчиняются заданному формату Календаря. Это означает, что ячейкам ранее был присвоен другой формат даты. В этом случае, измените формат ячеек:

  1. Выберите ячейки > По правому клику мыши выберите «Формат ячеек».
  2. Вкладка «Число» > Формат «Дата» > Установите нужный формат даты.

Изначально Всплывающий календарь использует ваши системные настройки формата даты и времени по умолчанию. Вы можете полностью изменить настройки системы. Обратите внимание, это поменяет настройки всех учётных записей на компьютере:

  1. Панель управления > Часы, язык и регион > Изменение форматов даты.
  2. Вкладка Форматы > Установите форматы дат и времени, первого дня недели.
  3. Вкладка Местоположение > Укажите страну местонахождения.
  4. Вкладка Дополнительно > Измените язык системы > Перезагрузите компьютер.

Для вашего удобства, для «Всплывающего календаря» по умолчанию задано сочетание клавиш Ctrl+; (точка с запятой на английской раскладке) – это та же комбинация, которая используется в Excel для вставки текущей даты. Вы можете изменить горячие клавиши для «Всплывающих часов» в любое время:

Вкладка XLTools > Кнопка «Настройки» > Вкладка «Горячие клавиши» > Задайте другое сочетание > OK.

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

Как добавить/удалить иконку «Всплывающего календаря»

Пиктограмма (иконка) календаря появляется справа от выбранной ячейки, если для ячейки задан формат Дата. Нажатие на иконку открывает инструмент выбора даты.

  • Чтобы отключить отображение иконки Календаря:
  1. Нажмите кнопку «Настройки» на панели XLTools > Вкладка Дата/Время.
  2. Снимите флажок с опции «Отображать пиктограммы Всплывающего Календаря и Часов» > OK.
  3. Готово! Пиктограммы перестанут отображаться, Календарь и Часы будут по-прежнему доступны для использования. Иконки можно вернуть в любое время.

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

  • Чтобы настроить появление иконки рядом с пустыми ячейками, столбцами, строками или произвольным диапазоном:
  1. Выберите пустую ячейку или диапазон.
  2. Вкладка «Главная» > Группа «Число» > Дата > OK. Так, ячейкам будет присвоен формат даты.
    Или: вставьте любую дату с помощью «Всплывающего календаря» > Нажмите кнопку Delete. Это удалит непосредственно значения, и присвоит выбранным ячейкам формат даты.
  3. Готово! Теперь, если вы выберите какую-либо ячейку в этом диапазоне, рядом с ней появится иконка Календаря.
  • Чтобы убрать иконку Календаря с пустых ячеек:
    Если ячейка пуста, но иконка по-прежнему появляется, значит, что ячейке присвоен формат даты или времени. Чтобы убрать иконку с пустых ячеек, измените их формат на Общий:
  1. Выберите пустую ячейку или диапазон.
  2. Вкладка «Главная» > Группа «Редактирование» > Очистить форматы.
    Или: вкладка «Главная» > Группа «Число» > Выберите «Общий» из выпадающего списка.
    Или: по правому клику «Формат ячеек» > Вкладка «Число» > Выберите формат «Общий» > OK.
  1. Нажмите кнопку «Настройки» на панели XLTools > Вкладка Дата/Время.
  2. Установите или снимите флажки соответствующих опций:
    • «Добавить пункт «Вставить дату» в контекстное меню»
    • «Добавить пункт «Вставить время» в контекстное меню»
    • «Добавить пункт «Вставить дату и время» в контекстное меню»
  3. Нажмите OK > Готово.

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

Как встроить всплывающий календарь в книгу Excel

Надстройка XLTools «Всплывающий календарь» не может быть встроена в книгу. «Всплывающий календарь» будет видим и доступен только тем пользователям, у кого установлена надстройка XLTools.

Если вам нужно отправить книгу другим пользователям, попробуйте наш встраиваемый календарь — онлайн надстройка XLTools.net Календарь. Установка на компьютер не требуется: отправьте файл коллегам, и они тоже смогут воспользоваться календарём. Это веб-приложение удобно для рассылки расписаний, графиков, планов, т.д.

Появились вопросы или предложения? Оставьте комментарий ниже.

Для гарантии правильности ввода дат пользователями элемент управления Excel Календарь (Calendar) может упростить ситуацию как для вас, так и для пользователей, работающих с вашей электронной таблицей. При помощи этого трюка можно добавить элемент управления Календарь (Calendar) в любую рабочую книгу Excel.

Если дата введена неправильно, Excel не сможет ее распознать. Иногда это означает, что вы не можете выполнять вычисления с числами, выглядящими как даты, но датами не являющимися. Кроме того, это означает, что любые диаграммы или сводные таблицы, которые основываются на этих данных, будут неверными. Хотя решить эту проблему может весьма разностороннее средство проверки данных Excel, оно также далеко от совершенства.

При помощи этого трюка можно добавить элемент управления Календарь (Calendar) в любую рабочую книгу Excel. Для начала откройте рабочую книгу, куда собираетесь добавить календарь. Лучше использовать ваш файл Personal.xls, который можно открыть командой Файл → Открыть (File → Open). Если этот пункт меню недоступен, значит, у вас пока нет файла Personal.xls. Можно создать его, записав пустой макрос. Для этого выберите команду Разработчик → Начать запись (Developer → Record New Macro) и в поле Сохранить в (Store Macro In) выберите вариант Личная книга макросов (Personal Macro Workbook). Затем щелкните на кнопке ОК, выделите любую ячейку и остановите запись. Excel автоматически создаст файл Personal.xls.

Выберите команду Разработчик → Редактор Visual Basic (Developer → Visual Basic Editor) (сочетание клавиш Alt/Option+Fll) и в VBE выберите команду Insert → UserForm. Должна появиться панель инструментов Control. (Если панель не открылась, выберите команду View → Toolbox.) Правой кнопкой мыши щелкните панель инструментов Control и в контекстном меню выберите команду Additional Controls. Прокрутите список до флажка Элемент управления Календарь 10.0 (Calendar Control 10.0) (номер версии зависит от версии Excel). Установите этот флажок и щелкните на кнопке ОК. Щелкните календарь, который теперь представляет собой часть панели инструментов, а затем щелкните форму UserForm, которую добавили ранее. При помощи маркеров изменения размера формы UserForm и элемента управления Календарь (Calendar) отрегулируйте их размер.

Удостоверьтесь, что форма UserForm выделена, и выберите команду View → Properties Window (клавиша F4). В окне Properties выберите Caption и замените слово UserForml словом Calendar. Теперь выберите команду View → Code (клавиша F7) и в частном модуле введите код, приведенный в листинге 7.14.

1 2 3 4 5 6 7 8 
//Листинг 7.14 Private Sub Calendar1_Click() ActiveCell = Calendar1.Value End Sub   Private Sub UserForm_Activate()     Me.Calendar1.Value = Date End Sub

//Листинг 7.14 Private Sub Calendar1_Click() ActiveCell = Calendar1.Value End Sub Private Sub UserForm_Activate() Me.Calendar1.Value = Date End Sub

Выберите команду Insert → Module и в общем модуле введите код из листинга 7.15.

1 2 3 4 
//Листинг 7.15 Sub ShowIt()     UserForm1.Show End Sub

//Листинг 7.15 Sub ShowIt() UserForm1.Show End Sub

Закройте окно, чтобы вернуться в Excel. Выберите команду Разработчик > Макрос → Макросы (Developer > Macro → Macros) (сочетание клавиш Alt+F8) и затем выберите ShowIt. Щелкните кнопку Параметры (Options) и назначьте макросу клавишное сочетание — все готово. Нажмите выбранное сочетание клавиш, раскроется календарь с выбранной сегодняшней датой. Щелкните любую дату, и она будет вставлена в активную ячейку.

Формат даты используется для отображения дат и времени, представленных числами, в виде дат. Система дат в Excel устроена так, что дату 01.01.1900 года приняли за отправную точку и обозначили числом 1, таким образом, любая дата представляет собой число дней, пройденных с 1 января 1900 года до этой даты. Значение времени является составной частью даты и хранится в виде десятичной дроби. Со значениями даты и времени можно производить математические действия, так как они являются числами. 

Как задать формат даты в Excel 2007/2010?

Для задания формата даты необходимо выделить нужные ячейки, после чего перейти на вкладку «Главная», в группу «Число» и раскрыть список форматов в поле «Числовой формат».

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

В раскрывшемся списке доступны два числовых формата: «Краткая дата» и «Длинный формат даты». В первом случае дата отображается числами, а во втором — числами и словами. Если предложенные форматы не подходят, выбираем пункт «Другие числовые форматы…», в результате чего появляется окно «Формат ячеек».

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

Это окно также можно вызвать щелчком левой кнопки мыши на правый нижний уголок группы,

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

либо просто кликнуть правой кнопкой мыши в области выделенных ячеек и выбрать из контекстного меню пункт «Формат ячеек».

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

В появившемся окне «Формат ячеек» переходим на вкладку «Число» и в группе «Числовые форматы» выбираем пункт «Дата»

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

В правой части окна отображаются возможности данного формата, в группе «Тип» выбераем нужный способ отображения даты. Форматы даты, перед которыми стоит значок *(звездочка), зависят от даты операционной системы, форматы, перед которыми этого значка нет – не зависят.

Как задать свой собственный формат даты? Как преобразовать дату в год, месяц либо день недели?

Выделяем нужные ячейки в окне открытого листа и вызываем окно «Формат ячеек» любым из перечисленных выше способов. В окне «Формат ячеек» выбираем вкладку «Число» и в группе «Числовые форматы» выбираем пункт «Все форматы». После этого помещаем курсор в поле «Тип» и набираем код числового формата в русской раскладке клавиатуры:

— М – для отображения месяцев в виде числа от 1 до 12;

— ММ — для отображения месяцев в виде числа от 01 до 12;

— МММ – для отображения месяцев в виде «янв» — «дек»;

— ММММ — для отображения месяцев в виде «январь» — «декабрь»;

— МММММ – для отображения месяцев виде первой буквы месяца;

Форматы с кодом «М» можно использовать для преобразования даты в месяц.

— д – для отображения дней в виде числа от 1 до 31;

— дд – для отображения дней в виде числа от 01 до 31;

— ддд – для отображения дней в виде «Пн» — «Вс»;

— дддд – для отображения дней в виде «понедельник» — «воскресенье»;

Форматы с кодом «д» используются для преобразования даты в день.

— гг – для отображения лет в виде чисел от 00 до 99;

-гггг – для отображения лет в виде чисел от 1900 до 9999.

Форматы с кодом «г» используются для преобразования даты в год.

Как установить систему дат 1904?

Кроме вышеописанной системы дат, Excel поддерживает еще одну систему – 1904 года, которая используется на компьютерах Macintosh. Excel автоматически производит смену системы дат, но при необходимости, это можно сделать самостоятельно вручную. Для этого нажимаем кнопку «Office», выбираем кнопку «Параметры Excel», заходим в раздел «Дополнительно» и находим группу «При пересчете этой книги». Смена системы дат производится установкой/снятием флажка перед пунктом «Использовать систему дат 1904».

Как вводить дату в ячейку?

Для того, чтобы Excel воспринимал информацию, вводимую в ячейку, как дату, необходимо использовать в качестве разделителя точку, тире либо наклонную черту «/». При этом все введенные числа, меньшие 31.12, 31-12 либо 31/12 будут автоматически восприниматься как даты, а большие — как текст. Как уже говорилось выше, ячейки с датами могут использоваться в расчетах.

Для тех, кто активно работает с датами в своих таблицах, были созданы надстройки, представляющие собой календарь в Excel. Пример такой надстройки – календарь samradDatePicker. Скажем спасибо создателям этой надстройки и тем, кто доработал ее и перевел на русский язык! Надстройка упрощает ввод дат в ячейки листа Excel. После установки этой надстройки в контекстное меню (щелчок правой кнопки мыши) добавляется новый пункт «Выбрать из календаря», а при выделении ячеек, содержащих дату, справа от ячейки отображается значок календаря.

бесплатно скачать надстройку samradDatePicker для быстрого ввода дат

Как устанавливаются надстройки в Excel, уже описывалось в одной из статей на этом сайте, поэтому не буду повторяться. Добавлю лишь только, что Вы можете бесплатно скачать эту надстройку, а также ознакомиться с другими полезными надстройками для Excel.

Как вставить в ячейку статическую, фиксированную, не обновляемую дату?

Выделите в окне открытого листа ячейку, в которую требуется вставить текущую дату, и нажмите сочетание клавиш Ctrl+; (точка с запятой). При нажатии этого сочетания клавиш делается своего рода «снимок» с текущей даты и вставляется в ячейку. Введенная таким способом дата не изменяется с течением времени, а остается фиксированной.

Как вставить в ячейку текущую автоматически обновляемую дату?

Выберите нужную ячейку на листе Excel и введите в нее, как показано ниже,  функцию «Сегодня», использующую значение системных часов компьютера.

Функцию можно вписать в ячейку вручную с клавиатуры, а можно воспользоваться мастером функций.

Другие материалы по теме:

Одним из распространенных способов использования Excel является создание списков событий, встреч и других мероприятий, связанных с календарем. В то время как Excel способен с легкостью обрабатывать эти данные, он не имеет быстрого способа визуализировать эту информацию. Нам потребуется немного творчества, условного форматирования, несколько формул и 3 строки кода VBA, чтобы создать симпатичный, интерактивный календарь. Рассмотрим, как можем все это реализовать.

Я нашел этот пример на сайте Chandoo.org и делюсь им с вами.

Интерактивный календарь в Excel

На выходе у нас должно получиться что-то вроде этого:

Создаем таблицу с событиями

На листе Расчеты создаем таблицу со всеми событиями

Настраиваем календарь

Так как все события происходят в рамках двух месяцев, я просто ввел первую дату первого месяца, протянул вниз и отформатировал так, чтобы было похоже на календарь. На данном этапе он должен выглядеть следующим образом.

Задаем имя диапазону дат в календаре

Это просто, выделяем весь диапазон дат нашего календаря и в поле Имя задаем «Календарь»

Определяем ячейку с выделенной датой

На листе Расчеты выбираем пустую ячейку и задаем ей имя «ВыделеннаяЯчейка». Мы будем использовать ее для определения даты, которую выбрал пользователь. В нашем случае, это ячейка G3.

Добавляем макрос на событие Worksheet_selectionchange()

Описанный ниже код поможет идентифицировать, когда пользователь выбрал ячейку в диапазоне “Календарь”. Добавьте этот код на лист с календарем. Для этого открываем редактор VBA, нажатием Alt+F11. Копируем код ниже и вставляем его Лист1.

1
2
3
4
5

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range(«calendar»)) Is Nothing Then
= ActiveCell.Value
End If
End Sub

Настраиваем формулы для отображения деталей при выборе даты

Изменение даты на календаре ведет за собой изменение 4-х параметров отображения в анонсе: название, дата, место и описание. Зная, что дата находится в ячейке «ВыделеннаяЯчейка», воспользуемся формулами ВПР, ЕСЛИ и ЕСЛИОШИБКА для определения этих параметров. Логика формул следующая: если на выбранную дату существует событие, возвращает данные этого события, иначе возвращает пустую ячейку. Формулы с определением параметров события находятся на листе Расчеты, в ячейках G10:G13.

Добавление анонса

Наконец добавляем в лист Календарь 4 элемента Надпись и привязываем их к данным, находящихся в ячейках G10:G13 листа Расчеты.

Совет: для того, чтобы привязать значение ячейки к элементу Надпись, просто выделите элемент, в строке формул наберите G10 и щелкните Enter.

Настраиваем условное форматирование для выделенной даты

Наконец, добавьте условное форматирование, чтобы выделить даты с событиями в календаре.

Выберите диапазон дат в календаре

Переходим на вкладке Главная в группу Стили –> Условное форматирование –> Создать правило

В диалоговом окне Создание правила форматирования, выберите тип правила Использовать формулу для определения форматируемых ячеек.

Задаем правила выделения как на рисунке

Форматируем

Подчищаем рабочий лист, форматируем наш календарь и получаем классную визуализацию.

Пример рабочей книги с интерактивным календарем.

Понравилась статья? Поделить с друзьями:
  • Excel меньше либо равно в формуле
  • Excel меньше или равно ячейке
  • Excel мен ж?мыс жасау
  • Excel межстрочное расстояние в ячейке
  • Excel мен ж?мыс жасап ?йрену