В левом нижнем углу Excel вы найдете строку состояния:
Excel использует эту строку состояния для передачи вам сообщений. Однако свойство StatusBar также можно настроить с помощью VBA, что позволяет отображать собственные сообщения.
Пользовательское сообщение в строке состояния
Вы можете обновить строку состояния своим собственным сообщением в Excel во время выполнения макроса, используя Статус бар имущество.
1. Поместите этот код в макрос всякий раз, когда вы хотите обновить пользователя с помощью настраиваемого сообщения в строке состояния:
| 1 | Application.StatusBar = "Я работаю !!!" |
2. И в конце макроса поместите этот код, чтобы очистить строку состояния и вернуть управление обратно в Excel:
| 1 | Application.StatusBar = FALSE |
Отключить обновление строки состояния
Вместо отображения сообщения во время выполнения процедуры вы можете отключить строку состояния. Это увеличит скорость вашего кода VBA, поскольку Excel может пропустить обработку того, какое сообщение строки состояния нужно отображать.
Чтобы отключить обновление строки состояния во время выполнения кода, установите DisplayStatusBar свойство false.
| 1 | Application.DisplayStatusBar = False |
В конце кода восстановите обновление строки состояния:
| 1 | Application.DisplayStatusBar = True |
Важный! Использовать Статус бар свойство для установки сообщений, но используйте DisplayStatusBar свойство, чтобы полностью отключить или включить строку состояния.
Ускорить код VBA
Для оптимальной скорости обработки попробуйте использовать этот код:
| 12345678910111213141516 | sub RunFast ()Application.ScreenUpdating = FalseApplication.DisplayStatusBar = FalseApplication.EnableEvents = FalseActiveSheet.DisplayPageBreaks = FalseApplication.Calculation = xlCalculationManual'Ваш код здесьApplication.ScreenUpdating = TrueApplication.DisplayStatusBar = TrueApplication.EnableEvents = TrueActiveSheet.DisplayPageBreaks = TrueApplication.Calculation = xlCalculationAutomaticконец субмарины |
