Excel дата сохранения файла в ячейке

Обновлено: 04.07.2024

Пару вопросов :
1. Идет ли речь о сохранении документа Экселя после создания/редактирования из под VFP ?
2. Идет ли речь о том, что на неком листе в некой ячейке записать датуи время сохранения ?

Если на оба вопроса "Да", то перед loExcel.Save. почему бы не сделать
.Cell(. ).Value=Transform(Date())

------------------
"Знание того, что считать ответом, равносильно знанию ответа".

Исправлено: rhs72, 12.02.09 09:59

Речь идет о неком документе Exel в котором при внесении в него изменений необходимо в нем же отображать дату его последнего изменения (сохранения). Я не нашел в Help e данной функции.

Есть так называемые BuiltinDocumentProperties для каждой книги, а там среди Item есть 'Last save time'

------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь. rhs72
Пару вопросов :
1. Идет ли речь о сохранении документа Экселя после создания/редактирования из под VFP ?

Если "Нет", то тема будет перемещена.

rhs72
2. Идет ли речь о том, что на неком листе в некой ячейке записать дату и время сохранения ?

------------------
"Знание того, что считать ответом, равносильно знанию ответа".

Такой ф-ции нет, но ты можешь написать её сам

------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь.

Написал бы если бы умел

rhs72
Пару вопросов :
1. Идет ли речь о сохранении документа Экселя после создания/редактирования из под VFP ? Ответ -Нет

rhs72
2. Идет ли речь о том, что на неком листе в некой ячейке записать дату и время сохранения ? Ответ Да

Открываешь нужный файл -> Alt+F11 -> В дереве проекта выбрать книгу -> В левом комбо выбрать Workbook, в правом BeforeSave

------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь.

А разве просто посмотреть недостаточно? Зачем в ячейку-то записывать?

Меню Excel \ Файл \ Свойства \ закладка "Статистика"

Я пока раздел "Свойства" в Excel 2007 нашел - упарился

------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь. Я думал это не сложно, думал может функция такая имеется, просто в help не описана.

Не всё так гладко с этим.
1) На момент Workbook_BeforeSave ещё не обновлён соответствующий параметр - т.е. мы получим не текущую дату, а предыдущую - тут уже логичнее просто записывать текущую дату-время
2) Ещё веселее если этот код вставить в НОВЫЙ, ни разу не сохранённый документ - он (код) банально упадёт - т.к. у этого свойства будет неопределённое значение в момент первого сохранения.
3) Постоянные надоедания системы безопасности офиса, и потенциальное внимание со стороны антивирусов.

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

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, Что то не получается к сожалению я новичок в этой теме а вы не могли бы расписать конкретно по моему примеру. dx

Да я сам новичек.) Наверное не так понял.
Вы хотите, чтобы в названии файла вставлялась дата? А руками не проще? Все ровно же жмете кнопку сэйв ас.)

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

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

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

Вкладка Office позволяет редактировать и просматривать в Office с вкладками и значительно упрощает работу . Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%

Повторное использование чего угодно: Добавляйте наиболее часто используемые или сложные формулы, диаграммы и все остальное в избранное и быстро используйте их в будущем.
Более 20 текстовых функций: Извлечь число из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
Инструменты слияния : Несколько книг и листов в одну; Объединить несколько ячеек / строк / столбцов без потери данных; Объедините повторяющиеся строки и сумму.
Разделить инструменты : Разделение данных на несколько листов в зависимости от ценности; Из одной книги в несколько файлов Excel, PDF или CSV; От одного столбца к нескольким столбцам.
Вставить пропуск Скрытые / отфильтрованные строки; Подсчет и сумма по цвету фона ; Отправляйте персонализированные электронные письма нескольким получателям массово.
Суперфильтр: Создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировать по неделям, дням, периодичности и др .; Фильтр жирным шрифтом, формулы, комментарий .
Более 300 мощных функций; Работает с Office 2007-2019 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.

Сохраните файл Excel с датой и временем, используя код VBA

Удивительный! Использование эффективных вкладок в Excel, таких как Chrome, Firefox и Safari!

Экономьте 50% своего времени и сокращайте тысячи щелчков мышью каждый день!

За исключением ввода даты и времени вручную, следующий код VBA может помочь вам автоматически добавить текущую дату и время к имени файла. Пожалуйста, сделайте следующие шаги:

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

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

Код VBA: автоматическое добавление даты и времени к имени файла

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

Внимание: В приведенном выше коде вам нужно изменить путь к файлу и имя по своему усмотрению.

Читайте также: