Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Новый участник


Сообщения: 15
Благодарности: 5

Профиль | Отправить PM | Цитировать


2 - в статье по вашей ссылке есть подпрограмма обновления текста закладки UpdateBookmark, используйте её вместо прямого обновления. Вместо строк типа
Код: Выделить весь код
oDoc.Bookmarks("bm_1").Range.Text = "0" & CStr(lNumber + (i - 1))
нужно вызывать её вот так
Код: Выделить весь код
UpdateBookmark "bm_1", "0" & CStr(lNumber + (i - 1))
3 - установите точку останова (F9) где-нибудь в начале программы и отлаживайте по шагам (F8). Смотрите, что выполняется и в какой последовательности.
Это сообщение посчитали полезным следующие участники:

Отправлено: 23:02, 04-10-2012 | #16