Excel VBA data ir laikas
Metai, mėnuo, dienos data | DateAdd | Dabartinė data ir laikas | Valanda, minutė, antroji | TimeValue
Sužinokite, kaip dirbti datos ir laikai in Excel VBA.
Įdėkite komandų mygtuką į savo darbalapį ir pridėkite žemiau esančias kodo eilutes. Norėdami paleisti kodo eilutes, spustelėkite komandą mygtuką lape.
Metai, mėnuo, dienos data
Ši makrokomandas gauna datos metus. Norėdami paskelbti datą, naudokite "Dim" teiginį. Norėdami inicijuoti datą, naudokite funkciją DateValue.
Kodas:
exampleDate = DateValue("Jun 19, 2010")
MsgBox Year(exampleDate)
Rezultatas:
Pastaba: naudokite mėnesį ir dieną, kad gautumėte mėnesio ir dienos datą.
DateAdd
Norėdami pridėti dienų skaičių, naudokiteDateAdd funkcija. "DateAdd" funkcija turi tris argumentus. Įtraukite "d" pirmąjį argumentą, kad pridėtumėte dienų. Užpildykite 3 antrajam argumentui pridėti 3 dienas. Trečiasis argumentas reiškia datą, iki kurios bus pridedamas dienų skaičius.
Kodas:
firstDate = DateValue("Jun 19, 2010")
secondDate = DateAdd("d", 3, firstDate)
MsgBox secondDate
Rezultatas:
Pastaba: Pakeiskite "d" į "m", jei norite pridėti keletą mėnesių iki datos. Įdėkite žymeklį į "DateAdd" redaktorių Visual Basic ir spustelėkite F1, kad gautumėte pagalbos kitose intervalo specifikacijose. Datos yra JAV formatu. Pirmieji mėnesiai, Dieną antrą kartą. Šio formato tipas priklauso nuo jūsų "Windows" regiono nustatymų.
Dabartinė data ir laikas
Norėdami gauti dabartinę datą ir laiką, naudokite funkciją "Dabar".
Kodas:
Rezultatas:
Valanda, minutė, antroji
Gaukite laiko valandą, naudokitės "Hour" funkcija.
Kodas:
Rezultatas:
Pastaba: naudokite minučių ir sekundžių, kad gautumėte minutę ir sekundę.
TimeValue
"TimeValue" funkcija konvertuoja eilutę į laiko eilės numerį. Laiko serijos numeris yra skaičius tarp 0 ir 1. Pavyzdžiui, vidurdienį (pusiaukelėje per dieną) sudaro 0,5.
Kodas:
Rezultatas:
Dabar, kad būtų aiškiai matyti, kad "Excel" tvarko laiką viduje, skaičiai tarp 0 ir 1, prideda šias kodo eilutes:
y = TimeValue("09:20:01")
MsgBox y
Rezultatas:
