Kako umetnuti mjerač vremena u Excel radni list
Sam za sebe, Excel nema funkciju uključivanja mjerača vremena. Međutim, s programskim jezikom koji se zove Visual Basic za aplikacije, moguće je napisati jednostavnu makronaredbu za izvođenje funkcije odbrojavanja. Ovaj članak pokazuje kako izraditi makronaredbu koja omogućuje mjeraču vremena da odbrojava do 12 sati, prikladnu za upravljanje vremenom unutar radnog lista.
Formatirajte ćeliju mjerača vremena
1. korak
U novom, otvorenom radnom listu idite na ćeliju A1. Ovo će biti mjesto primjera mjerača vremena.
2. korak
Desnom tipkom miša kliknite ćeliju A1 i odaberite Oblikuj ćelije .
3. korak
Odaberite Vrijeme iz okvira Kategorija i odaberite jedan od formata sati:minute:sekunde. Kliknite U redu za postavljanje formata ćelije.
Stvorite makronaredbu
1. korak
Pristupite prozoru za uređivanje Visual Basica pritiskom na ALT-F11 . Kliknite Umetni na traci izbornika i kliknite Modul .
2. korak
Unesite sljedeći tekst u prozor Module1:
Dim gCount As Date
Dodatni mjerač vremena()
gCount =Now + TimeValue("00:00:01")
Application.OnTime gCount, "EndMessage"
End Sub
Podzavršna poruka()
Dim xRng kao raspon
Postavite xRng =Application.ActiveSheet.Range("A1")
xRng.Value =xRng.Value - TimeSerial(0, 0, 1)
Ako je xRng.Vrijednost <=0 Onda
MsgBox "Odbrojavanje dovršeno."
Izlaz Sub
Završi ako
Brojač poziva
Kraj pod
Možete kopirati i zalijepiti gornji tekst koda ili ga možete upisati, red po red, u prozor Module1. VBA uređivač primjenjuje formatiranje prema potrebi.
3. korak
Minimizirajte VBA prozor klikom na - simbol u gornjem desnom kutu. Kliknite Datoteka na vrpci i Spremi kao . Odaberite mjesto za spremanje datoteke. U prozoru Spremi kao dodijelite radnoj knjizi naziv i odaberite Excel radna knjiga s omogućenim makronaredbama (*.xlsm) iz Spremi kao vrstu padajući popis. Kliknite Spremi i vratite se u radnu bilježnicu.
Korištenje mjerača vremena
1. korak
Kliknite ćeliju A1 i unesite 0:3:0 , zatim pritisnite Enter . Time se postavlja vrijeme na 0 sati, 3 minute i 0 sekundi.
2. korak
Kliknite Prikaz na vrpci i kliknite Makronaredbe . Odaberite Timer s popisa makronaredbi i kliknite Pokreni . Vaša ćelija mjerača vremena počet će odbrojavati do nule kada se prikaže Odbrojavanje je završeno otvara se dijaloški okvir. Kliknite U redu da se vratite svom poslu.
Savjet
Ne morate koristiti ćeliju A1. Postavite svoj mjerač vremena bilo gdje i promijenite referencu ćelije u retku 8 koda mjerača vremena iz A1 u ćeliju koju koristite.