У доњем левом углу програма Екцел пронаћи ћете статусну траку:
Екцел користи ову статусну траку за слање порука вама. Међутим, СтатусБар својство се такође може прилагодити помоћу ВБА, омогућавајући вам да прикажете своје поруке.
Порука прилагођене траке статуса
Статусну траку можете ажурирати властитом прилагођеном поруком у програму Екцел док је макро покренут, користећи Статусна трака својство.
1. Поставите овај код у макро сваки пут када желите да ажурирате корисника прилагођеном поруком статусне траке:
| 1 | Апплицатион.СтатусБар = "Сада радим !!!" |
2. И на крају макроа поставите овај код да бисте обрисали статусну траку и вратили контролу назад у Екцел:
| 1 | Апплицатион.СтатусБар = ФАЛСЕ |
Онемогући ажурирање траке статуса
Уместо приказивања поруке током извођења процедуре, можете онемогућити статусну траку. Ово ће повећати брзину вашег ВБА кода јер Екцел може прескочити обраду поруке на статусној траци за приказ.
Да бисте онемогућили ажурирање статусне траке док је код покренут, поставите ДисплаиСтатусБар својство на лажно.
| 1 | Апплицатион.ДисплаиСтатусБар = Нетачно |
На крају кода вратите ажурирање статусне траке:
| 1 | Апплицатион.ДисплаиСтатусБар = Тачно |
Важно! Користити Статусна трака својство за постављање порука, али користите ДисплаиСтатусБар својство да потпуно онемогући или омогући статусну траку.
Убрзајте ВБА код
За оптималну брзину обраде покушајте да користите овај код:
| 12345678910111213141516 | суб РунФаст ()Апплицатион.СцреенУпдатинг = НетачноАпплицатион.ДисплаиСтатусБар = НетачноАпплицатион.ЕнаблеЕвентс = НетачноАцтивеСхеет.ДисплаиПагеБреакс = НетачноАпплицатион.Цалцулатион = клЦалцулатионМануал„Овде ваша шифраАпплицатион.СцреенУпдатинг = ТачноАпплицатион.ДисплаиСтатусБар = ТачноАпплицатион.ЕнаблеЕвентс = ТачноАцтивеСхеет.ДисплаиПагеБреакс = ТачноАпплицатион.Цалцулатион = клЦалцулатионАутоматиценд суб |
