Обработка AfterSave

@glum256 · Регистрация: 20.04.2011

Студворк — интернет-сервис помощи студентам

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

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

BeforeSave не устраивает, т.к. имя у меня получается, как например, Документ1.

@Busine2009 · 21.04.2011, 17:16

glum256,
я не понял, что надо сделать.

@glum256 · 21.04.2011, 17:22 **[ТС]**

Сообщение от аналитика

2010 офис устанавливай.
или вот так:

Visual Basic
1
2
3
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
   Application.OnTime Now + TimeSerial(0, 0, 5), "твой_макрос"
End Sub

Так не есть гуд, а выше Word 2007 мне ни как нельзя.
Какое-то событие возникает всё же при выскакивании менюшки Save as... , save ?

Добавлено через 5 минут

Сообщение от Busine2009

glum256,
я не понял, что надо сделать.

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

Before может выдать Документ1 при получении имени (т.е. когда создан новый и его еще не сохраняли).

@Busine2009 · 21.04.2011, 18:15

glum256,
События такого нет DocumentAfterSave. Может быть свой класс сделать (но я ни разу такого ещё не делал и даже не знаю, как это можно реализовать).

Можно заменить стандартные команды в Word. Для этого нужно написать процедуры, которые имеют те же имена, что и встроенные команды: FileSave и FileSaveAs.
Если вот такую процедуру сделать (см. ниже), то при нажатии кнопки Сохранить, будет появляться сообщение, а сохранения не будет.

Visual Basic
1
2
3
Public Sub FileSave()
MsgBox "Do not save"
End Sub

Чтобы узнать имена других команд, нужно сделать следующее:
щ. правой кн. мыши по панели инструментов (в Word 2007 она всего одна) - Настройка панели быстрого доступа... - наводите курсор мыши на команды - через несколько секунд (в зависимости от быстродействия вашего компьютера) появится всплывающая подсказка. В конце этой подсказки указано имя команды.

Сообщение от аналитика

2010 офис устанавливай.

ему ж для Word нужно, а не для Excel. В Word 2010 не появилось события AfterSave.

Примечание:
В Word 2010 уже нельзя подменять команды процедурами.

@glum256 · 21.04.2011, 19:55 **[ТС]**

Сообщение от Busine2009

glum256,
События такого нет DocumentAfterSave. Может быть свой класс сделать (но я ни разу такого ещё не делал и даже не знаю, как это можно реализовать).

Можно заменить стандартные команды в Word. Для этого нужно написать процедуры, которые имеют те же имена, что и встроенные команды: FileSave и FileSaveAs.
Если вот такую процедуру сделать (см. ниже), то при нажатии кнопки Сохранить, будет появляться сообщение, а сохранения не будет.

Visual Basic
1
2
3
Public Sub FileSave()
MsgBox "Do not save"
End Sub

Чтобы узнать имена других команд, нужно сделать следующее:
щ. правой кн. мыши по панели инструментов (в Word 2007 она всего одна) - Настройка панели быстрого доступа... - наводите курсор мыши на команды - через несколько секунд (в зависимости от быстродействия вашего компьютера) появится всплывающая подсказка. В конце этой подсказки указано имя команды.

Однако, проблемы это не решает...

Можно вызвать из нее изначальную процедуру?
типа inherited в паскале

@Busine2009 · 21.04.2011, 20:35

Сообщение от glum256

Можно вызвать из нее изначальную процедуру?

не знаю, я не профи.

@Vlanib · 22.04.2011, 05:28

А попробуйте обрабатывать событие BeforeClose. Проверить сохранено или нет легко и имя файла уже будет.

@glum256 · 22.04.2011, 11:27 **[ТС]**

Сообщение от Vlanib

А попробуйте обрабатывать событие BeforeClose. Проверить сохранено или нет легко и имя файла уже будет.

В том то и дело, что если файл новый или выполняется SaveAs - названия ему еще нет. Т.е. Документ1.
Можно было бы, конечно, делать как предложил человек, через некоторое время проверку на статус,
но запись может производится и при выходе из ворда...

Новые блоги и статьи Все статьи Все блоги /
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .

@glum256 0 / 0 / 0 Регистрация: 20.04.2011 Сообщений: 4

	Обработка AfterSave 21.04.2011, 16:20. Показов 1536. Ответов 7 Метки нет (Все метки) Как сделать так, чтобы обрабатывалось событие ПослеЗаписи? Мне нужно занести некоторые данные о сохраненном документе при создании файла или при его изменении в независимости от того, как был закрыт документ. Лишь бы уже был сохранен. Моя форма должна получать полное имя файла с путем и запрашивать некоторые вещи у оператора через форму. BeforeSave не устраивает, т.к. имя у меня получается, как например, Документ1. 0

@Busine2009 2309 / 1541 / 115 Регистрация: 13.06.2009 Сообщений: 5,575
	21.04.2011, 17:16
	glum256, я не понял, что надо сделать. 0

@Vlanib Частенько бываю 750 / 331 / 42 Регистрация: 20.06.2007 Сообщений: 854
	22.04.2011, 05:28
	А попробуйте обрабатывать событие BeforeClose. Проверить сохранено или нет легко и имя файла уже будет. 0