Excel 2013 и Application.StatusBar в его однодокументном интерфейсе (SDI) / Microsoft Office

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel 2013 и Application.StatusBar в его однодокументном интерфейсе (SDI)

2 сообщений из 2, страница 1 из 1

Excel 2013 и Application.StatusBar в его однодокументном интерфейсе (SDI)

#38767179

LeCrunch

Гость

Для извещения о выполнении макросов в Excel часто использую простой способ передачи такой динамической информации через переменные в строку состояния приложения Application.StatusBar=…
В процессе тестирования работы своих макросов в новом Excel, заметил, что такая наглядность со StatusBar в нем пропала - информация в новом окне не обновляется до окончания работы макроса (особенно если используется стандартная рекомендация Application.ScreenUpdating = False).
Готовых советов пока не нашел - только общие рекомендации от MS .

Вопрос - кто как выходит из данной ситуации, и, главное как писать совместимые по данному моменту макросы для старых версий Excel 2007, 2010 и новой 2013?
Если общего решения нет, то как еще обеспечить простоту и наглядность выполнения, без использования специальных решений типа прогрессбара с формами?..

...

Рейтинг:

0 / 0

05.10.2014, 13:26

| Ответить | Цитировать | Написать

Excel 2013 и Application.StatusBar в его однодокументном интерфейсе (SDI)

#38774546

LeCrunch

Гость

Нашлось такое решение.
Вначале объявляется книга, откуда происходит запуск макроса

Код: vbnet

1.
2.

   Dim sBook As Workbook
   Set sBook = ThisWorkbook

далее в коде идет создание новой книги, куда заполняются данные макроса и активируется первая книга :

Код: vbnet

1.
2.
3.
4.
5.
6.

    Dim oBook As Workbook
    Dim sh As Worksheet
    Set oBook = Workbooks.Add
    Set sh = oBook.Worksheets(1)

    sBook.Activate

благодаря чему теперь в строке информации Excel 2013 отображается динамическая информация о ходе процесса!

Нюанс - в конце дополнительно приходится снимать выделение:

Код: vbnet

1.
2.

    sh.Activate
    sh.Cells(1, 1).Select

...

Рейтинг:

0 / 0

12.10.2014, 22:25

| Ответить | Цитировать | Написать

2 сообщений из 2, страница 1 из 1

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=61&msg=38774546&tid=2173803]:	0ms
get settings:	10ms
get forum list:	14ms
check forum access:	3ms
check topic access:	3ms
track hit:	56ms
get topic data:	13ms
get forum data:	3ms
get page messages:	38ms
get tp. blocked users:	1ms
others:	298ms

total:	439ms