Здравствуйте!
Помогите пожалуйста! Можно ли написать макрос, который бы я могла сама запустить или остановить, а он постоянно, раз в 10 минут сам выводил сообщение о том, сколько я уже напечатала слов и страниц текста. У меня Word 2010.
Вот две процедуры. Поместите их в один модуль для удобства. И сделайте две кнопки. Для одной кнопки назначьте процедуру "pStatistic", для второй - pStop.
Посмотрите комментарии, которые я написал в коде.
Sub pStatistic()
'1. Отображение сообщения со статистикой.
Application.Dialogs(wdDialogToolsWordCount).Show
'2. Установка таймера.
' В скобках функции "TimeValue" укажите нужное время. Сейчас установлено 5 секунд.
' В параметре "Name" укажите имя модуля и имя процедуры, которую надо запускать.
Application.OnTime When:=Now + TimeValue("00:00:05"), Name:="Module1.pStatistic"
End Sub
Sub pStop()
' Отключение таймера.
Application.OnTime When:=Now, Name:=""
End Sub
Да, все получается замечательно! Спасибо Вам!