Открыть лист excel по дате

 

Gina

Пользователь

Сообщений: 10
Регистрация: 03.09.2014

Всем добрый день!Очень прошу вашей помощи в написании кода. Есть книга Эксель, с листами, которые называются, соответственно названиям месяцев: ЯНВ, ФЕВ, МАР, АПР и т.д. Нужно, чтобы VBA опрелял текущий месяц и открывал нужный лист, соответствующий этому месяцу.
Заранее спасибо за помощь!

 

Kuzmich

Пользователь

Сообщений: 7998
Регистрация: 21.12.2012

#2

18.08.2017 14:28:05

Цитата
Есть книга Эксель, с листами

А у нас их нет

 

Lex4990

Пользователь

Сообщений: 19
Регистрация: 19.07.2017

#3

18.08.2017 14:29:53

Как вариант

Код
dim dt as string
dt = format(Now(), "mmm")

dt = switch( dt = "Январь", "ЯНВ", dt = "Февраль", "ФЕВ" и т.п. и т.д.)
 

Kuzmich

Пользователь

Сообщений: 7998
Регистрация: 21.12.2012

Lex4990,
А, если, какого-то листа не будет в книге?

 

Lex4990

Пользователь

Сообщений: 19
Регистрация: 19.07.2017

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

 

Gina

Пользователь

Сообщений: 10
Регистрация: 03.09.2014

#6

18.08.2017 15:39:22

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

Код
Sub OpenF()
Dim a As String 'путь к родительской папке
Dim b As String 'путь к папке, где находится файл
Dim c As String 'имя файла, который нужно открыть

a = Sheets("Адрес").Range("B1") 'указываем значение переменной а, которое является путем к родительской папке
b = Sheets("Адрес").Range("B2") 'указываем значение переменной b, которое является путем к папке, где находится файл
c = Sheets("Адрес").Range("B3") 'указываем значение переменной c, которое является названием файла

Application.Workbooks.Open a & b & c 'открываем файл

End Sub

Изменено: Gina18.08.2017 15:39:53

 

Lex4990

Пользователь

Сообщений: 19
Регистрация: 19.07.2017

#7

18.08.2017 15:43:53

Код
Sub OpenF()
Dim a As String 'путь к родительской папке
Dim b As String 'путь к папке, где находится файл
Dim c As String 'имя файла, который нужно открыть
Dim dt as string
 
a = Sheets("Адрес").Range("B1") 'указываем значение переменной а, которое является путем к родительской папке
b = Sheets("Адрес").Range("B2") 'указываем значение переменной b, которое является путем к папке, где находится файл
c = Sheets("Адрес").Range("B3") 'указываем значение переменной c, которое является названием файла

dt = format(Now(), "mmm")
dt = switch( dt = "Январь", "ЯНВ", dt = "Февраль", "ФЕВ" и т.п. и т.д.)
 
Application.Workbooks.Open a & b & c 'открываем файл
Sheets(dt).Activate
 
End Sub

Изменено: Lex499018.08.2017 15:44:11

 

Gina

Пользователь

Сообщений: 10
Регистрация: 03.09.2014

#8

18.08.2017 17:01:38

Lex4990, к сожалению, выдается ошибка «Run time error ’94’: Invalid use of Null» на этапе после выполнения этой строки:

Код
dt = switch( dt = "Январь.....

и перед выполнением следующей:

Код
Application.Workbooks.Open a & b &
 

Здравствуйте! У меня похожая ситуация, Листы в книге названы по месяцам, можно ли сделать так что бы при открытии книги открывался лист с актуальным месяцем!?  

 

Anchoret

Пользователь

Сообщений: 1061
Регистрация: 01.01.1970

Anchoret

#10

19.04.2018 17:29:46

И ни одного файла-примера….

Код
Private Sub Workbook_Open()
On Error Resume Next
Sheets(Left(MonthName(Month(Now)), 3)).Activate
End Sub
 

skiv17

Пользователь

Сообщений: 73
Регистрация: 31.03.2017

#11

19.04.2018 19:04:59

Если листы  отсортированы по месяцам то можно так

Код
dt = Format(Now(), "m")
dt = dt * 1
Worksheets(dt).Select

Изменено: skiv1719.04.2018 19:05:16

 

БМВ

Модератор

Сообщений: 21385
Регистрация: 28.12.2016

Excel 2013, 2016

#12

19.04.2018 19:55:47

Цитата
Алексей Афанфсьев написал:
актуальным месяцем!?

Просто любопытство заело, а не актуальный это как?

По вопросам из тем форума, личку не читаю.

 

Алексей Афанфсьев

Пользователь

Сообщений: 42
Регистрация: 24.12.2012

#13

20.04.2018 10:26:19

Цитата
БМВ написал:
а не актуальный это как?

Лист другого месяца.

 

Алексей Афанфсьев

Пользователь

Сообщений: 42
Регистрация: 24.12.2012

#14

20.04.2018 10:30:40

Цитата
skiv17 написал:
Если листы  отсортированы

А что значит отсортированы? Вы имеете ввиду название листов?

 

БМВ

Модератор

Сообщений: 21385
Регистрация: 28.12.2016

Excel 2013, 2016

Алексей Афанфсьев, Я чуть глумлюсь, но точность формулировки порой сильно влияет на результат. Другой месяц по отношению к чему? Если к текущему, то и надо называть не актуальный, а текущим. Actual конечно имеет синоним Current, но всеж тяготеет к Real.  

По вопросам из тем форума, личку не читаю.

 

Вот файл в котором бы хотелось реализовать данную функцию! Если можно подробно объясните дилетанту как это сделать :oops:  

Изменено: Алексей Афанфсьев20.04.2018 10:44:57

 

Алексей Афанфсьев

Пользователь

Сообщений: 42
Регистрация: 24.12.2012

#17

20.04.2018 10:49:45

Цитата
БМВ написал:
Если к текущему, то и надо называть не актуальный, а текущим

Согласен:), неправильно выразился)))

 

Anchoret

Пользователь

Сообщений: 1061
Регистрация: 01.01.1970

Anchoret

 

Если не трудно объясните как это сделано, потому что мне это нужно реализовать в боевом графике!

 

ProFessor

Пользователь

Сообщений: 124
Регистрация: 11.04.2018

Уважаемый Алексей Афанфсьев,

Anchoret, написал корректное и простое решение:

Чем оно Вам не подходит?

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

 

Алексей Афанфсьев

Пользователь

Сообщений: 42
Регистрация: 24.12.2012

#21

20.04.2018 12:19:40

Цитата
ProFessor написал:
Чем оно Вам не подходит?

Я не понимаю как это сделать, куда и как записать скрипт!

Изменено: Алексей Афанфсьев20.04.2018 12:20:09

 

ProFessor

Пользователь

Сообщений: 124
Регистрация: 11.04.2018

#22

20.04.2018 12:34:34

Код
Private Sub Workbook_Open()
   thisworkbook.Sheets(MonthName(Month(Now))).Activate
End Sub

1) Нажмите alt+11
2) Скопируйте это в «ЭтаКнига»
3) Нажмите ctrl + s

P.S. Решение — Anchoret,  я всего лишь доработал

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

 

Алексей Афанфсьев

Пользователь

Сообщений: 42
Регистрация: 24.12.2012

#23

20.04.2018 12:39:31

Цитата
ProFessor написал:
2) Скопируйте это в «ЭтаКнига»

Открылось просто серое окно, не понял куда нужно скопировать?

 

ProFessor

Пользователь

Сообщений: 124
Регистрация: 11.04.2018

См. скриншот
Двойной клик на «Эта книга»
И вставьте туда

Прикрепленные файлы

  • 1.jpg (11.8 КБ)

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

 

Алексей Афанфсьев

Пользователь

Сообщений: 42
Регистрация: 24.12.2012

#25

03.05.2018 10:49:34

Цитата
ProFessor написал:
Двойной клик на «Эта книга» И вставьте туда

Я что то делаю не так? Или разные версии?

Прикрепленные файлы

  • 055.jpg (81.31 КБ)

 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

Вызов окна проектов
Ctrl+R

 

БМВ

Модератор

Сообщений: 21385
Регистрация: 28.12.2016

Excel 2013, 2016

Ctrl+R

По вопросам из тем форума, личку не читаю.

 

Алексей Афанфсьев

Пользователь

Сообщений: 42
Регистрация: 24.12.2012

#28

03.05.2018 11:15:56

Спасибо всем огромное, все получилось, все заработало!  :)  

I am creating a sheet that my maintenance mechanics will use to fill out night-shift reports at the end of their shifts. I have a spreadsheet with a different tab for each date in the format of month.day.year all in numbers. For example, today’s tab is 7.17.2016 . I would like for the document to open to the current date so that there is no way that they could fill out the wrong day’s tab.

I am new to macro’s and only have done a small amount of coding in c++ and worked with matlab, so I need a little babying.

Thank you!

Cole

asked Jul 18, 2016 at 14:28

Coleman Sones's user avatar

2

You need to add, in the workbook_open event,Private Sub Workbook_Open() worksheets(format(date,"m.dd.yyyy")).activate and in the worksheet change Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) put in the same, no need to check if the navigated to sheet name, as you’re «hard coding» by using the date where to go, usually, you’d have a little logic in there should it be needed, should you need to, sh is the sheet and target is the cell(s)

answered Jul 18, 2016 at 14:33

Nathan_Sav's user avatar

Nathan_SavNathan_Sav

8,4562 gold badges13 silver badges20 bronze badges

1

Открытие книги с листа соответствующий текущему месяцу

VIDEO56

Дата: Пятница, 11.03.2016, 10:13 |
Сообщение № 1

Группа: Проверенные

Ранг: Обитатель

Сообщений: 262


Репутация:

23

±

Замечаний:
0% ±


Excel 2010

Добрый день удачной всем пятницы.
Есть файл в нем есть листы Январь, Февраль, Март и т.д. Листы скрыты. Можно ли при открытии книги чтобы отображался лист с названием месяца соотвествующего месяцу текущей даты?


Всем удачного дня!

 

Ответить

Апострофф

Дата: Пятница, 11.03.2016, 10:30 |
Сообщение № 2

Группа: Проверенные

Ранг: Обитатель

Сообщений: 416


Репутация:

117

±

Замечаний:
0% ±


Excel 1997

[vba]

Код

Private Sub Workbook_Open()
On Error Resume Next
With Sheets(MonthName(Month(Date)))
  .Visible = -1
  .Activate
End With
End Sub

[/vba]

 

Ответить

VIDEO56

Дата: Пятница, 11.03.2016, 11:08 |
Сообщение № 3

Группа: Проверенные

Ранг: Обитатель

Сообщений: 262


Репутация:

23

±

Замечаний:
0% ±


Excel 2010

Апострофф, спасибо. А при закрытии файла чтобы этот лист скрывался?


Всем удачного дня!

 

Ответить

Апострофф

Дата: Пятница, 11.03.2016, 11:15 |
Сообщение № 4

Группа: Проверенные

Ранг: Обитатель

Сообщений: 416


Репутация:

117

±

Замечаний:
0% ±


Excel 1997

[vba]

Код

Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Sheets(MonthName(Month(Date))).Visible = 0
End Sub

[/vba]

 

Ответить

VIDEO56

Дата: Пятница, 11.03.2016, 11:21 |
Сообщение № 5

Группа: Проверенные

Ранг: Обитатель

Сообщений: 262


Репутация:

23

±

Замечаний:
0% ±


Excel 2010

Владимир спасибо. Выручили!


Всем удачного дня!

 

Ответить

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

Добавить новый лист с текущей датой с помощью кода VBA

Добавьте новые рабочие листы с последовательной датой, используя Kutools for Excel


стрелка синий правый пузырь Добавить новый лист с текущей датой с помощью кода VBA

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

1. Удерживайте ALT + F11 ключи, и он открывает Окно Microsoft Visual Basic для приложений.

2. Нажмите Вставить > Модули, и вставьте следующий макрос в Окно модуля.

Код VBA: добавить новый лист с текущей датой

Sub AddSheets_TodayDate()
'Updateby20140717
    Dim szTodayDate As String
    szTodayDate = Format(Date, "mmm-dd-yyyy")
    On Error GoTo MakeSheet
    Sheets(szTodayDate).Activate
    Exit Sub
MakeSheet:
    Sheets.Add , Worksheets(Worksheets.Count)
    ActiveSheet.Name = szTodayDate
End Sub

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

документ-добавить-лист с-датой-1

Внимание: Когда вы сохраните и закроете эту книгу, сохраните ее как Excel Macro-Enabled Workbook форматировать, нажав Файл > Сохранить как. И когда вы запустите книгу на следующий день, обязательно нажмите Включить контент, чтобы вы могли успешно запустить код для добавления нового листа даты.


стрелка синий правый пузырь Добавьте новые рабочие листы с последовательной датой, используя Kutools for Excel

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

Kutools for Excel включает более 300 удобных инструментов Excel. Бесплатная пробная версия без ограничений в течение 30 дней. Получить сейчас.

Если вы установили Kutools for Excel, пожалуйста, сделайте следующее:

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

документ-добавить-лист с-датой-1

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

документ-добавить-лист с-датой-1

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

документ-добавить-лист с-датой-1

4. Затем нажмите OK, и будет создана новая книга с именами листов в порядке дат. Смотрите скриншот:

документ-добавить-лист с-датой-1

Чтобы узнать больше об этой функции создания рабочих листов последовательности.


Связанная статья:

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


Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

Комментарии (0)


Оценок пока нет. Оцените первым!

Автоматическая дата в Excel.

​Смотрите также​ пользователь вводит номер​ она работает. Хотя​ двумя датами, достаточно​ по всем измененным​ Последовательность будет сформирована.​ Заполнить по месяцам.​​ статье «Как сравнить​Получилась такая формула и​ ​В следующей ячейке​​ полное слово или​Для работы с​ к дате дни,​​ похожи на даты​ ​>​​ «Заполнить автоматически список​
​.​Дату в Excel​ заказа, имя клиента,​ результаты лучше проверять,​ от более позднего​ ячейкам If Not​Если требуется сформировать временную​
​Изменив формат ячеек, содержащих​ два столбца в​ такой результат.​ пишем число месяцев,​
​ просто поставить точку.​ ​ датами, их можно​
​ месяцы, года, посчитать​
​ (например, чисел с​Числовой формат​ в Excel».​Первый вариант.​ можно установить несколькими​ сумму и т.д.​ т.к. возможны огрехи.​ временного периода отнять​
​ Intersect(cell, Range(«A2:A100»)) Is​ последовательность с шагом​ последовательность 01.01.09, 01.02.09,​ Excel на совпадения»​Если изменим цифру дней​ которое будем прибавлять​​ Смотрите пример.​ записать по–разному, для​ стаж, возраст, время​ дробями), вы можете​>​
​В Excel можно​
​Выделяем ячейку с​
​ способами — вставить​ Необходимо сделать так,​Возвращает год как целое​ более ранний.​ Nothing Then ‘если​ 15 минут (09:00,​ 01.03.09, на МММ​ здесь.​ с 11 на​ к дате. В​В ячейке С6 стоит​​ разных формул. И​-​ отформатировать ячейки как​Время​ сделать много разных​
​ датой. Нажимаем ПРАВОЙ​ ​ текущую дату, заполнить​​ чтобы при внесении​
​ число (от 1900​
​​ изменененная ячейка попадает​ 09:15, 09:30, …),​ (см. статью Пользовательский​Если, для работы​ 25, то получится​ примере – это​ формула, искомая дата.​ формат ячеек с​все это можно​ текст. После этого​​.​ графиков. Рассмотрим еще​ мышкой на квадратик​ таблицу датами с​ номера заказа в​ до 9999), который​Построение значение даты, составляя​ в диапазон A2:A100​ то можно использовать​
​ формат дат) получим​
​ нужно изменить формат​ ​ такая дата.​ ячейка G13.​
​А здесь, вместо​ формулами должен быть​ сделать формулами. Как​ Excel Online не​Дата и время, обновляемые​ один вид диаграммы,​ в правом нижнем​ определенным периодом, т.​ столбец А -​ соответствует заданной дате.​ его из отдельных​ With cell.Offset(0, 1)​
​ формулу =B15+1/24/60*15 (Предполагается,​ последовательность янв, фев,​ даты на текстовый,​Как ввести адрес ячейки​В ячейке Н13​ букв «г.», «мес.»,​ определенный. Все это​
​ посчитать дату выхода​ будет пытаться преобразовать​ при пересчете листа​ которая будет сравнивать​ углу и протягиваем​
​ д.​
​ в столбце B​ В структуре функции​ элементов-чисел.​ ‘вводим в соседнюю​ что последовательность начинается​ мар, …​
​ то смотрите статью​
​ быстро смотрите в​ будет стоять результат,​ «дн.» просто поставили​ прописано в тексте​ сотрудника из отпуска​ их в даты.​ или открытии книги,​
​ данные трех столбцов.​
​ на нужное количество​
​Как вставить текущую дату​ напротив введенного заказа​ только один аргумент​Синтаксис: год; месяц, день.​
​ справа ячейку дату​ с ячейки​Эту же последовательность можно​ «Преобразовать дату в​ статье «Сложение, вычитание,​ здесь пишем формулу.​ точку.​ –​ или сколько дней​

excel-office.ru

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

​Выберите ячейки, в которые​​ считаются динамическими, а​ Подробнее, смотрите в​ ячеек. Отпускаем мышку.​ в​ автоматически появлялись дата​ – дата в​Все аргументы обязательные. Их​ .Value = Now​B15​ ввести используя список​ текст Excel».​ умножение, деление в​ Нажимаем на эту​Если в ячейку В6​обращайте внимание.​ осталось до отпуска,​ необходимо ввести числа.​ не статическими. Чаще​ статье «Пузырьковая диаграмма​ В появившемся диалоговом​Excel​

​ и время его​ числовом формате. Аргумент​ можно задать числами​ .EntireColumn.AutoFit ‘выполняем автоподбор​, формулу нужно ввести​ автозаполения Кнопка Офис/​В Excel можно​ Excel».​ ячейку, делаем её​ поставим​1.​ посчитать возраст, расчитать​Щелкните​

Вставка статических значений даты или времени

​ всего для получения​ в Excel».​ окне нажимаем на​

  1. ​, смотрите в статье​ занесения:​ должен быть введен​ или ссылками на​

  2. ​ ширины для столбца​

    • ​ в​ Параметры Excel/ Основные/​​ считать не только​​В Excel есть​​ активной. Заходим на​​текущую дату​​Разница дат в Excel​​ дату срока оплаты​​Главная​​ динамической даты или​​Примечание:​​ функцию «Прогрессия». Появится​

    • ​ «Текущая дата в​Чтобы реализовать такой ввод​​ посредством функции ДАТА​​ ячейки с соответствующими​​ B, чтобы дата​​B16​​ Основные параметры работы​​ даты, но и​

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

​ три функции, которые​ закладку «Формулы» в​, то сможем узнать​высчитывается так.​ счета или окончания​>​ времени в ячейке​Мы стараемся как​ такое диалоговое окно.​ Excel». Здесь рассмотрим,​

  • ​ даты, нам потребуется​ или представлять результат​ числовыми данными: для​ умещалась в ячейке​​). Формула вернет результат​​ с Excel/ Изменить​​ время. Как высчитывать​​ выбирают из даты​ раздел «Библиотека функций»​ стаж по сегодняшнее​Столбец А –​ договора, посчитать рабочие​Числовой формат​

​ на листе используются​ ​ можно оперативнее обеспечивать​ ​Устанавливаем галочки у нужных​

​как заполнить таблицу​

​ простой макрос, который​

​ вычисления других формул.​ года – от​

​ End With End​

​ в формате даты.​ списки (введите янв,​ время, читайте в​

​ или только число,​​ и выбираем функцию​​ число. Например, узнать​​ пишем дату начала​​ дни и многие,​​>​ функции.​ вас актуальными справочными​ функций, ставим шаг​Excel определенными датами​ надо добавить в​Пример использования функции ГОД:​ 1900 до 9999;​ If Next cell​Другая формула =ТЕКСТ(B15+1/24/60*15;»чч:мм») вернет​

support.office.com

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

​ затем Маркером заполнения​ статье «Как посчитать​ или только месяц,​ «Дата и время».​ стаж работника на​ периода, столбец В​ многие другие действия​Текст​Чтобы вставить текущую дату​ материалами на вашем​ (например, через какое​.​ модуль рабочего листа.​

​Возвращает месяц как целое​ для месяца –​ End Sub​ результат в текстовом​ скопируйте вниз).​ время в Excel»​ или год. Это​Или можно открыть​ предприятии. Каждый день​ – пишем дату​

  1. ​ с датами и​.​

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

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

  • ​ окончания периода. В​ временем можно проводить​Если вам нужно ввести​ он является обновляемым,​ переведена автоматически, поэтому​

  • ​ даты, пример -​ даты в столбец,​ правой кнопкой мыши​ до 12) для​ 12; для дня​ диапазон​СОВЕТ:​ даты, как в​Как посчитать возраст,​ «ДЕНЬ».​ «Вставить функцию» (на​ на текущую дату.​

    ​ столбце А и​​ в Excel.​

    • ​ всего несколько чисел,​ с помощью функции​ ее текст может​ с разницей в​ которые будут идти​ по ярлычку листа​ заданной в числовом​ – от 1​»А2:А100″​О текстовых последовательностях​

    • ​ предыдущем случае, а​ смотрите в статье​Делаем активной ячейку​ закладке «Формулы») и​ Как установить текущую​ В устанавливаем формат​

    • ​Все расчеты с​ можно отменить их​сегодня​ содержать неточности и​ два дня –​ по порядку по​ с таблицей и​ формате даты. Аргумент​

support.office.com

Дата в Excel. Формула.

​ до 31.​на свой собственный.​ вида первый, второй,​ текстовые значения.​ «Как посчитать возраст​​ В19. На закладке​​ выбрать категорию «Дата​ дату смотрите в​ ячейки «Дата». Где​ датами описаны в​ преобразование в даты​и​ грамматические ошибки. Для​ 12, 14, 16,​ возрастанию. Для этого​ выберите в контекстном​ – дата месяца,​Если для аргумента «День»​ Если необходимо вставлять​ …, 1), 2),​Аналогичным образом можно сформировать​
​ в Excel».​ «Формулы» в разделе​ и время».​ статье «Текущая дата​ найти эту функцию​ нескольких статьях. Смотрите​ в Excel Online​
​ТДАТА​
​ нас важно, чтобы​ т.д.). Нажимаем «ОК».​ есть функция автозаполнения​ меню команду​ который необходимо отобразить,​ задать большее число​ дату не в​ 3), … можно​ последовательность дней недели​Создадим последовательности дат и​ «Библиотека функций» нажимаем​Теперь выбираем из​​ в Excel».​​ и как установить​ перечень статей в​ одним из таких​, как показано​ эта статья была​Второй вариант.​
​ даты в Excel.​Исходный текст​ в числовом формате.​ (чем количество дней​ соседний столбец, а​ прочитать в статье​
​ пн, вт, ср,​ времен различных видов:​ на функцию «Дата​ списка функцию «ДАТА».​2.​ её, смотрите в​ конце статьи в​ способов:​
​ в таблице ниже.​ вам полезна. Просим​Вставить даты в​Можно установить даты​(View code)​ Даты в текстовом​ в указанном месяце),​ правее — подставьте​ Текстовые последовательности.​
​ …​ 01.01.09, 01.02.09, 01.03.09,​ и время». В​ Выходит диалоговое окно.​Как прибавить к дате​ статье «Число Excel.​ разделе «Другие статьи​добавить перед числом апостроф​ Просмотреть дополнительные сведения​​ вас уделить пару​
​Excel с определенным периодом​​ с определенным периодом​​.​
​ формате функция обрабатывает​ то лишние дни​ в оператор​О числовых последовательностях​Последовательность кварталов 1 кв.,​ …, янв, апр,​ появившемся окне выбираем​ В нем пишем:​ дни в Excel.​ Формат».​ по этой теме».​ (‘). Например: ’11-53​ о том, как​
​ секунд и сообщить,​ формулой.​ или, только, рабочими​В открывшееся окно редактора​ неправильно.​ перейдут на следующий​Offset(0,1)​ вида 1, 2,​
​ 2 кв.,… можно​ июл, …, пн,​ нужную функцию. Например,​
​«Год» — год​Первый способ.​Столбец С –​
​Внимание!​ или ‘1/47. Апостроф​
​ использовать эти функции​
​ помогла ли она​Например, нам нужно​ днями, т.д.​ Visual Basic скопируйте​Примеры использования функции МЕСЯЦ:​ месяц. Например, указав​вместо 1 число​ 3, … 1,​
​ сформировать используя идеи​​ вт, ср, …,​
​ мы выбрали функцию​ нашей даты.​
​В примере прибавим​ будет стоять формула​
​Если формулы не​ не отображается после​
​ сегодня и ТДАТА.​ вам, с помощью​
​ заполнить ячейки столбца​Автозаполнение даты в​ этот текст этого​Возвращает день как целое​ для декабря 32​ побольше.​ 3, 5, 7,​ из статьи Текстовые​ 1 кв., 2​ «ГОД». В появившемся​«Месяц» — пишем​​ 9 месяцев.​ и результат подсчета.​
​ будут работать, проверьте​ нажатия клавиши ВВОД;​Какие​ кнопок внизу страницы.​
​ датами с промежутком​Excel.​​ макроса:​​ число (от 1​ дня, получим в​Закройте редактор Visual Basic​ … I, II,​ последовательности.​ кв.,…, 09:00, 10:00,​ диалоговом окне указали​ месяц нашей даты​В ячейке А13​ Здесь будет записана​ формат дат. Бывает,​
​добавить перед дробным числом​​Чтобы добавить​ Для удобства также​
​ 7 дней. В​
​Первый способ.​Private Sub Worksheet_Change(ByVal​
​ до 31) для​ результате 1 января.​ и попробуйте ввести​ III, IV, …​
​Используя инструмент Прогрессия, можно​ 11:00, … и​ адрес ячейки с​ числом, ставим плюс​ пишем дату, к​ дата в таком​ при копировании из​ ноль и пробел,​
​Ячейка​ приводим ссылку на​ ячейке D20 написали​Как заполнить последующими​ Target As Range)​ заданной в числовом​​Пример использования функции:​ что-нибудь в диапазон​ можно прочитать в​ создать последовательности только​
​ пр.​​ датой (А19). Нажали​​ и пишем адрес​ которой будем прибавлять​ виде, как мы​ других программ в​ например, чтобы числа​Результат​ оригинал (на английском​ дату – 12.01.2016.​
​ датами ячейки мы​
​ For Each cell​ формате даты. Аргумент​
​Зададим большее количество дней​ А2:А100. В соседней​ статье Числовые последовательности.​ рабочих дней. А​Т.к. каждому значению даты​
​ «ОК». Получилось так.​ ячейки, в которой​ 9 месяцев.​ её пропишем в​ Excel даты вставляются​ 1/2 или 3/4​
​=СЕГОДНЯ()​ языке) .​ В ячейке D​ знаем. Нужно выделить​ In Target ‘проходим​ – дата дня,​ для июня:​ ячейке тут же​Предположим, у нас имеется​ также с шагом​
​ соответствует определенное число​ Смотрите ячейку В19.​ стоит число месяцев,​В ячейке D13​ формуле.​ в текстовом формате.​
​ не заменялись датами​Текущая дата (значения могут​Предположим, что вы хотите​ 21 написали такую​
​ ячейку с датой.​ по всем измененным​
​ который нужно найти,​Примеры использования в качестве​ появится текущая дата-время!​ таблица заказов, куда​ месяц и год.​ (см. статью Как​ Вместо полной даты​ которое нужно прибавить​
​ пишем формулу. Можно​В ячейке А6​
​ Тогда формулы не​
​ 2 янв или​ быть разными)​
​ быстро вводить текущие​ формулу. =D20+7 Копируем​
​ Нажать квадратик в​ ячейкам If Not​ в числовом формате.​ аргументов ссылок на​Для работы с датами​ пользователь вводит номер​Последовательность первых месяцев кварталов​ EXCEL хранит дату​ стоит только год.​ к дате.​ написать формулу в​ пишем первую дату​ считают. Чтобы формулы​ 4 мар. Ноль​=ТДАТА()​ дату и время​ эту формулу вниз​
​ правом нижнем углу​ Intersect(cell, Range(«A2:A100»)) Is​Чтобы вернуть порядковый номер​ ячейки:​ в Excel в​ заказа, имя клиента,​ янв, апр, июл,​ и время), то​
​Другими соответствующими функциями выбрали​
​«День» — пишем​ соседней ячейке, просто,​
Как прибавить к дате дни в Excel.​ (начало периода).​ считали, нужно изменить​ не остается в​Текущие дата и время​
Дата в Excel.​ при записи действий​ по столбцу. Получится​ ячейки ЛЕВОЙ кнопкой​ Nothing Then ‘если​ дня недели для​
​Возвращает разницу между двумя​ разделе с функциями​ сумму и т.д.​ окт, янв, …​ подходы для формирования​ месяц (ячейка В20)​ день нашей даты.​ в примере, она​
​В ячейке В6​ формат ЗНАЧЕНИЙ на​ ячейке после нажатия​ (значения могут быть​ в журнал или​ так.​ мыши.​ изменененная ячейка попадает​ указанной даты, можно​ датами.​ определена категория «Дата​ Необходимо сделать так,​ можно создать введя​ последовательностей, изложенные в​ и день (ячейка​Получилось так.​ стоит там –​
​ пишем вторую дату​ числовой​ клавиши ВВОД, а​ разными)​ сделать так, чтобы​Использование формулы для заполнения​
​Указатель мышки превратится в​ в диапазон A2:A100​ применить функцию ДЕНЬНЕД:​Аргументы:​ и время». Рассмотрим​ чтобы при внесении​ в две ячейки​ статье Числовые последовательности,​ В21). Формат в​
​Нажимаем «ОК». Получилась такая​ в ячейке D13.​ (конец периода).​-​ тип ячейки становится​Примечание:​ они автоматически выводились​ ячеек датами хорошо​ черный крестик. Тянем​ With cell.Offset(0, 1)​По умолчанию функция считает​начальная дата;​
​ наиболее распространенные функции​ номера заказа в​ первые два элемента​ применимы и для​ этих ячейках можно​ формула. =ДАТА(1979;11+G13;1)​ =ДАТА(ГОД(A13);МЕСЯЦ(A13)+9;ДЕНЬ(A13))​В ячейке С6​это не формат​ дробным.​
​ Результаты, возвращаемые функцией​ в ячейке при​ тем, что при​ этот крестик вниз​ ‘вводим в соседнюю​ воскресенье первым днем​
​конечная дата;​ в этой категории.​ столбец А -​ последовательности (янв, апр),​ дат. Однако, имеются​ установить другой.​Смотрим в таблице​В формуле все​
​ пишем формулу:​ ячейки. Как это​Примечания:​СЕГОДНЯ​

excel-office.ru

Последовательности дат и времен в MS EXCEL

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

​Конечно, можно изменить​ результат.​ три адреса ячейки​=РАЗНДАТ(A6;B6;»y»)&»г.»&РАЗНДАТ(A6;B6;»ym»)&»мес.»&РАЗНДАТ(A6;B6;»md»)&»дн.»​ сделать, читайте в​ ​или​ Вы можете вставить​ первой ячейке, изменятся​ заполнятся следующими датами.​ .Value = Now​

​Для отображения порядкового номера​ (дни, месяцы, годы​ и время как​ напротив введенного заказа​​ их) скопировать вниз​​Последовательность 01.01.09, 01.02.09, 01.03.09​ формат даты в​Такой расчет даты удобен​

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

​ в дату Excel»​ пробел, но если​, изменяются только при​ будут изменяться, или​ ячейках.​Все хорошо, но, нам​ ширины для столбца​

​ даты применяется функция​Способы измерения интервалов между​ таблица преобразует подобные​ и время его​ будут содержать текстовые​ можно сформировать формулой​ свой формат. Как​ можно изменить цифру​ ячейке. Здесь все​

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

​ же обновлять их.​Чтобы заполнить ячейки​ нужно заполнить ячейки​ B, чтобы дата​

​ НОМНЕДЕЛИ:​ заданными датами:​ данные, приравнивая сутки​ занесения:​ значения. Чтобы ячейки​

​ =ДАТАМЕС(B2;СТРОКА(A1)), в ячейке​ создать свой формат,​ месяца, не меняя​ верно. Получилось.​ ячеек), п.ч. в​

​Для подсчета дат​ функции поиска для​ выполнении макроса, содержащего​Статические значения не изменяются​ датами с промежутком​ только рабочими днями.​ умещалась в ячейке​Дата 24.05.2015 приходится на​для отображения результата в​ к единице. В​Чтобы реализовать такой ввод​ содержали даты, используйте​B2​ смотрите в статье​ формулы. Например, фирма​Таким же образом можно​​ русскоязычной версии Microsoft​​ нужно сделать таблицу​ этих данных, мы​​ ее. Постоянного обновления​​ при пересчете или​

​ 1 месяц, нужно​ Вот тут начинается​ End With End​ 22 неделю в​ днях – «d»;​​ результате значение времени​​ даты, нам потребуется​ формулу =ДАТАМЕС($G$16;(СТРОКА(A2)-СТРОКА($A$1))*3) Предполагается,​​должна находиться дата​​ «Как создать пользовательский​ не успевает сделать​​ прибавить года, изменив​​ Excel, она не​ в Excel и​

​ рекомендуем использовать апостроф.​ ячеек, содержащих эти​ открытии листа.​ в ячейке D21​ «волшебство» Excel. :)​ If Next cell​ году. Неделя начинается​в месяцах – «m»;​​ представляет собой долю​​ простой макрос, который​ что последовательность начинается​​ — первый элемент​​ формат в Excel»​ заказ вовремя, сроки​

​ чуть формулу. Смотрите​ видна в перечне​ установить в ней​

​ Такие функции, как​
​ функции, не происходит.​Выделите на листе ячейку,​ написать такую формулу.​Второй способ.​ End Sub​ с воскресенья (по​
​в годах – «y»;​ от единицы. К​ надо добавить в​ с ячейки​ последовательности (01.01.09).​ тут.​ окончания работы продлеваются.​ пример.​

excel2.ru

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

​ функций, но работает.​ формулы. Этим мы​ ПОИСКПОЗ и ВПР,​ В качестве значений​ в которую вы​=ДАТА(ГОД(D20);МЕСЯЦ(D20)+1;ДЕНЬ(D20))​Автоматическая дата в Excel.​При необходимости измените «чувствительный»​ умолчанию).​в месяцах без учета​ примеру, 12.00 –​ модуль рабочего листа.​G16​Эту же последовательность можно​

Дата в эксель автоматически

​В Excel есть​ Меняем цифру в​=​Пояснения к формуле​ сейчас и займемся.​ не учитывают апострофы​ даты и времени​ хотите вставить текущую​В формуле мы​Выделяем ячейку с​ диапазон​​В качестве второго аргумента​ ​ лет – «ym»;​​ это 0,5.​

​ Для этого щелкните​, формулу нужно ввести​ сформировать используя правую​ функции, которыми можно​

​ ячейке G 13​ДАТА(ГОД(A13)+2;МЕСЯЦ(A13);ДЕНЬ(A13))​:​Как простыми способами​ при вычислении результатов.​ используются показания системных​ дату или время.​ написали — дату​ датой. Нажимаем на​»А2:А100″​ указана цифра 2.​в днях без учета​Значение даты электронная таблица​ правой кнопкой мыши​ в ячейку​ клавишу мыши. Пусть​ сложить данные из​ и формула расчитывает​Или прибавить сразу всё​РАЗНДАТ – это​ прибавить к дате​

​Если число в ячейке​ часов компьютера.​​Сделайте одно из следующего:​​ написать, как в​ квадратик в правом​на свой собственный.​ Поэтому формула считает,​ месяцев и лет​ преобразует в число,​​ по ярлычку листа​​G17​ в ячейку​

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

planetaexcel.ru

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

​Чтобы даты было проще​Чтобы вставить дату, введите​ ячейке D20, только​ нижнем углу ячейки​ Если необходимо вставлять​ что неделя начинается​ – «md»;​

Как Excel обрабатывает время

​ равное количеству дней​ с таблицей и​ (см. файл примера).​A2​ день, т.д. Этот​ такому принципу можно​ дни. По такой​y – считает​ даты дни, месяци​ краю, обычно это​ вводить, Excel Online​

​ дату (например,​ к месяцу прибавить​ ПРАВОЙ кнопкой мыши​ дату не в​ с понедельника (второй​в днях без учета​ от 1 января​ выберите в контекстном​Временную последовательность 09:00, 10:00,​введено значение 01.01.09.​ способ пригодится при​ прибавлять, отнимать по​

​ формуле можно рассчитать​ года​ или года, смотрите​ означает, что оно​ автоматически преобразует 2.12​2.2​ 1 месяц.​ и протягиваем вниз​

​ соседний столбец, а​

Пример функции ДАТА

​ день недели).​ лет – «yd».​ 1900 года (так​

​ меню команду​

​ 11:00, … можно​ Выделим ячейку​ проведении анализа в​ отдельности и вместе​ срок службы, срок​ym – считает​ в статье «Работа​ не отформатировано как​ в 2 дек.​) и нажмите​Получится так.​ по столбцу. Отпускаем​

​ правее — подставьте​Скачать примеры функций для​В некоторых версиях Excel​ решили разработчики) до​Исходный текст​ сформировать используя Маркер​A2​ таблице, т.д. Подробнее​ года, месяцы и​ окончания договора, проекта,​

​ месяца​

ДАТА.

​ с датами в​ число.​

Большее количество дней.

​ Но это может​Главная​Чтобы прибавить год к​

Ссылки в аргументах.

Функция РАЗНДАТ в Excel

​ кнопку мыши. Появляется​ в оператор​

​ работы с датами​

  • ​ при использовании последних​
  • ​ заданной даты. Например,​
  • ​(View code)​ заполнения. Пусть в​. Удерживая правую клавишу​

​ о таком способе,​ дни.​

  • ​ отпуска, срок оплаты​md – считает​
  • ​ Excel».​
  • ​При введении в ячейку​
  • ​ сильно раздражать, если​>​
  • ​ дате, формулу используем​ такое диалоговое окно​Offset(0,1)​
  • ​Для указания текущей даты​ двух аргументов («md»,​

​ при преобразовании даты​.​ ячейку​ мыши, скопируем Маркером​ читайте в статье​Например, прибавим к​ счета, многое другое.​

​ дни​

РАЗНДАТ.

​Как посчитать разные​ числа с буквой​ вы хотите ввести​Числовой формат​ как в предыдущем​ с предложенными вариантами​

Функция ГОД в Excel

​вместо 1 число​ используется функция СЕГОДНЯ​ «yd») функция может​ 13.04.1987 получается число​В открывшееся окно редактора​A2​ заполнения, значение из​ «Функция «СУММЕСЛИ» в​ дате 1 год,​Второй способ.​«г.», «мес.», «дн.»​ периоды стажа, других​

​ «е», например 1e9,​

ГОД.

Функция МЕСЯЦ в Excel: пример

​ числа, которое не​>​ варианте, только число​ копирования даты.​ побольше.​ (не имеет аргументов).​ выдать ошибочное значение.​ 31880. То есть​ Visual Basic скопируйте​введено значение 09:00.​A2​

​ Excel».​

МЕСЯЦ.

Примеры функций ДЕНЬ, ДЕНЬНЕД и НОМНЕДЕЛИ в Excel

​ 2 месяца и​Пишем формулу с​ написанные между знаками​ разных дат и,​ оно автоматически преобразуется​ нужно превращать в​Краткий формат даты​ «1» прибавляем к​

ДЕНЬ.

​Нажимаем на нужный вариант.​Закройте редактор Visual Basic​ Чтобы отобразить текущее​ Лучше применять альтернативные​

ДЕНЬНЕД.

​ от 1.01.1900 прошло​ этот текст этого​ Выделим ячейку​

​в ячейки ниже.​В таблице Excel​ 11 дней. Пишем​ помощью функции «ДАТА».​

НОМНЕДЕЛИ.

​ & — так​ затем, сложить их​ в научное число:​ даты. Хотя преобразование​или​

С понедельника.

​ году. Получится такая​ Мы нажали на​ и попробуйте ввести​ время и дату,​ формулы.​ 31 880 дней.​

​ макроса:​A2​

​ После того, как​ можно сравнить даты​ года, месяцы и​В ячейке А13​ будут подписаны года,​ вместе, чтобы узнать​ 1,00E+09. Чтобы избежать​

exceltable.com

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

​ невозможно отключить его,​Длинный формат даты​ формула.​ слова «Заполнить по​ что-нибудь в диапазон​ применяется функция ТДАТА​Примеры действия функции РАЗНДАТ:​Этот принцип лежит в​Private Sub Worksheet_Change(ByVal​. Скопируем Маркером заполнения,​ отпустим правую клавишу​ из разных столбцов​ дни, которые будем​ пишем дату, к​

Дата в эксель автоматически

​ месяца и дни​ общее количество дней,​ этого, введите перед​ есть несколько способов,​.​=ДАТА(ГОД(D20)+1;МЕСЯЦ(D20);ДЕНЬ(D20))​ рабочим дням». Получилось​ А2:А100. В соседней​ ().​В версии Excel 2007​ основе расчетов временных​​ Target As Range)​ ​ значение из​​ мыши, появится контекстное​

​ и выделить разные​ прибавлять, в разных​ которой будем прибавлять.​ в итоговой дате.​

​ др., смотрите в​ числом апостроф: ‘1e9​ позволяющих обойти его.​Чтобы вставить время, введите​Получились такие даты.​ так.​ ячейке тут же​Предположим, у нас имеется​ данной функции нет​ данных. Чтобы найти​ For Each cell​A2​ меню, в котором​ даты. Как это​ ячейках.​ В примере прибавим​ Можно между кавычками​ статье «Как в​Сложить даты в Excel,​Если вам нужно сложить​ его и щелкните​

​Как автоматически заполнить список,​Вставить даты в​​ появится текущая дата-время!​​ таблица заказов, куда​ в справочнике, но​ количество дней между​ In Target ‘проходим​в ячейки ниже.​ нужно выбрать пункт​​ сделать, смотрите в​​Диалоговое окно заполним так.​ 3 месяца.​

​ написать по-разному –​ Excel посчитать стаж».​ вычесть даты, прибавить​ много значений, которые​Главная​ смотрите в статье​

planetaexcel.ru

​Excel с определенным периодом​

Понравилась статья? Поделить с друзьями:
  • Открыть книгу excel онлайн
  • Открыть книгу excel как текст
  • Открыть или исправить файл excel
  • Открыть книгу excel vba скопировать лист
  • Открыть игру в excel