Excel окно ввода даты

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

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

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

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

	Windows Date Picker Автор: Ron de Bruin Цена: бесплатно Ссылка Устанавливается как надстройка (есть версии для старых Excel 200-2003 и для новых Excel 2007-2010 и, отдельно, для Excel 2013.  Вызывается через контекстное меню ячейки (правой кнопкой мыши по ячейке — Date Picker).  Позволяет вставлять дату в нескольких форматах, вплоть до номера недели (по разным стандартам).  Автоматически подстраивается под российский стандарт недели (с понедельника).
	Excel Date Picker Автор: Jim Cone Цена: бесплатно Ссылка Макрос (не надстройка!) с открытым кодом VBA — можно посмотреть как всё устроено и модернизировать «под себя». Но надо копировать код в каждый используемый файл и вызывать нажатием на кнопку или сочетанием клавиш, т.е. универсальность хромает.  Удобная система прокрутки лет и месяцев.  Российскую неделю (с понедельника) знает.  Каких-либо настроек нет.
	Mini Calendar and Date Picker Автор: VERTEX Цена: бесплатно. Ссылка в Office Apps Store Работает только в Excel 2013, добавляется через магазин приложений Office App Store на вкладке Вставка — Приложения для Office (Insert — Office Apps Store).  Вставляется на лист как постоянный графический объект и добавляет выбранную дату в любую выделенную предварительно ячейку.  Умеет менять стандарты недели, отображать номера недель, вводить не только дату, но и время.  Есть возможность задавать темы оформления.  Нет кнопки перехода к текущему дню.
	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

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

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

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

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

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

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

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

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

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

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

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

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

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

   • Чтобы вставить текущее время, нажмите + ; (точка с за semi-двоеточием).

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

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

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

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

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

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

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

   • Чтобы вставить дату, введите дату (например, 2/2) и щелкните Главная > числовом формате (на вкладке Число) >Краткий формат даты или Длинный формат даты.

   • Чтобы вставить время, введите время, а затем щелкните Главная > числовом формате (на вкладке Число) >время.

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

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

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

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

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

Например:

Формула	Описание (результат)
=СЕГОДНЯ()	Текущая дата (значения могут быть разными)
=ТДАТА()	Текущие дата и время (значения могут быть разными)

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

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

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

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

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

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

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

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

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

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

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

	Средство выбора даты Windows Автор: Рон де Брюин Цена: бесплатно Связь Устанавливается как надстройка (есть версии для старого Excel 200-2003 и нового Excel 2007-2010, и отдельно для Excel 2013.  Вызывается через контекстное меню ячейки (правой кнопкой мыши по ячейке — Селектор даты).  Позволяет вводить дату в нескольких форматах, вплоть до номера недели (по разным стандартам).  Автоматически подстраивается под российский стандарт недели (с понедельника).
	Средство выбора даты в Excel Автор: Джим Коун Цена: бесплатно Связь Макросы (не надстройка!) С VBA с открытым исходным кодом: вы можете видеть, как все работает, и модернизировать «под себя». Но вы должны скопировать код в каждый используемый файл и вызвать его нажатием кнопки или сочетания клавиш, т.е универсальность хромает.  Удобная раздвижная система на годы и месяцы.  Знает русскую неделю (с понедельника.  Нет никаких настроек.
	Мини-календарь и выбор даты Автор: VERTEX Цена: бесплатно. Ссылка в магазине приложений Office Работает только в Excel 2013, добавляется через Office App Store в Insert — Office Apps Store).  Вставляет на лист как постоянное изображение и добавляет выбранную дату в любую ранее выбранную ячейку.  В нем можно менять стандарты недели, отображать номера недель, вводить не только дату, но и время.  вы можете установить темы.  Нет кнопки для перехода к текущему дню.
	Выбор даты Сэм Радакович, руководитель группы программирования Excel в Microsoft Цена: бесплатно  Сайт автора мертв, ссылки не работают, но вы можете скачать копию, которую я бережно сохранил здесь. Устанавливается как надстройка.  Он вызывается правой кнопкой мыши на ячейке — выберите из календаря или с помощью удобного всплывающего значка календаря справа от ячейки с датой.  Приятный дизайн, показывающий количество дней до выбранной даты от текущей.  Использует стандарт недели США (отображается неделя с воскресенья).  Нет никаких настроек.

P.S.

Установка дополнений:

• в Excel 2003 и более ранних версиях — меню «Инструменты» — «Надстройки» — «Обзор
• в Excel 2007 и более поздних версиях — Файл — Параметры — Надстройки — Перейти — Обзор

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

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

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

Popup Calendar — надежный и проверенный инструмент для выбора даты, которому доверяют более 30 000 пользователей Excel:

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

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

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

Подходит для: Microsoft Excel 2016 — 2007, Office 365 для настольных ПК (32- и 64-разрядных версий).

Загрузите надстройку XLTools

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

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

Предупреждение: отменить последнее действие (UNDO) невозможно. Мы рекомендуем вам сохранить резервную копию ваших файлов или использовать XLTools Version Control для отслеживания изменений.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Используйте надстройку Pop-up Clock для установки и вставки времени в ячейки и диапазоны:

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

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

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

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

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

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

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

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

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

Вкладка XLTools> кнопка Настройки> вкладка Сочетания клавиш> Укажите другой ярлык> ОК.

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

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

• Чтобы отключить отображение значка календаря:

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

• Чтобы настроить внешний вид значка рядом с пустыми ячейками, столбцами, строками или произвольным диапазоном:

1. Выберите пустую ячейку или диапазон.
2. Вкладка Главная> Группа номеров> Дата> ОК. Затем ячейкам будет присвоен формат даты.
   Или: введите любую дату с помощью всплывающего календаря> нажмите кнопку «Удалить». Это приведет к непосредственному удалению значений и присвоению выбранным ячейкам формата даты.
3. Готовый! Теперь, если вы выберете ячейку в этом диапазоне, рядом с ней появится значок календаря.

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

1. Выберите пустую ячейку или диапазон.
2. Вкладка «Главная»> «Редактировать группу»> «Очистить форматы.
   Или: вкладка «Главная»> «Номера групп»> «Общие» в раскрывающемся списке.
   Или: щелкните правой кнопкой мыши «Формат ячеек»> вкладку «Число»> выберите «Общий» формат> ОК.

1. Нажмите кнопку «Настройки» на панели инструментов XLTools> вкладка «Дата / время.
2. Установите или снимите отметку с соответствующих опций:
   • «Добавить пункт« Вставить дату »в контекстное меню»
   • «Добавить пункт« Вставить сейчас »в контекстное меню»
   • «Добавить в контекстное меню пункт« Вставить дату и время»
3. Щелкните OK> Готово.

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

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

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

Ввод и форматирование дат и времени в 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​ и вставьте в​

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

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

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

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

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

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

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

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

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

​ = 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​​Эту операцию осуществляет функция​​ работать (без дополнительных​​По желанию можно дополнительно​ ​Решил сделать в​​ вводим 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, а​

​Исходный текст​ первой ячейке​Параметры автозаполнения​Параметры автозаполнения​ ее текст может​​Для того чтобы применить​ ​ 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)​
​ по умолчанию).​

​ в 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​Использование начальную дату в​Нажмите кнопку​заполнить только форматирования​​ оригинал (на английском​ ​. Здесь Вы также​​ для ввода временных​

​ столбца 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​ заполнить ячейки с​​.​​Копирование содержимого ячейки без​Выполните одно из указанных​ всего интересного.​ примените такой формат,​

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

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

Как 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​

​ = 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 =​​ что-же там можно​ число, как дата,​ этой функции необходимо​

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

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

​ Вам действительно нужно​​ 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​​ :-)​

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

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

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

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

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_, огромное спасибо​