Datum i vrijeme programa Excel VBA
Godina, mjesec, dan datuma | DateAdd | Trenutni datum i vrijeme | Sat, Minuta, Drugo | TIMEVALUE
Saznajte kako raditi datume i vremena u Excel VBA.
Stavite gumb naredbe na radni list i dodajte linije koda u nastavku. Da biste izvršili linije koda, kliknite gumb naredbe na listi.
Godina, mjesec, dan datuma
Sljedeće makronaredbe dobivaju godinu datuma. Da biste proglasili datum, upotrijebite Dim izjavu. Za početak datuma upotrijebite funkciju DateValue.
Kodirati:
exampleDate = DateValue("Jun 19, 2010")
MsgBox Year(exampleDate)
Proizlaziti:
Napomena: Koristite mjesec i dan kako biste dobili mjesec i dan datuma.
DateAdd
Da biste dodali broj dana na datum, upotrijebiteDateAdd funkcija. Funkcija DateAdd ima tri argumenata. Ispunite "d" za prvi argument da biste dodali dane. Ispunite 3 za drugi argument da biste dodali 3 dana. Treći argument predstavlja datum na koji će se dodati broj dana.
Kodirati:
firstDate = DateValue("Jun 19, 2010")
secondDate = DateAdd("d", 3, firstDate)
MsgBox secondDate
Proizlaziti:
Bilješka: Promijenite "d" do "m" da biste dodali nekoliko mjeseci do datuma. Postavite pokazivač na DateAdd u Visual Basic Editor i kliknite F1 za pomoć na drugim intervalima. Datumi su u SAD formatu. Mjeseci prvi, Dani sekundi. Ova vrsta oblika ovisi o regionalnim postavkama vašeg prozora.
Trenutni datum i vrijeme
Da biste dobili trenutačni datum i vrijeme, upotrijebite funkciju Sada.
Kodirati:
Proizlaziti:
Sat, Minuta, Drugo
Dobiti sat vremena, upotrijebite funkciju Sat.
Kodirati:
Proizlaziti:
Napomena: Koristite Minuta i Drugi da biste dobili minutu i sekundu vremena.
TIMEVALUE
Funkcija TimeValue pretvara niz na vremenski serijski broj. Serijski broj vremena je broj između 0 i 1. Primjerice, podneva (na pola puta kroz dan) predstavlja 0,5.
Kodirati:
Proizlaziti:
Sada, kako biste jasno vidjeli da Excel interno obrađuje brojeve od 0 do 1, dodajte sljedeće retke koda:
y = TimeValue("09:20:01")
MsgBox y
Proizlaziti: