ВБА ТИМЕР

Екцел ВБА ТИмер користи се за откривање и израчунавање времена које је прошло за завршетак било које активности. У Екцелу ВБА ТИМЕР функцију се може користити на више начина. Можемо израчунати време за завршетак било које активности, можемо израчунати време потребно да се достигне од почетне до завршне фазе било које активности или чак можемо израчунати и време потребно за кликање на било коју функцију.

Ова функција се не може извршити у екцелу. У екцелу можемо видети само време и додати га било којој ћелији, али не можемо да је меримо као тајмер.

Можете преузети овај ВБА ТИМЕР Екцел образац овде - ВБА ТИМЕР Екцел предложак

Пример # 1

У овом примјеру ћемо рећи како бројати или мјерити вријеме за покретање довршеног кода. За то идите да бисте уметнули мени ВБА и изабрали модул као што је приказано испод.

Једном када то учинимо, отвориће се нови модул као што је приказано у наставку. Сада у то упишите подкатегорију имена тренутне функције или било које друго име по вашем избору.

Шифра:

 Суб Тимер1 () Крај Суб

Сада дефинишите две димензије као Сецондс1 и Сецондс2 као СИНГЛЕ функцију, што значи да су постојала два појединачна података о једном броју (Без децималног броја).

Шифра:

 Суб Тимер1 () Дим секунде1 као појединачне дим секунде2 као једноструки крајњи суб

Сада да покренете тајмер прво одаберите дефинисану димензију Сецондс1 и доделите функцију ТИМЕР . И учините исто за остале димензије Сецондс2 као што је приказано у наставку. Сврха је да се мери време почетка и завршетка.

Шифра:

 Суб тимер1 () дим секунде1 као појединачне дим секунде2 као појединачне секунде1 = тимер () секунде2 = тимер () крај суб

Овим се завршава тајмерни део кода. Сада требамо видјети временски пролаз приликом покретања кода. За то морамо исписати излаз у пољу за поруке као што је приказано у наставку.

На снимку слике испод, исписали смо текст „Време потребно:“ и разлику између Секунде2 и Секунде1 са јединицама секунде.

Шифра:

 Суб тимер1 () дим секунде1 као појединачне дим секунде2 као појединачне секунде1 = тимер () секунде2 = тимер () МсгБок („Време потребно:“ & вбНевЛине & Сецондс2 - секунде1 и „секунде“) Крај суб

Када завршите, покрените комплетан код помоћу Ф5 тастера или кликом на дугме за репродукцију као што је приказано у наставку.

Видећемо оквир за поруке са бројеним временом од 0 секунди јер је време потребно за покретање комплетног кода било 0.

Можда ћемо видети мало већу разлику ако је писани код огроман.

Пример бр. 2

Постоји још једна метода у којој можемо одабрати временски пролаз било које мале количине као времена чекања и пустити корисника или оператера да причекају док се процес не доврши. Ово се може користити тамо где креирамо алат или макро са огромном линијом структуре кода. На тај начин ћемо омогућити кориснику да сачека време да се читав код покрене и операција је завршена. Због тога што ако нешто учините када се код покреће, датотека ће се срушити.

За то отворите нови модул и напишите Подкатегорију у име потребне функције или било које име као што је приказано у наставку.

Шифра:

 Суб Тимер2 () Крај Суб

Сада да би овај код био мали и једноставан, користићемо уграђене функције ВБА. А за овај тип Апликација је пратила тачку (.), А затим из листе претраживања и одаберите функцију Сачекај као што је приказано у наставку.

Ова функција чекања омогућиће нам да додамо време чекања док се комплетни код не покрене. Ово време чекања је булово. Након тога размотрите вријеме када се покренемо 0 секунди, плус вријеме које желимо показати као вријеме чекања приказат ће ТимеВалуе као што је приказано у наставку.

Шифра:

 Апликација Суб Тимер2 (). Сачекајте сада + Временска вредност („00:00:10“) Крај Суб

Овде сматрамо 10 секунди као време чекања за завршетак покретања кода.

Сада да би исписали време чекања потребно је да одштампамо поруку у пољу за поруке уз помоћ команде МсгБок као што је приказано у наставку.

Шифра:

 Апликација Суб Тимер2 (). Сачекајте сада + Временска вредност ("00:00:10") МсгБок ("Време чекања - 10 секунди") Крај Суб

Као што видимо, у оквир за поруке додаје се текст „ Време чекања - 10 секунди “ за штампање.

Сада покрените код помоћу Ф5 тастера или ручно. Видећемо након што смо чекали 10 секунди, појавит ће се оквир с поруком која се користи у коду.

Пример бр. 3 - ВБА тајмер

Постоји још један једноставан начин да се види и прикаже тренутно време у ВБА. За ово ћемо директно користити МсгБок и остатак кода само тамо. За ово отворите нови модул у ВБА и напишите подкатегорију у име коришћене функције или било којег другог имена као што је приказано у наставку.

Шифра:

 Суб Тимер3 () Крај Суб

Сада напишите МсгБок која је наредба за штампање поруке. У загради можемо написати било коју поруку која ће се одштампати у пољу за поруке. Овде смо изабрали „ Вријеме је: “ као што се користи наш текст и уз њега се користи „ и сада () “. Приказаће се тренутно време са датумом у искачућем пољу за поруке.

Шифра:

 Суб Тимер3 () МсгБок ("Време је:" & Сада ()) Крај Суб

Сада ћемо у другом пољу за поруке бројати број секунди који су протекли током целог дана, до тренутног времена по сату. За ово напишите МсгБок и између заграда напишите текст „ Тимер ис: “ заједно са „ & Тимер () “ као што је приказано у наставку.

Шифра:

 Суб Тимер3 () МсгБок ("Време је:" & сада ()) МсгБок ("Тајмер је:" & Тимер ()) Крај Суб

Када завршите, покрените код помоћу тастера Ф5 или ручно. Добићемо два одвојена поља за поруке као што је приказано у наставку.

У првом пољу за поруке добит ћемо тренутни датум и време у ДД / ММ / ГГГГ и хх: мм: сс АМ / ПМ формату што је подразумевани формат Екцел. У другом пољу за поруке видећемо време које је протекло тог дана у секунди.

У другом пољу за поруке види се да је тајмер 59953, 62 секунди. Ако то поделимо са 60 секунди и 60 минута, добићемо тачан тајмер у сатима који истекну у том дану, а то је 16, 65 сати .

Ствари које треба памтити о ВБА ТИМЕР-у

  • Увек сачувајте датотеку у Марцо Енаблед Воркбоок да бисте избегли губитак писаног ВБА кода.
  • Увек компајлирајте цео код корак по корак како бисте били сигурни да је сваки код нетачан.
  • На пример, број 1 СИНГЛЕ користи се за приказ броја у целини. Чак и ако користимо ДОУБЛЕ, резултат ће бити децимални.

Препоручени чланци

Ово је водич за Екцел ВБА ТИМЕР. Овде смо расправљали о томе како користити ВБА ТИМЕР функцију заједно са неколико практичних примера и преузети екцел предложак. Можете и да прођете кроз друге наше предложене чланке -

  1. Како се користи ВБА Изјава о грешци?
  2. Формат броја у ВБА
  3. Како се користи ВБА функција за проналажење?
  4. Водичи о ВБА ТРИМ функцији

Категорија:

ВБА