Одбројавање у статусној траци помоћу ВБА у програму Мицрософт Екцел

Anonim

Ако се питате како могу да направим тајмер у екцелу

Питање:

Одбројавање од 30 до 0 секунди ће се приказати на статусној траци.

Одговор:
Уметните следећи код у стандардни модул.

Суб ЦоунтДовн () Дим интЦоунтер Ас Интегер Дим блн Ас Боолеан блн = Апплицатион.ДисплаиСтатусБар Апплицатион.ДисплаиСтатусБар = Труе За интЦоунтер = 30 до 1 корак -1 Апплицатион.СтатусБар = интЦоунтер & "Секунде …" Апликација. Чекајте сада + ТимеСериал (0, 0, 1) Сљедећи интЦоунтер Апплицатион.СтатусБар = Нетачна Апплицатион.ДисплаиСтатусБар = блн Енд Суб На овај начин можете користити статусну траку за приказ екцел вба тајмера.