Excel vba дата сохранения
Таблицу аргументов (значений) параметра interval смотрите в параграфе «Приложение 1».
Примечание к таблице аргументов: три символа – y, d, w – указывают функции DateAdd на один день, который необходимо прибавить к исходной дате number раз.
Пример
MsgBox "31.01.2021 + 1 месяц crayon-h"> & DateAdd ( "m" , 1 , "31.01.2021" ) 'Результат: 28.02.2021 MsgBox "Сегодня + 3 года crayon-h"> & DateAdd ( "yyyy" , 3 , Date ) MsgBox "Сегодня - 2 недели crayon-h"> & DateAdd ( "ww" , - 2 , Date ) MsgBox "10:22:14 + 10 минут crayon-h"> & DateAdd ( "n" , 10 , "10:22:14" ) 'Результат: 10:32:14Функция DateDiff
DateDiff – это функция, которая возвращает количество указанных интервалов времени между двумя датами. Тип возвращаемого значения – Variant/Long.Синтаксис
DateDiff ( interval , date1 , date2 , [ firstdayofweek ] , [ firstweekofyear ] )Параметры
| Параметр | Описание |
|---|---|
| interval | Обязательный параметр. Строковое выражение из спецсимволов, представляющее интервал времени, количество которых (интервалов) требуется вычислить между двумя датами. |
| date1, date2 | Обязательные параметры. Значения типа Variant/Date , представляющие две даты, между которыми вычисляется количество указанных интервалов. |
| firstdayofweek | Необязательный параметр. Константа, задающая первый день недели. По умолчанию – воскресенье. |
| firstweekofyear | Необязательный параметр. Константа, задающая первую неделю года. По умолчанию – неделя, в которую входит 1 января. |
Таблицу аргументов (значений) параметра interval смотрите в параграфе «Приложение 1».
Примечание к таблице аргументов: в отличие от функции DateAdd , в функции DateDiff спецсимвол "w" , как и "ww" , обозначает неделю. Но расчет осуществляется по разному. Подробнее об этом на сайте разработчиков.
Параметры firstdayofweek и firstweekofyear определяют правила расчета количества недель между датами.
Таблицы констант из коллекций firstdayofweek и firstweekofyear смотрите в параграфах «Приложение 2» и «Приложение 3».
Люди добрые подкорректируйте, пожалуйста, код, а если точней помогите прописать путь к папке, в которую требуется сохранить файл. Папка находится в папке заказы под названием архив
Dim strDate As String
Люди добрые подкорректируйте, пожалуйста, код, а если точней помогите прописать путь к папке, в которую требуется сохранить файл. Папка находится в папке заказы под названием архив
Dim strDate As String
Dim strDate As String
[/vba] Автор - dxДата добавления - 18.12.2013 в 17:03
Не ленись, сначала поищи на форуме!
Я тут всех достал, но результат хороший!
Не ленись, сначала поищи на форуме!
Я тут всех достал, но результат хороший! DAKRAY
Я тут всех достал, но результат хороший! Автор - DAKRAY
Дата добавления - 18.12.2013 в 17:19
Вписывай в модуль книги (ThisWorkbook)
A1 - ячейка, в которую будет вписываться дата.
Вписывай в модуль книги (ThisWorkbook)
A1 - ячейка, в которую будет вписываться дата. DAKRAY
A1 - ячейка, в которую будет вписываться дата. Автор - DAKRAY
Дата добавления - 18.12.2013 в 17:23
Да я сам новичек.) Наверное не так понял.
Вы хотите, чтобы в названии файла вставлялась дата? А руками не проще? Все ровно же жмете кнопку сэйв ас.)
Я почему-то подумал что Вам в файле нужно в какой-то ячейке поставить сегодняшнюю дату и после сохранения, она там бы и осталась.) Просто вопрос наболевший на столько был, что сразу подумал что именно тоже самое нужно и Вам.)
Да я сам новичек.) Наверное не так понял.
Вы хотите, чтобы в названии файла вставлялась дата? А руками не проще? Все ровно же жмете кнопку сэйв ас.)
Я почему-то подумал что Вам в файле нужно в какой-то ячейке поставить сегодняшнюю дату и после сохранения, она там бы и осталась.) Просто вопрос наболевший на столько был, что сразу подумал что именно тоже самое нужно и Вам.) DAKRAY
Я почему-то подумал что Вам в файле нужно в какой-то ячейке поставить сегодняшнюю дату и после сохранения, она там бы и осталась.) Просто вопрос наболевший на столько был, что сразу подумал что именно тоже самое нужно и Вам.) Автор - DAKRAY
Дата добавления - 18.12.2013 в 18:08
Во многих случаях вам может потребоваться показать дату и время последнего сохранения файла Excel на листе, чтобы узнать, когда файл был недавно обновлен. Вы можете решить эту проблему двумя следующими способами.
Вставьте последнюю сохраненную метку времени на лист с пользовательской функцией
Вы можете использовать следующую определяемую пользователем функцию, чтобы вставить последнюю сохраненную метку времени книги на определенный рабочий лист.
1. Нажмите другой + F11 клавиши одновременно, чтобы открыть Microsoft Visual Basic для приложений окно.
2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модуль. Затем скопируйте и вставьте следующий код VBA в окно кода.
Код VBA: вставьте последнюю сохраненную метку времени на лист
3. Нажмите другой + Q ключи, чтобы закрыть Microsoft Visual Basic для приложений окно и вернитесь к рабочему листу.
4. Выберите пустую ячейку, в которой будет отображаться последняя сохраненная метка времени книги, введите формулу. = LastSavedTimeStamp () и нажмите Enter нажмите клавишу, и отобразится номер.
5. Затем вам нужно отформатировать числовую ячейку как формат даты и времени, как показано на скриншоте ниже.
Теперь в выбранной ячейке отображается последняя сохраненная метка времени.
Примечание. Если вы хотите повторно использовать VBA в будущем, сохраните книгу как книгу Excel с поддержкой макросов.
Легко вставьте последнюю сохраненную метку времени на лист с помощью Kutools for Excel
Освободи Себя Вставить информацию о книге полезности Kutools for Excel поможет вам быстро вставить последнюю сохраненную или измененную метку времени не только в указанную ячейку, но и в верхний или нижний колонтитул по мере необходимости.
Перед применением Kutools for Excel, Пожалуйста, сначала скачайте и установите.
1. Выберите пустую ячейку для отображения последней сохраненной метки времени, затем щелкните Kutools Plus > Workbook > Вставить информацию о книге. Смотрите скриншот:
2. в Вставить информацию о книге в диалоговом окне выберите Дата изменена вариант в Информация раздел, затем выберите нужный вариант в Вставить в (в данном случае я выбираю вариант диапазона) и, наконец, щелкаю OK кнопку.
Затем на листе отображается последняя сохраненная метка времени.
Внимание: Если вам нужно вставить последнюю сохраненную метку времени в верхний или нижний колонтитул текущего рабочего листа, выберите заголовок or нижний колонтитул опцию.
Если вы хотите получить 30-дневную бесплатную пробную версию этой утилиты, пожалуйста, нажмите, чтобы загрузить это, а затем перейдите к применению операции в соответствии с указанными выше шагами.
Excel 2010, макрос сохранения с текущей датой место имени
Здравствуйте, помогите с написанием макроса в excel 2010. Нужен макрос для сохранения файла, но.
Макрос сохранения в PDF по имени файла
Всем привет. Имею макрос сохранения Excel в PDF на рабочем столе Sub Export_PDF_Order() .
Макрос Outlook для сохранения вложения в папку по частичному совпадению имени файла
Всем добрый день! Каждый день приходит в одном письме множество файлов. Есть ли макрос который.
Получить имя активного файла Excel и создать копию
Скрипт должен получить имя активного файла, создать его копию, и в копии имени заменить некоторые.
Если создание кнопки не проблема, то сохранить копию книгу, добавив дату и время
( в качестве разделителя используется запятая, ибо имя файла, не должно содержать : )
можно, например, так( константа 3, это количество символов в расширении файла, т.е. XLS=3 , XLSM=4 )
P.S. Или так, но только, если в имени файла нет больше символов .xls (за искл.расширения)
Переименование файла с датой и временем в имени с учетом GMT
Всем привет. Имеются файлы с одной системы ***********_ГГГГММДД_ЧЧММ и имеются файлы второй системы.
Перемещение файла в соответствии с датой и временем в его имени
Есть папка "D:\1". В ней лежит много файлов с маской YYYYMMDD-HHmm-******.*** (часть имени и.
Создание документа с текущими датой и временем в имени
Вот так можно быстро создавать неповторяющиеся в отношении имени документы или папку уже в открытом.
Создать копию файла в той же директории и добавить к его имени окончание
Здравствуйте, помогите с такой легкой задачкой. Собственно имеется программа с двумя кнопками и.
У меня есть книга Excel, которая при нажатии кнопки формы я хочу сохранить копию книги с именем файла, являющимся текущей датой.
Я пытаюсь следующее ActiveWorkbook.SaveAs ("filePathFormFlow To MSExcel" & Left(Now(), 10)) но получив Run-time error '1004': Method 'SaveAs' of object'_Workbook' failed.
может кто-нибудь помочь мне с этим? Я все еще очень новичок в разработке для Excel.
скорее всего, путь, к которому вы пытаетесь получить доступ, не существует. Кажется, вы пытаетесь сохранить в относительном месте, и у вас нет расширения файла в этой строке. Если вам нужно использовать относительные пути, вы можете проанализировать путь из ActiveWorkbook.FullName
изменить: Лучшим синтаксисом также будет
самый простой способ использовать эту функцию-начать с "записи макроса". Как только вы начнете запись, сохраните файл в нужном месте с нужным именем, а затем, конечно, установите тип файла, скорее всего, "Excel Macro Enabled Workbook"
остановить запись, и вы можете начать проверку кода.
Я написал код ниже, который позволяет сохранить книгу, используя путь, где файл был первоначально расположен, назвав его как " событие [дата в ячейке "А1"]"
скопируйте код в новый модуль, а затем напишите дату в ячейке" A1", например 01-01-2016 -> назначьте sub кнопке и запустите. [Примечание] вам нужно сделать файл сохранения, прежде чем этот скрипт будет работать, потому что новая книга сохраняется в папку автосохранения по умолчанию!
возможно, ваш формат по умолчанию не соответствует расширению файла. Вы должны указать формат файла вместе с именем файла, убедившись, что формат соответствует расширению:
OTOH, я не вижу расширения на вашем .Сохранить как имя файла. Возможно, вам нужно предоставить его при выполнении этого программно. Это имеет смысл-не нужно предоставлять расширение из интерфейса GUI удобно, но мы, программисты, должны писать однозначный код. Я предлагаю добавление расширения и соответствующего формата. См.эта страница msdn для списка форматов файлов. Честно говоря, я не узнаю много о descripions.
xlExcel8 = 56-это .формат xls
xlExcel12 = 50-это .файл xlsb формате
xlOpenXMLWorkbook = 51 является .формат xlsx
xlOpenXMLWorkbookMacroEnabled = 52 является .формата xlsm
xlWorkbookDefault является и указан со значением 51, что озадачивает меня, так как я думал, что формат по умолчанию может быть изменен.
Я знаю, что это старый пост, но я искал что-то подобное. Я думаю, ваша проблема заключалась в том, что при использовании Now () выход будет "6/20/2014". Это проблема для имени файла, поскольку в нем есть"/". Как вы знаете, нельзя использовать определенные символы в имени файла.
Читайте также: