Автоматическое проставление даты в excel при заполнении строки

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

Предположим, у нас имеется таблица заказов, куда пользователь вводит номер заказа, имя клиента, сумму и т.д. Необходимо сделать так, чтобы при внесении номера заказа в столбец А — в столбце B напротив введенного заказа автоматически появлялись дата и время его занесения:

Чтобы реализовать такой ввод даты, нам потребуется простой макрос, который надо добавить в модуль рабочего листа. Для этого щелкните правой кнопкой мыши по ярлычку листа с таблицей и выберите в контекстном меню команду Исходный текст (View code).

В открывшееся окно редактора Visual Basic скопируйте этот текст этого макроса:

Private Sub Worksheet_Change(ByVal Target As Range)
    
    For Each cell In Target   'проходим по всем измененным ячейкам
       If Not Intersect(cell, Range("A2:A100")) Is Nothing Then  'если изменененная ячейка попадает в диапазон A2:A100
            With cell.Offset(0, 1)         'вводим в соседнюю справа ячейку дату
               .Value = Now
               .EntireColumn.AutoFit  'выполняем автоподбор ширины для столбца B, чтобы дата умещалась в ячейке
            End With
       End If
    Next cell
End Sub

При необходимости измените «чувствительный» диапазон «А2:А100» на свой собственный. Если необходимо вставлять дату не в соседний столбец, а правее — подставьте в оператор Offset(0,1) вместо 1 число побольше.

Закройте редактор Visual Basic и попробуйте ввести что-нибудь в диапазон А2:А100. В соседней ячейке тут же появится текущая дата-время!

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

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

Работа с временем и датой – важный аспект использования Microsoft Excel. Сегодня вы узнаете, как можно вводить дату разными способами, как определить сегодняшнюю дату с помощью метки времени или же использовать динамически изменяемые значения. Также вы поймете, с помощью каких действий можно заполнить колонку или ряд днями недели.

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

Как ввести дату в Excel

Пользователь может ввести дату в электронную таблицу самыми разными методами и в различных форматах. Например, можно записать ее как 1 января 2020, а можно – 1.01.2020. Независимо от того, в каком формате указать дату, программа автоматически определит, что пользователь хочет записать ее. Очень часто программа самостоятельно форматирует значение, исходя из формата, установленного в Windows, но в некоторых случаях возможно форматирование в том виде, котором указал пользователь.

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

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

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

Также его можно вызвать с помощью комбинации клавиш Ctrl + 1.

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

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

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

Есть два варианта вставки текущего времени и даты в Эксель: статический и динамический. Первый служит отметкой времени. Второй же вариант позволяет держать всегда актуальную дату и время в ячейке.

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

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

1. Ctrl + ; или Ctrl + Shift + 4 – эти горячие клавиши автоматически вставляют в ячейку ту дату, которая актуальна на момент, когда человек нажимает на эти кнопки.
2. Ctrl + Shift + ; или Ctrl+Shift+6 – с их помощью можно записать текущее время.
3. Если же нужно вставить и время, и дату, актуальные на данный момент, необходимо сначала нажать первую комбинацию клавиш, после чего нажать на пробел, и вызвать вторую комбинацию.

Какие конкретно клавиши использовать? Все зависит от раскладки, которая активирована на данный момент. Если сейчас стоит английская раскладка, то используется первая комбинация, если же русская – вторая (то есть, так, которая следует непосредственно за словом «или»).

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

Как правило, закономерность следующая: все зависит от того, какой язык был установлен на момент открытия файла. Если английский, то даже если поменять раскладку на русскую, ситуация не изменится абсолютно. Если же был установлен русский язык, то даже если сменить ее его на английский, то нужно использовать ту формулу, которая подходит для русского языка.

Как поставить неизменную отметку времени автоматически (формулами)

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

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

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

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

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

Какие действия можно предпринять, чтобы достичь этой цели? Например, можно попробовать воспользоваться функцией ЕСЛИ, в которой также будет содержаться эта же функция, но с данными, зависящими от значения другой ячейки. Гораздо проще это продемонстрировать на примере. Формула будет выглядеть так: =ЕСЛИ(B2=»Да»; ЕСЛИ(C2=»»;ТДАТА(); C2); «»)

Расшифруем эту формулу.

• B – это колонка, в которой нам надо записывать подтверждение доставки.
• C2 – это та ячейка, в которой будет выводиться отметка времени после того, как мы запишем в ячейку B2 слово «Да».

Описанная выше формула работает следующим образом. Она проверяет, есть ли слово «Да» в ячейке B2. Если да, то выполняется вторая проверка, которая проверяет, является ли ячейка C2 пустой. Если да, то тогда возвращается текущая дата и время. Если же ни одна из описанных выше функций ЕСЛИ содержат иные параметры, то тогда ничего не меняется.

Если же нужно, чтобы критерий был «если содержится хотя бы какое-то значение», то тогда нужно использовать в условии оператор «не равно» <>. В таком случае формула будет выглядеть так: =ЕСЛИ(B2<>»»; ЕСЛИ(C2=»»;ТДАТА(); C2); «»)

Эта формула работает следующим образом: сначала проверяется, есть ли хоть какое-то содержимое в ячейке. Если да, то запускается вторая проверка. Дальше последовательность действий остается той же самой.

Для полноценной работоспособности этой формулы необходимо включить интерактивные вычисления во вкладке «Файл» и в разделе «Параметры – Формулы». При этом нежелательно делать так, чтобы ссылка ячейки осуществлялась на нее же. Работоспособность от этого будет хуже, а вот функциональность – не улучшится.

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

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

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

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

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

Также можно осуществить автоматическую вставку каждого N дня. Для этого нужно добавить значение к ячейке, щелкнуть правой кнопкой мыши по маркеру автозаполнения, зажать ее и перетащить до того места, в котором должна заканчиваться числовая последовательность. После этого выбираем параметр заполнения «Прогрессия» и выбираем значение шага.

Как поставить текущую дату на колонтитул

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

1. Откройте меню «Вставка», с которого вызовите меню настройки колонтитулов.
2. Добавьте те элементы колонтитулов, которые вам нужны. Это может быть как обычный текст, так и дата, время.

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

Поскольку колонтитулы предназначены для вывода сервисной информации, которая не имеет прямого отношения к содержимому документа, то нет смысла там вставлять формулы и прочее. Если нужно воспользоваться формулами, всегда можно записать нужные значения в первой строке (и добавить пустую строку на этом месте, если уже там хранятся какие-то данные) и закрепить ее через вкладку «Вид» или «Окно» в зависимости от используемой версии офисного пакета (первый вариант для тех редакций, которые были выпущены после 2007 года, а второй – для тех, которые были до этого времени).

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

Автозаполнение датой при записи в соседнюю ячейку

Evgenii72 Дата: Понедельник, 16.01.2017, 20:21 | Сообщение № 1 Группа: Пользователи Ранг: Прохожий Сообщений: 4 Репутация: 0 ± Замечаний: 0% ± Excel 2007 Здравствуйте! Мне нужно при заполнении ячейки B3, в А3 автоматом появлялась сегодняшняя дата. Если В4 я заполнил 13го января, то в А4 появилось -«13.01.2017». Возможно ли это? К сообщению приложен файл: __.xls (17.0 Kb)   Ответить

Che79 Дата: Понедельник, 16.01.2017, 20:30 | Сообщение № 2 Группа: Друзья Ранг: Старожил Сообщений: 1649 Репутация: 306 ± Замечаний: 0% ± 2013 Win, 365 Mac Evgenii72, здравствуйте. Так нужно? Формула в A3 и протянуть вниз Код =ЕСЛИ(B3<>»»;СЕГОДНЯ();»») P.S. Если далее нужно эту дату сохранить, то далее сохраняете как значение Делай нормально и будет нормально! Сообщение отредактировал Che79 — Понедельник, 16.01.2017, 20:32   Ответить

Wasilich Дата: Понедельник, 16.01.2017, 20:39 | Сообщение № 3 Группа: Друзья Ранг: Старожил Сообщений: 1232 Репутация: 326 ± Замечаний: 0% ± 2003 Конечно. В модуль листа. [vba] Код Private Sub Worksheet_Change(ByVal Target As Range)     If Target.Column = 2 Then Target.Offset(, -1) = Date End Sub [/vba]   Ответить

Evgenii72 Дата: Понедельник, 16.01.2017, 20:42 | Сообщение № 4 Группа: Пользователи Ранг: Прохожий Сообщений: 4 Репутация: 0 ± Замечаний: 0% ± Excel 2007 Che79, что-то не срабатывает. В примере ничего не получилось. Попробую еще объяснить, если я буду сегодня заполнять ячейки В6 и С6, то в А6 должна появляться сегодняшняя дата К сообщению приложен файл: 0707955.xls (17.5 Kb)   Ответить

Wasilich Дата: Понедельник, 16.01.2017, 20:49 | Сообщение № 5 Группа: Друзья Ранг: Старожил Сообщений: 1232 Репутация: 326 ± Замечаний: 0% ± 2003 Установите формат ячеек «Дата» но завтра формула покажет завтрашнюю дату.   Ответить

bmv98rus Дата: Понедельник, 16.01.2017, 20:50 | Сообщение № 6 Группа: Друзья Ранг: Участник клуба Сообщений: 4009 Репутация: 760 ± Замечаний: 0% ± Excel 2013/2016 Evgenii72, [vba] Код Private Sub Worksheet_Change(ByVal Target As Range)     If Target.Column = 2 And Target.Row > 1 And Not IsEmpty(Target.Value) Then _         Target.Offset(0, -1).Value = Date End Sub [/vba] И если от Wasilich Не срабатывает, то скорее всего отключена работа макросов. К сообщению приложен файл: Copy_of-.xls (28.0 Kb) Замечательный Временно просто медведь , процентов на 20. Сообщение отредактировал bmv98rus — Понедельник, 16.01.2017, 20:52   Ответить

Evgenii72 Дата: Понедельник, 16.01.2017, 20:52 | Сообщение № 7 Группа: Пользователи Ранг: Прохожий Сообщений: 4 Репутация: 0 ± Замечаний: 0% ± Excel 2007 Wasilich, Спасибо! Кажется получилось , Т.е. «16.01.2017» в А6 завтра поменяется на «17.01.2017»? Мне надо чтобы не менялось) Сообщение отредактировал Evgenii72 — Понедельник, 16.01.2017, 20:57   Ответить

Che79 Дата: Понедельник, 16.01.2017, 20:57 | Сообщение № 8 Группа: Друзья Ранг: Старожил Сообщений: 1649 Репутация: 306 ± Замечаний: 0% ± 2013 Win, 365 Mac Установите формат ячеек «Дата» но завтра формула покажет завтрашнюю дату. именно так, и чтобы сохранить сегодняшнюю дату при открытии файла, допустим завтра, сохраните формулу как значение. если я буду сегодня заполнять ячейки В6 и С6, то в А6 должна появляться сегодняшняя дата тогда формула массива Код {=ЕСЛИ(И(B6:C6<>»»);СЕГОДНЯ();»»)} в файле желтые ячейки К сообщению приложен файл: 0796872.xls (25.5 Kb) Делай нормально и будет нормально!   Ответить

Wasilich Дата: Понедельник, 16.01.2017, 20:58 | Сообщение № 9 Группа: Друзья Ранг: Старожил Сообщений: 1232 Репутация: 326 ± Замечаний: 0% ± 2003 Возьмите код от bmv98rus, так правильней будет, а то я, на лету состряпал. Мне надо чтобы не менялось) Макросом не поменяется. Для формулы, читайте выше. Сообщение отредактировал Wasilich — Понедельник, 16.01.2017, 21:00   Ответить

Evgenii72 Дата: Понедельник, 16.01.2017, 21:13 | Сообщение № 10 Группа: Пользователи Ранг: Прохожий Сообщений: 4 Репутация: 0 ± Замечаний: 0% ± Excel 2007 Всем спасибо, помогли   Ответить

bmv98rus Дата: Понедельник, 16.01.2017, 21:14 | Сообщение № 11 Группа: Друзья Ранг: Участник клуба Сообщений: 4009 Репутация: 760 ± Замечаний: 0% ± Excel 2013/2016 Che79, Нет ну конечно после рабочего дня скопировать и сохранить как значения можно, но если забыл то завтра будет К сообщению приложен файл: 8097493.jpg (53.2 Kb) Замечательный Временно просто медведь , процентов на 20.   Ответить

Che79 Дата: Понедельник, 16.01.2017, 21:19 | Сообщение № 12 Группа: Друзья Ранг: Старожил Сообщений: 1649 Репутация: 306 ± Замечаний: 0% ± 2013 Win, 365 Mac bmv98rus, вот поэтому Ваш вариант на VBA тут безусловно лучше и завтра будет не сегодня, а вчера Делай нормально и будет нормально!   Ответить

kadig1989 Дата: Четверг, 14.10.2021, 00:26 | Сообщение № 13 Группа: Пользователи Ранг: Прохожий Сообщений: 1 Репутация: 0 ± Замечаний: 0% ± По этой же теме есть вопрос. Решение bmv98rus хорошее Решение , но если есть необходимость за более ранние даты поменять стоимость. При изменении стоимости в 1й столбец встает текущая дата, а необходимо, чтобы дата не менялась, если уже была ранее установлена. Сообщение отредактировал kadig1989 — Четверг, 14.10.2021, 00:36   Ответить

Ефгений Дата: Воскресенье, 28.08.2022, 08:56 | Сообщение № 14 Группа: Пользователи Ранг: Участник Сообщений: 79 Репутация: 0 ± Замечаний: 0% ± 2010 Здравствуйте. Подскажите пожалуйста скрипт для заполнения даты в колонке А (без перезаписи даты при изменении), при внесении данных в любую ячейку строки. Пример внёс данные в ячейку B2,C2, D2 и.т.д., а в ячейку А2 подставляется текущая дата. Первая строчка это названия колонок, нужно чтобы скрипт работал начиная со строки 2 Сообщение отредактировал Ефгений — Воскресенье, 28.08.2022, 09:38   Ответить

Александр7034 Дата: Вторник, 14.02.2023, 15:46 | Сообщение № 15 Группа: Пользователи Ранг: Участник Сообщений: 52 [vba] Код Private Sub Worksheet_Change(ByVal Target As Range)     If Target.Column = 2 Then Target.Offset(, -1) = Date End Sub [/vba] Использовал данный код из примера. Но он учитывает данные только внесённые пользователем. А вот, если в этой же колонке часть ячеек берет данные из других ячеек. Или же там вставлены связи на другую книгу. То изменения в другой книге, которые изменит данные в нашей книге, не вызовут фиксацию даты изменения. И подскажите как ограничить размеры колонки. Нужно что бы колонка даты и ячейки вносимых данных учитывалась только на 2-100 строках. Сообщение отредактировал Serge_007 — Вторник, 14.02.2023, 16:02   Ответить

_Boroda_ Дата: Вторник, 14.02.2023, 16:35 | Сообщение № 16 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS [vba] Код If Not Intersect(Target, Range(«B2:B100»)) Is Nothing Then [/vba] Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

Александр7034 Дата: Среда, 15.02.2023, 09:49 | Сообщение № 17 Группа: Пользователи Ранг: Участник Сообщений: 52 [vba] Код Private Sub Worksheet_Change(ByVal Target As Range)   If Not Intersect(Target, Range(«T6:T106»)) Is Nothing Then Target.Offset(, 2) = Date   End Sub [/vba] Теперь код выглядит так. Изменения в колонке T6:T106 фиксируются текущей датой напротив в колонке V. Но остался вопрос как сделать, что бы зависимые ячейки из колонки T6:T106 которые меняют данные автоматически, тоже фиксировались датой изменения. Сообщение отредактировал Александр7034 — Среда, 15.02.2023, 09:50   Ответить

_Boroda_ Дата: Среда, 15.02.2023, 10:15 | Сообщение № 18 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS Александр7034, Для кода макроса существует специальный тег. Это кнопка # (она рядом с той, которую Вы используете (fx)) Поправил Ваш пост, видите, как все красиво сразу стало? )))) меняют данные автоматически, тоже фиксировались датой изменения. А вот это уже сложнее и напрямую зависит от самого файла. Ну, как вариант для общего случая — на событие Worksheet_Calculate повесить фиксирование того, что сейчас в диапазоне (ar1), отмену операции (Undo), фиксирование того, что было (ar0), снова Undo — возврат отмены, сверку ar1 и ar0. Там, где разнятся — там и изменение. Но это не всегда прокатит и вообще не сильно хорошая это идея Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

Александр7034 Дата: Среда, 15.02.2023, 11:00 | Сообщение № 19 Группа: Пользователи Ранг: Участник Сообщений: 52 Для кода макроса существует специальный тег. Это кнопка # (она рядом с той, которую Вы используете (fx)) Спасибо не знал про это. А вот это уже сложнее и напрямую зависит от самого файла. Изначально в ячейки колонки T6:T106 у меня прописана формула, которая использует связи на ячейки с другой книги. Связи обновляются не автоматически при открытии книги, а только после нажатия этой кнопки обновления связей. [vba] Код Private Sub CommandButton1_Click() ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources End Sub [/vba] А часть данных вписывается вручную, формула в этих ячейках затирается и в будущем там только ручной ввод остается. Вот они нормально фиксируется. В моем случай можно как то приписать костыль? Достаточно на момент нажатия кнопки обновления связей, для ячеек где остались ссылки на другую книгу, просто поставить текущую дату? Сообщение отредактировал Александр7034 — Среда, 15.02.2023, 11:01   Ответить

_Boroda_ Дата: Среда, 15.02.2023, 11:08 | Сообщение № 20 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS Приблизительно так [vba] Код Private Sub CommandButton1_Click()     ar0_ = Range(«T6:T106»).Value     ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources     ar1_ = Range(«T6:T106»).Value     ar_ = Range(«V6:V106»).Value     For i = 1 To UBound(ar0_)         If ar1_(i, 1) <> ar0_(i, 1) Then             ar_(i, 1) = Date         End If     Next i     Range(«V6:V106»).Value = ar_ End Sub [/vba] Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

Создание списка последовательных дат

​Смотрите также​​ определенную ячейку?​ из екселя выкидывает​Kvaz​ и начнет суммировать​. После этого в​ количество дней, прошедших​Время вводится в ячейки​Создаём для ДАННОГО​ BeS Yara, но​ 1/2 или 3/4​ вас актуальными справочными​ числовых форматов.​ч​Тип​ клавиши​ Этот формат определяется​Примечание:​vadabaga​ в дебаг.​: Уважаемые! Туплю по​

​ опять с нуля.​ Мастере функций в​ с 1 января​ с использованием двоеточия.​​ листа макрос:​ ​ код “тяжелый” и​​ не заменялись датами​​ материалами на вашем​

Использование маркера заполнения

1. ​К началу страницы​Часов в виде чисел​будет отображен код​CTRL+1​ региональными параметрами даты​

2. ​ Мы стараемся как можно​: Добрый день.​Вторые сутки не​​ черному помогите​ Чтобы этого не​ категории​ 1900 года (взято​ Например​Private Sub Worksheet_Change(ByVal​ очень много ЕСЛИ​ 2 янв или​

3. 

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

1. ​ языке. Эта страница​Чтобы быстро применить формат​ от 00 до​ выбранного в действии​

2. ​.​​ и времени, заданными​​ оперативнее обеспечивать вас​​Подскажите, как сделать​​ могу сообразить как​​ правильно напичать следующее:​​ происходило, нужно применить​​Дата и время​​ за точку отсчета)​​16:45​​ Target As Range)​

​ (если Tab, если​​ 4 мар. Ноль​ переведена автоматически, поэтому​ даты или времени​ 23​ 3 формата даты​В списке​

support.office.com

Форматирование чисел в виде значений даты и времени

​ в панели управления​ актуальными справочными материалами​ чтобы при заполнении​ правильно написать. Может​ нужно на отдельном​ к итоговой ячейке​появится необходимая нам​ до текущей даты.​По желанию можно дополнительно​If ActiveCell.Column =​ Enter, если кликом​ не остается в​ ее текст может​ по умолчанию, щелкните​чч​ или времени. Встроенный​Числовые форматы​ Windows, и меняется​

В этой статье

​ на вашем языке.​ ячейки A1 в​

​ все просто? кто​ листе собирать данные​

​ формат​ функция​

Отображение чисел в виде даты или времени

​ А дробная часть​ уточнить количество секунд​ 3 Then​ мышки).​ ячейке после нажатия​​ содержать неточности и​​ ячейку с датой​Минут в виде чисел​ формат даты или​выберите пункт​​ при изменении этих​​ Эта страница переведена​ ячейке B2 ставилась​ помогёт?​ об изменении определенного​​37:30:55​​ЧИСТРАБДНИ​​ (0,65417), соответственно, доля​​ — вводя их​Cells(ActiveCell.Row, 1).Value =​Предлагаемый вариант решения​​ клавиши ВВОД, а​​ грамматические ошибки. Для​ или временем и​ от 0 до​ времени невозможно изменить​​Дата​​ параметров. Для отображения​​ автоматически, поэтому ее​​ текущая дата и​Rust​ диапазона на любых​:​​(NETWORKDAYS)​​ от суток (1сутки​​ также через двоеточие:​​ Date​ макросом по событию​ тип ячейки становится​​ нас важно, чтобы​​ нажмите клавиши CTRL+SHIFT+#​

1. ​ 59​​ или удалить, поэтому​​или​​ даты и времени​​ текст может содержать​ больше не изменялась?​: Добавь в начало​​ листах в книге​​Janus​

   

   ​.​​ = 1,0)​​16:45:30​End If​​ изменения значений на​​ дробным.​

2. ​ эта статья была​​ или [email protected]​​м​​ можно безопасно перезаписать​​Время​​ можно использовать другие​​ неточности и грамматические​

   

3. ​Serge_007​​ процедуры такую проверку:​​ (в том числе​: прочел о том​

   ​Про то, как это​​Из всех этих фактов​И, наконец, никто не​If ActiveCell.Column =​ листе, код помещается​Примечания:​ вам полезна. Просим​Если после применения к​Минут в виде чисел​

4. ​ его.​.​ форматы, на большинство​ ошибки. Для нас​: http://www.excelworld.ru/publ/hacks/tricks/today_value/17-1-0-32​​If Sh.name=»Обновление» then​​ и добавляемых)​

   

   ​ как сделать Автоматическое​ правильно вычислять, лучше​ следуют два чисто​​ запрещает указывать дату​​ 2 Then​ в модуль листа,​ ​

   

​ вас уделить пару​

Создание пользовательского формата даты или времени

1. ​ ячейке формата даты​​ от 00 до​​Внесите необходимые изменения в​В списке​ из которых параметры​​ важно, чтобы эта​​KuklP​

   

   ​ exit sub​​Пишу примерно так​​ добавление текущей даты​ почитать тут.​​ практических вывода:​​ и время сразу​

2. ​Cells(ActiveCell.Row — 1,​​ в котором заполняются​​Если вы планируете использовать​​ секунд и сообщить,​​ или времени в​​ 59​​ формат в поле​Тип​ панели управления не​ статья была вам​: Этот вопрос чаще​Т.к. внося инфу​ (есть лист «обновления»​ в ячейку -​Поскольку одни сутки в​Во-первых, Excel не умеет​

3. ​ вместе через пробел,​​ 1).Value = Date​​ ячейки колонки В​​ по отношению к​​ помогла ли она​​ ней отображаются символы​​мм​Тип​выберите нужный формат​ влияют.​ полезна. Просим вас​ чем раз в​ об изменениях в​ на который хочу​ спасибо — очень​

4. ​ системе отсчета даты​ работать (без дополнительных​​ то есть ​​End If​Код​ данным функции поиска,​ вам, с помощью​

   ​;##​​Секунд в виде чисел​

​. При этом можно​	​ даты или времени.​
​Отображение чисел в виде​ уделить пару секунд​ неделю задают. Наберите​	​ ячеку, процедура снова​
​ собирать данные о​ интересно​ Excel принимаются за​	​ настроек) с датами​
​27.10.2012 16:45​End Sub​	​Private Sub Worksheet_Change(ByVal​
​ мы рекомендуем использовать​ кнопок внизу страницы.​	​, вероятно, ширина ячейки​
​ от 0 до​ использовать любые из​	​Примечание:​
​ даты или времени​ и сообщить, помогла​ в поиске: «ставилась​	​ вызывается.​
​ изменениях на других​Возник вопрос как​ единицу (см.выше), то​	​ ранее 1 января​
​Для ввода сегодняшней даты​При изменении листа​	​ Target As Range)​
​ апостроф вместо пробела​ Для удобства также​	​ недостаточна для отображения​
​ 59​ кодов, указанных в​ Форматы даты и времени,​	​Создание пользовательского формата даты​
​ ли она вам,​ текущая дата».​	​Serge Bliznykov​

​ листах)​ сделать что-бы в​ для вычисления даты,​ 1900 года. Но​ в текущую ячейку​ проверяется колонка -​If Target.Column =​

​ для ввода данных.​

​ приводим ссылку на​	​ данных. Чтобы увеличить​
​с​ приведенных ниже таблицах.​ отмеченные звездочкой (*),​	​ или времени​
​ с помощью кнопок​vadabaga​: а ещё можно​	​Private Sub Workbook_SheetChange(ByVal​
​ определенный столбец добавлялась​ отстоящей от заданной​ это мы переживем!​	​ можно воспользоваться сочетанием​
​ если третья, значит​ 2 Then Cells(Target.Row,​ Такие функции, как​	​ оригинал (на английском​
​ ширину столбца, содержащего​Секунд в виде чисел​Дни, месяцы и годы​	​ зависят от параметров​
​Советы по отображению даты​ внизу страницы. Для​: спасибо, но это​	​ попробовать добавить код​
​ Sh As Object,​ текущая дата при​	​ на, допустим, 20​
​ ;)​ клавиш​	​ завершение ввода было​
​ 1) = IIf(Cells(Target.Row,​ СОВПАД и VLOOKUP​	​ языке) .​
​ данные ячейки, дважды​ от 00 до​	​   ​
​ даты и времени​ и времени​	​ удобства также приводим​
​ не совсем то​	​ против зацикливания (вызова​
​ ByVal Target As​	​ изменении содержания в​

​ дней, достаточно прибавить​​Во-вторых, с датами и​Ctrl + Ж​ по табу (пишем​ Target.Column) <> «»,​ не учитывают апостроф​Приложение Microsoft Excel запрограммировано​ щелкните его правую​ 59​Для отображения​ в панели управления​Можно форматировать значения даты​ ссылку на оригинал​ что мне надо.​ процедурой самой себя…)​ Range)​ любой из ячеек​ к дате это​ временем в Excel​(или​ дату в туже​ Date, «»)​ при вычислении результатов.​

​ на упрощение введения​ границу. Ширина столбца​сс​Используйте код​ Windows. На форматы​ и времени при​ (на английском языке).​ Уже разобрался сам.​вначале, сразу после​If Target.Cells.Count >​

​ заданного диапазона​

Советы по отображению даты и времени

• ​ число.​ возможно выполнять любые​CTRL+SHIFT+4​ строку, в первую​End Sub​Если число в ячейке​ дат. Например, 02.12​

• ​ будет автоматически изменена​Часов в формате «4​Месяцев в виде чисел​ без звездочки эти​​ вводе. Например, если​​Вы можете быстро создать​ формулой =ЕСЛИ(A15;СЕГОДНЯ();123)​ Private Sub Workbook_SheetChange(…)​ 1 Then Exit​и как вставить​Эту операцию осуществляет функция​ математические операции. Именно​если у вас​ колонку) ; если​Трим​ выровнено по левому​ преобразовывается во 2​ таким образом, чтобы​

• ​ AM»​ от 1 до​ параметры не влияют.​ ввести в ячейку​​ список дат в​​Serge_007​​Application.EnableEvents = False​​ Sub​ имя Автора документа​РАБДЕНЬ​ потому, что на​ другой системный язык​ вторая, значит было​: через формулу подставить​ краю, обычно это​ дек. Это очень​ отобразить содержимое ячеек.​​Ч AM/PM​​ 12​Для отображения даты и​ значение​​ последовательном порядке с​​: Этой формулой Вы​​…​​If Not Intersect(Target,​

• ​ (того кто его​(WORKDAY)​ самом деле они​ по умолчанию).​ завершение ввода данных​ дату и потом​ означает, что оно​ раздражает, когда необходимо​ Можно также перетащить​Времени в формате «4:36​м​ времени в формате​2/2​ помощью​ не добьётесь того​потом, в конце​ Range(«A1:k1000»)) Is Nothing​

support.office.com

Отмена автоматической замены чисел датами

​ последним редактировал)? тк​​. Она позволяет вычислить​ — числа! А​Если скопировать ячейку с​ по ENTER(пишем дату​ маркером автозаполнения заполнять​ не отформатировано как​ ввести число, которое​ правую границу столбца​ PM»​Месяцев в виде чисел​ другого языка выберите​, Excel автоматически интерпретирует​маркера заполнения​ что бы​Application.EnableEvents = True​ Then​ с файлом работают​ дату, отстоящую вперед​ вот это уже​ датой (протянуть за​ в предидущей строке,​

​ весь столбец А​ число.​ не нужно превращать​ до необходимой ширины.​Ч:мм AM/PM​ от 01 до​ нужный вариант в​ его как дату​или команды​Цитата​Neronero​Target(1, 20).Value =​

​ несколько людей и​ или назад относительно​ раскрывает перед пользователем​ правый нижний угол​ в первую колонку).​Иван леконтцев​При введении в ячейку​

1. ​ в дату. К​Если попытаться отменить применение​

2. ​Времени в формате «4:36:03​ 12​ поле​ и отображает в​Заполнить​(vadabaga, 17.08.2013 в​​: не могу найти​​ Now​

3. ​ он лежит в​​ начальной даты на​​ массу возможностей.​​ ячейки), удерживая​​На 2003-ем работает.​

​: формула:​ числа с буквой​ сожалению, выключить эту​ формата даты или​ P»​мм​

• ​Язык (местоположение)​ ячейке дату​.​ 20:05, в сообщении​ (вкладка Вычисления в​

• ​For i =​ общей папке на​ нужное количество рабочих​Считается простым вычитанием -​правую​

• ​Если после ввода​=ЕСЛИ (B1>0;СЕГОДНЯ ();»»)​ «е», например 1e9,​ опцию невозможно. Но​ времени путем выбора​Ч:мм:сс A/P​Месяцев в виде «янв»​.​02.фев​Выделите ячейку, содержащую первую​ №1)200?’200px’:»+(this.scrollHeight+5)+’px’);»>ставилась текущая дата​ Параметрах):​

  ​ 2 To Sheets.Count​​ сервере​

  • ​ дней (с учетом​ из конечной даты​кнопку мыши, то​ данных во втором​Если В1 больше​ оно автоматически преобразуется​ ее можно обойти.​ варианта​Истекшего времени в часах;​ — «дек»​

  • ​Число в активной ячейке​. Если такой формат​ дату. Перетащите маркер​ и больше не​vikttur​Sheets(«Обновления»).Cells(i, 1).Value =​

  • ​Ajax​ выходных суббот и​ вычитаем начальную и​ можно выбрать -​ столбце завершать ввод​ нуля-вставляет текущую дату,​ в научное число:​Установите для ячеек, в​

  • ​Общий​ например 25:02​ммм​ выделения на листе​ не подходит (например,​ заполнения по смежным​ изменялась?​: Сервис-Параметры-Вычисления-Итерации.​ «Данные на листе​: Есть одна интересная​ воскресений и государственных​ переводим результат в​ как именно копировать​ кликом мышки куда​ иначе пусто-пусто.​​ 1,00E+09. Чтобы избежать​​ которые необходимо ввести​в списке​

support.office.com

Подскажите, как сделать автоматическое добавление текущей даты в ячейку в excel???

​[ч]:мм​Месяцев в виде «январь»​ отображается в поле​ нужно отобразить дату​ ячейкам, которые нужно​

​Я веду реестр дел​​Gоказанная формула сработает​ »» & Sheets(i).Name​ фишка, только чтобы​ праздинков). Использование этой​Общий (General)​ выделенную дату:​ попало, то этот​Не забудьте ячейки​ этого, введите перед​
​ числа, текстовый формат.​Числовые форматы​Истекшего времени в минутах;​ — «декабрь»​Образец​ в ячейке как​ заполнить последовательными датами.​ в Экселе. Выглядит​ только единожды -​ & «» последний​
​ она работала необходимо​ функции полностью аналогично​числовой формат, чтобы​Если Вам часто приходится​ макрос толку никакого​ с формулой перевести​ числом апостроф: ‘1e9​
​ В таком случае​
​, в Excel отобразится​ например 63:46​
​мммм​, что позволяет просматривать​2 февраля 2009 г.​Щелкните в нижнем правом​ это так: Дата,​
​ при введении данных​

​ раз обновлялись -«​​ включить галку в​ применению функции​ показать разницу в​ вводить различные даты​

​ не даст :(​​ в формат даты.​
​В зависимости от введенного​
​ Excel не будет​ числовой код. Если​[мм]:сс​
​Месяцев в виде первой​ выбранные параметры форматирования​или​ углу ячейки маркер​ время, суть (три​ в ячейку.​

​ Параметрах):​​ родили? Нет? Уверены?​
​ и праздники. Для​

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

Видео

​Если нужно, чтобы в​ быстро — смотрим​: Есть конечно функция​ это означает, что​Нажмите сочетание клавиш CTRL​

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

​ умолчанию. Чтобы ввести​AM и PM​ 31​нажмите кнопку вызова​Формат ячеек​ ряду. Маркер заполнения​

​ какой-то макрос, который​	​Подробнее-поиск по форуму​
​End Sub​	​Например, если нужно,​
​ Можно легко проверить​	​ такого расчета лучше​
​ ячейке всегда была​	​ видео. Подробности и​

​ СЕГОДНЯ (), но​ число сохранено как​ + 1 (клавиша​ дату или время​   .  Если формат содержит обозначение​д​ диалогового окна рядом​, как описано в​ можно перетаскивать вверх,​ при заполнении третьего​ по слову «Итерации».​​Но как-то коряво​ ​ чтобы в столбце​​ при помощи функции​

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

​ она будет пересчитываться​

​ текст, для Excel​ 1 из строки​ в особом формате,​ AM или PM,​

​Дней в виде чисел​

​ с именем группы​ приведенной ниже процедуре.​ вниз и по​ столбца в строке​Плюс такого решения​

​ все это не​

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

​ А автоматически появлялась​ДЕНЬНЕД​ЧИСТРАБДНИ​ — лучше воспользоваться​​ тексте ниже:​​ по текущей дате,​​ возникает ошибка. Пропуск​​ цифр над клавишами​ например​ применяется 12-часовая система,​

​ от 01 до​Число​ Аналогично, если вести​ горизонтали в пределах​​ в первые два​​ — не нужно​ работает на​ дата, когда в​(WEEKDAY)​

​(NETWORKDAYS)​ функцией​Если иметь ввиду российские​ поэтому не очень​ треугольник либо щелкнуть​ QWERTY), чтобы открыть​

​январь 2010​ где «AM» или​ 31​.​ в ячейку значение​​ листа.​ ​ сам подставлял текущую​​ использовать VBA.​

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

​ сколько я понимаю,​ столбце B в​из категории​​из категории​​СЕГОДНЯ​ региональные настройки, то​​ подходит (копировать вручную​​ его. Поле будет​​ окно​​, можно отформатировать значение​​ «A» указывает на​​дд​Чтобы открыть диалоговое окно​

​9:30 a​Выделите ячейку с первой​ дату и время​

​О неудобствах данной​ первая часть макроса​ соответствующую строчку чего-нибудь​Дата и время​Дата и время​(TODAY)​ Excel позволяет вводить​ значение тоже не​ отображаться в левой​Формат ячеек​ как текст, выбрав​ время суток от​Дней в виде «Пн»​Формат ячеек​или​ датой. Затем выделите​ и чтобы дата​

​ возможности Excel Ajax​ (до фора) работает​ вводится, то можно​

• ​.​. В качестве аргументов​:​ дату очень разными​ вариант).​ части экрана. Щелкните​.​
• ​ пункт​ полуночи до полудня,​ — «Вс»​, также можно нажать​9:30 p​ диапазон ячеек, которые​ заполнения потом самостоятельно​ написал.​ на активном листе​ забить в столбец​

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

​Первый аргумент этой функции​ этой функции необходимо​Если выделить ячейку с​ способами — и​​Полуавтоматический вариант предложить​​ поле и нажмите​Выберите пункт​Текстовый​

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

​ а «PM» или​ддд​ клавиши​, Excel автоматически интерпретирует​ нужно заполнить.​ не менялась?​​Guest​ ​ (но в явном​​ А следующую формулу:​​ — ячейка с​​ указать начальную и​ датой и установить​ понимает их все:​ сходу могу :)​ кнопку​Текстовый​в списке​ «P» — на время​

​Дней в виде «понедельник»​​CTRL+1​ его как время​Выберите​Звонок​: Сервис-Параметры-Вычисления-Итерации.​ виде это не​=ЕСЛИ(ЕПУСТО(B1);» «;ЕСЛИ(А1=» «;ТДАТА();A1)).​​ датой, второй -​​ конечную даты и​ для нее​​»Классическая» форма​ ​Создаём макрос:​​Пропустить ошибку​и нажмите кнопку​​Числовые форматы​ ​ суток от полудня​​ — «воскресенье»​.​ и отображает в​​Главная​​: вбей в ячейку​Gоказанная формула сработает​​ сказано, да и​ ​Тут только есть​​ тип отсчета дней​

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

​ ячейки с датами​Общий формат​3.10.2006​

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

​Sub TodayDay()​, которые сделают треугольник​OK​.​ до полуночи. В​дддд​В списке​ ячейке время​>​ формулу с условием​

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

​ только единожды -​​ для приведенного выше​ ​ проблема — это​​ недели (самый удобный​ выходных (государственных праздников,​(правой кнопкой по​Сокращенная форма​Cells(ActiveCell.Row, 1).Value =​ исчезнуть.​.​Чтобы быстро ввести текущую​ противном случае используется​Лет в виде чисел​Числовые форматы​​9:30 AM​ ​Редактирование​​ что если поле​

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

​ при введении данных​ примера был только​ то, что разрешение​ — 2).  ​​ больничных дней, отпусков,​ ​ ячейке​​3.10.06​​ Date​​Что надо сделать что​

​Если вам нужно ввести​ дату, выберите любую​ 24-часовая система. Код​ от 00 до​выберите пункт​или​

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

​>​ пустое вогнать туда​ в ячейку.​ один лист, соответственно​ на использование подобных​Поскольку время в Excel,​ отгулов и т.д.):​Формат ячеек​С использованием дефисов​End Sub​ бы при заполнении​ всего несколько чисел,​

​ пустую ячейку на​ «м» или «мм»​ 99​Дата​9:30 PM​Заполнить​ дату и время..​Для контроля изменения​ не было необходимости​ формул не является​ как было сказано​Примечание​​- вкладка​​3-10-6​

planetaexcel.ru

Автоматическое добавление текущей даты и имени пользователя

​Назначаем макросу горячую​​ столбца B в​ можно прекратить их​ листе и нажмите​ должен располагаться непосредственно​гг​или​
​. Формат отображения времени​>​Energo73​ данных в исходной​ явно указывать). А​ однозначным атрибутом данной​ выше, такое же​
​: Эта функция появилась​Число​С использованием дроби​ клавишу (например Ctrl-D),​ столбце A автоматически​ преобразование в даты​ клавиши CTRL+; (точка​ после кода «ч»​Лет в виде чисел​

​Время​​ также можно настроить​Прогрессия​: Здравствуйте! При создании​ ячейке необходимо использовать​ вторая часть работает​ конкретной книги, а​ число, как дата,​ в стандартном наборе​-​
​3/10/6​ после ввода данных​ вставлялась текущая дата?​ одним из таких​ с запятой), а​ или «чч» или​ 1900 от 9999​, а затем выберите​ в диалоговом окне​
​>​
​ протокола приходится писать​ несколько служебных ячеек.​ на половину -​ будет применяться ко​ но только дробная​ функций Excel начиная​Общий​Внешний вид (отображение) даты​ в столбце B​Алексей матевосов (alexm)​ способов:​ затем, если необходимо,​ непосредственно перед кодом​гггг​ формат, наиболее близкий​Формат ячеек​Единицы​ каждый раз дату​Подробнее-поиск по форуму​ те текст пишется,​ всем открытым книгам​

​Число​​ другие данные. По​. Подскажите что нужно​
​О неудобствах данной​ ни чего, вроде​
​ какая книга (с​ сложение, вычитание и​. Для этого идем​На самом деле любую​

​ т.д.) и задается​​ редактирования по ENTER,​ день или еще​добавить перед числом апостроф​ листа или перерасчете​
​ может показаться сложной​ не месяцы, а​
​ существующий формат, чем​
​нажмите кнопку вызова​
​ умолчанию даты сортируются​
​ сделать, что бы​

​ возможности Excel Ajax​​ как правильно. А​ разрешенными кольцевыми ссылками​ т.д.​

​ куда будет вставляться​​ текущую дату.​ не отображается после​ и нажмите клавишу​ раньше. Дополнительные сведения​Для отображения​

planetaexcel.ru

автоматическое подставление текущей даты при заполнении стр (Формулы)

​В списке​​Число​
​При вводе в ячейку​27 марта 2015 г​Светлана​ макроса («If Not​ продвинутые юзеры меня​ нескольких временных интервалов​

​и ставим галочку​​ число с целой​

​ и далее​​ дата — Cells(ActiveCell.Row​Данную задачу можно​ нажатия клавиши ВВОД;​ ВВОД.​ о создании пользовательских​

​Используйте код​​Числовые форматы​.​ даты или времени​.​: С датами все​

​ Intersect…») затык -​​ поправят, если что-то​ сумма получилась больше​ напротив​​ и дробной частью.​​Формат ячеек​ — 1, 1).​ решить макросом по​добавить перед дробным числом​Примечание:​

excelworld.ru

Автоматическая подстановка даты в Экселе. Как сделать?

​ числовых форматов см.​Часов в виде чисел​выберите пункт​Чтобы открыть диалоговое окно​ к ним применяется​Все разобрался, нужно​ понятно. подскажите, как​ начинает ругаться по​ не совсем точно​ 24 часов, то​Пакет анализа​ Целая часть числа​(Format Cells)​|======================================================|​ событию изменения на​ ноль и пробел,​Мы стараемся как​

​ в статье Создание​​ от 0 до​(все форматы)​Формат ячеек​ формат даты и​ было сменить формат​

Автоматическая простановка даты

​ сделать чтобы автоматически​​ всякому и есстественно​ здесь написал).​ Excel обнулит ее​(Analisys Toolpak)​ (41209) — это​:​​Более автоматизированный вариант.​​ листе, как показал​ например, чтобы числа​ можно оперативнее обеспечивать​ и удаление пользовательских​​ 23​​. В поле​
​, также можно нажать​ времени по умолчанию.​ ячейки​

CyberForum.ru

​ добавлялся пользователь в​

Создание списка последовательных дат

В этом курсе:

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

Вы можете быстро создать список дат в последовательном порядке с помощью маркера заполнения или команды Заполнить.

Использование маркера заполнения

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

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

Использование команды Fill

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

Выберите Главная > Редактирование > Заполнить > Прогрессия > Единицы. Выберите нужную единицу.

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

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

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

Автоматически ставить дату

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

Такая комбинация вставляет в активную ячейку текущую дату.

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

А функция «=ТДАТА()» — время и дату.

Покоряйте Excel и до новых встреч!

Комментарии:

1. Вася-хлеборез — 19.01.2015 12:37

Спасибо. Огромное спасибо. 1111

Нарик — 10.03.2015 05:06

Саша — 30.09.2015 15:13

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

Oleg — 25.01.2016 19:52

А вот такой случай; есть таблица для списка (1 столбец — список, 2 столбец — дата). Хотелось бы, чтобы при заполнении ячейки 1 столбца в ячейке второго столбца проставлялась дата, но потом она не менялась на следующий день…
=ЕСЛИ(А1=»»;»»;СЕГОДНЯ()), но сегодня обновляется каждый день.

Microsoft Excel

трюки • приёмы • решения

Как в таблице Excel сгенерировать несколько дат

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

Использование автозаполнения

Наиболее эффективный способ ввести несколько дат, который не требует никаких формул, — использование функции автоматического заполнения. Введите первую дату, а затем перетащите маркер заполнения ячейки, нажимая при этом правую кнопку мыши. Отпустите кнопку мыши и выберите команду контекстного меню Заполнить по месяцам (рис. 108.1).

Рис. 108.1. Использование функции автозаполнения для создания серии дат

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

Использование формул

Еще один способ ввести ряд дат основан на использовании формул. Преимущество формулы (а не функции автозаполнения) состоит в том, что вы можете изменить первую дату, а все остальные обновятся автоматически. Введите начальную дату в ячейку, а затем используйте формулы (копируя вниз по столбцу) для создания дополнительных дат. В следующих примерах предположим, что вы ввели первую дату из серии в ячейку А1, а формулу — в ячейку А2. Затем можно скопировать эту формулу вниз по столбцу столько раз, сколько это необходимо.

Для генерации серии дат, разделенных семью днями, используйте такую формулу: =A1+7 .

Для создания серии дат, разделенных одним месяцем, используйте следующую формулу: =ДАТА(ГОД(A1);МЕСЯЦ(A1)+1;ДЕНЬ(A1))

Для создания серии дат, разделенных одним годом, используйте эту формулу: =ДАТА(ГОД(A1)+1;МЕСЯЦ(A1);ДЕНЬ(A1)

Для создания серии, включающей только будние дни (все дни, кроме субботы и воскресенья), используйте следующую формулу. Она предполагает, что дата в ячейке А1 не является выходным днем: =ЕСЛИ(ДЕНЬНЕД(A1)=6;A1+3;A1+1) . Эта формула возвращает серийный номер даты, так что вам нужно отформатировать ячейки для отображения дат.

Вставка текущей даты в Excel разными способами

Самый простой и быстрый способ ввести в ячейку текущую дату или время – это нажать комбинацию горячих клавиш CTRL+«;» (текущая дата) и CTRL+SHIFT+«;» (текущее время).

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

Как поставить текущую дату в Excel

Чтобы вставить текущую дату в Excel воспользуйтесь функцией СЕГОДНЯ(). Для этого выберите инструмент «Формулы»-«Дата и время»-«СЕГОДНЯ». Данная функция не имеет аргументов, поэтому вы можете просто ввести в ячейку: «=СЕГОДНЯ()» и нажать ВВОД.

Текущая дата в ячейке:

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

Текущая дата и время в ячейке.

Как установить текущую дату в Excel на колонтитулах

Вставка текущей даты в Excel реализуется несколькими способами:

1. Задав параметры колонтитулов. Преимущество данного способа в том, что текущая дата и время проставляются сразу на все страницы одновременно.
2. Используя функцию СЕГОДНЯ().
3. Используя комбинацию горячих клавиш CTRL+; – для установки текущей даты и CTRL+SHIFT+; – для установки текущего времени. Недостаток – в данном способе не будет автоматически обновляться значение ячейки на текущие показатели, при открытии документа. Но в некоторых случаях данных недостаток является преимуществом.
4. С помощью VBA макросов используя в коде программы функции: Date();Time();Now() .

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

Чтобы сделать текущую дату в Excel и нумерацию страниц с помощью колонтитулов сделайте так:

1. Откройте окно «Параметры страницы» и выберите закладку «Колонтитулы».
2. Нажмите на кнопку создать нижний колонтитул.
3. В появившемся окне щелкните по полю «В центре:». На панели выберите вторую кнопку ««Вставить номер страницы»». Потом выберите первую кнопку «Формат текста» и задайте формат для отображения номеров страниц (например, полужирный шрифт, а размер шрифта 14 пунктов).
4. Для установки текущей даты и времени щелкните по полю «Справа:», а затем щелкните по кнопке «Вставить дату» (при необходимости щелкните на кнопку «Вставить время»). И нажмите ОК на обоих диалоговых окнах. В данных полях можно вводить свой текст.
5. Нажмите на кнопку ОК и обратите на предварительный результат отображения колонтитула. Ниже выпадающего списка «Нижний колонтитул».
6. Для предварительного просмотра колонтитулов перейдите в меню «Вид»-«Разметка страницы». Там же можно их редактировать.

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

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

Департамент ИТ

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

В Word для вставки даты/времени нужно щелкнуть по кнопке «Дата и время» в меню «Вставка» (см. рис. 1).

Рис. 1

Можно выбрать различные форматы даты и времени, язык, а также установить галку «Обновлять автоматически» для того, чтобы Word вставил т.н. «поле», содержащее дату и время. Содержимое поля обновляется при каждом открытии документа (также можно щелкнуть по полю правой кнопкой мыши и выбрать «Обновить поле», см. рис. 2).

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

В Excel вставка текущих даты и времени производится иначе.

Для вставки в ячейку текстовых (фиксированных) значений даты и времени достаточно, установив курсор на ячейку, нажать сочетание клавиш Ctrl-Ж для вставки текущей даты, либо Ctrl-Shift-Ж для вставки текущего времени.

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

Обратите внимание на следующие моменты:

1) Функции вставляются с пустыми аргументами, т.е. как «СЕГОДНЯ ()»;

2) Если формат ячеек был установлен как «числовой», то при вставке функций «СЕГОДНЯ» и «ТДАТА» время будет представлено как число (внутреннее представление Excel), по умолчанию день 1 января 1900 г. имеет номер 1, а 1 января 2008 — 39 448. Для отображения даты, нужно выбрать формат ячеек «Дата», в меню «Формат ячеек» (нужно щелкнуть по ячейке правой кнопкой мыши и выбрать «Формат ячеек», см. рис.4).