Получить вчерашнюю дату excel

Группа: Пользователи

Ранг: Прохожий

Сообщений: 6

Вопрос такой: Как в VBA прописать, чтобы файл сохранялся в формате: название_вчерашняя дата_(номер вчерашней даты).xlsx?

Например :ЖилРемСтрой_27_08_15_(1).xlsx
ЖилРемСтрой_27_08_15_(2).xlsx

Вопрос такой: Как в VBA прописать, чтобы файл сохранялся в формате: название_вчерашняя дата_(номер вчерашней даты).xlsx?

Например :ЖилРемСтрой_27_08_15_(1).xlsx
ЖилРемСтрой_27_08_15_(2).xlsx

С Уважением, Richman

Сообщение Здравствуйте, Друзья!

Вопрос такой: Как в VBA прописать, чтобы файл сохранялся в формате: название_вчерашняя дата_(номер вчерашней даты).xlsx?

Например :ЖилРемСтрой_27_08_15_(1).xlsx
ЖилРемСтрой_27_08_15_(2).xlsx

Источник

Excel VBA — Как найти последние 24 часа с сегодняшнего дня и вчера

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

Мне дали CSV Dump и попросили автоматизировать отчет

Я использую Excel VBA

Есть 16 требований/шагов для завершения, что автоматизирует отчет, я смог завершить 14 из них (конечно, поиск в SO и изменение кода на мои требования . )

Заключительные шаги в Макро связаны с фильтрами, я никогда не писал «Фильтры через код», и это было ново для меня

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

Запрос №1

В приведенном выше коде я использую.Activate, чтобы активировать рабочий лист. В SO я читал, что мне нужно избегать (.select/.activate. ) Поскольку рабочая книга, которую я использую, имеет только одиночный лист, я могу избежать. Активировать в приведенном выше коде

Однако, когда я работаю над несколькими листами, если я НЕ использую.Activate, Лист, который мне нужен для работы, НЕ получит фокус. Поэтому я не уверен, как этого избежать.

Столбец F имеет отметки времени. Я должен отфильтровать последние 24 часа из этого столбца

Вот пример столбца F

Я не знаю, как это кодировать, но я думаю о следующих шагах:

Шаг №1 Найдите то, что в этом году

Шаг №2. Мне нужно выяснить, что такое дата и дата Yesterdays, назначить их переменным # 2

Шаг №3 Основываясь на сегодняшней дате, я должен выяснить, сколько часов в этом фильтре. Если есть 24 записи, то я закончил, у меня есть все 24 часа. И условие: [Вчера 9 вечера до сегодняшнего дня 9 вечера]

Шаг №4 Основываясь на сегодняшней дате. Если количество записей меньше 24, то я должен посмотреть дату Yesterdays и начать couting от нее до тех пор, пока она не завершится 24 часа

Избегайте фильтров и используйте чистый VBA, чтобы выполнить описанные выше шаги # 4 на столбце F

Запрос №2

Пожалуйста, помогите мне найти 24-часовую дату, используя фильтры или любым другим способом

9:08 AM 11/9/2014 Спасибо Jeeped

Извините за то, что я не понимаю. Да, есть даты, которые были до Now().

Обратите внимание, что в дампе CSV у меня есть данные только до 15 октября 2014 года.

Вот как это делается вручную, чтобы собрать 24 часа из столбца F:

(1) Я применяю Autofilter.

(2) Положите фильтр на колонку F

(3) Из фильтра я выбираю год 2014, в соответствии с которым у меня есть # месяца (сентябрь и октябрь)

(4) В текущем дампе у меня есть, октябрь-октябрь 15-2014 имеет 11 записей [т.е. 11 часов], поэтому я выбираю [00, 01, 02, 03, 04, 05, 06, 07, 08, 09, 10 ]

(5) Итак, я получил 10 часов, и я должен получить оставшиеся 24 — 11 = 13 часов,

(6) В течение оставшихся 13 часов я выбираю Oct-14-2014, оставляя первые 11 часов (так как у меня их уже есть с 15 октября 2015 года) и начинаю выбирать значения [11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23]

Итак, из приведенной выше процедуры Ручной работы, теперь() может оказаться нецелесообразным (в текущем дампе CSV у меня есть, так как Макс. Даты — октябрь-октябрь и октябрь-14)

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

Итак, как следует кодировать вышеуказанную ручную процедуру, чтобы получить 24 часа с 15 октября и 14 октября

Кроме того, в вашем коде я не уверен, соблюдается ли Time Factor [ (вчера 9 вечера до сегодняшнего дня 9 часов) ] или нет

Источник

VBA Excel. Функции для работы с датой и временем

Функции для работы с датой и временем в VBA Excel. Синтаксис, параметры, спецсимволы, примеры. Функции, возвращающие текущие дату и время по системному таймеру.

Функция Date

Синтаксис

Пример

Функция DateAdd

Синтаксис

Параметры

Таблицу аргументов (значений) параметра interval смотрите в параграфе «Приложение 1».

Примечание к таблице аргументов: три символа – y, d, w – указывают функции DateAdd на один день, который необходимо прибавить к исходной дате number раз.

Пример

Функция DateDiff

Синтаксис

Параметры

Таблицу аргументов (значений) параметра interval смотрите в параграфе «Приложение 1».

Примечание к таблице аргументов: в отличие от функции DateAdd , в функции DateDiff спецсимвол «w» , как и «ww» , обозначает неделю. Но расчет осуществляется по разному. Подробнее об этом на сайте разработчиков.

Параметры firstdayofweek и firstweekofyear определяют правила расчета количества недель между датами.

Таблицы констант из коллекций firstdayofweek и firstweekofyear смотрите в параграфах «Приложение 2» и «Приложение 3».

Источник

Adblock
detector