„Excel VBA“ laiko funkcija
VBA laiko funkcija grąžina dabartinį laiką, taip pat svarbu atkreipti dėmesį į tai, kad ši funkcija neturi jokių argumentų, dar vienas svarbus veiksnys, kurį reikia atsiminti, kad ši funkcija grąžina dabartinį sistemos laiką. Naudodamiesi šia funkcija mes iš tikrųjų galime rasti faktinį kodų eilutės laiką procesui užbaigti.
LAIKAS yra tam tikra nepastovi funkcija. Joje nėra jokios sintaksės.
Mes taip pat turime panašią funkciją „Excel“ - DABAR (), kuri į skaičiuoklę įterpia tiek dabartinius laikus, tiek dabartinę datą.
LAIKAS ()
Mums tiesiog reikia įvesti funkciją. Tiesą sakant, norint įrašyti dabartinį laiką, pakaks skliaustų nereikia pridėti tik TIME. Funkcijos TIME rezultatas yra eilutėje.
Kaip naudoti LAIKO funkciją VBA?
Leiskite man parodyti paprasto TIME pavyzdį, kai naudojama „Excel“ funkcija. Atlikite toliau nurodytus veiksmus, kad sukurtumėte kodą, kad galėtumėte naudoti funkciją TIME.
1 veiksmas: sukurkite makrokomandą.
Kodas:
Antrinis laikas_pavyzdys1 () Pabaigos sub
2 žingsnis: paskelbkite kintamąjį kaip eilutę.
Kodas:
Sub Time_Pavyzdys1 () Dim CurrentTime kaip eilutės pabaiga Sub
3 žingsnis: priskirkite šio kintamojo vertę naudodami funkciją TIME.
Kodas:
Sub Time_Pavyzdys1 () Dim CurrentTime As String CurrentTime = Time End Sub
4 žingsnis: Dabar parodykite rezultatą pranešimo laukelyje.
Kodas:
Sub Time_Pavyzdys1 () Dim CurrentTime kaip eilutė CurrentTime = Time MsgBox CurrentTime End Sub
Paleiskite šį kodą naudodami klavišą F5 arba rankiniu būdu. Mes gausime dabartinį laiką.
Taigi, kai paleidžiau šį kodą, laikas buvo 11.51.54 val.
Funkcijos „Dabar“ () alternatyva
Datos ir laiko derinys kaip alternatyva funkcijai DABAR
Kaip sakiau straipsnio pradžioje, DABAR gali įterpti dabartinę datą ir laiką. Tačiau mes galime naudoti dvi kitas funkcijas kaip alternatyvią funkciją NOW; šios dvi funkcijos yra VBA DATE ir VBA TIME funkcijos.
VBA data grąžins dabartinę datą, o laikas grąžins esamą laiką, taigi tai padaro funkciją DABAR. Žemiau pateikiamas kodo rinkinys, į kurį langelyje A1 bus įterpta dabartinė data ir laikas.
Kodas:
Antrinis laiko_pavyzdys2 () diapazonas („A1“). Reikšmė = data ir „“
Šis kodas į langelį A1 įterps dabartinę datą ir laiką.
Šioms reikšmėms taip pat galime pritaikyti formatą naudodami FORMAT funkciją. Žemiau pateiktas kodas suformuos datą ir laiką.
Kodas:
Antrinis laiko_pavyzdys2 () diapazonas ("A1"). Reikšmė = data ir "" & laiko diapazonas ("A1"). NumberFormat = "dd-mmm-yyyy hh: mm: ss AM / PM" End Sub
Dabar šio kodo rezultatas yra toks.
Stebėkite savo darbaknygės atidarytus įrašus naudodami laiko funkciją VBA
Dažnai turime žinoti savo darbaknygės atidarymo laiko dažnumą. Yra situacija, kai darbaknygę atidarome gana dažnai, ir mes padarome keletą pakeitimų. Stebėdami darbaknygės atidarymo laiką ir datą, galime stebėti darbaknygės atidarymo laiką.
Sukurkite naują lapą ir pervadinkite jį į „Track Sheet“.
1 veiksmas: dukart spustelėkite šią darbaknygę iš VBE redaktoriaus.
2 žingsnis: Išskleidžiamajame objekto sąraše pasirinkite darbaknygę.
3 žingsnis: Kai tik pasirenkate šią parinktį, galite pamatyti naują automatiškai sukurtą makrokomandą pavadinime „Workbook_Open ()“.
4 žingsnis: Šiame makrokomandoje turėsime parašyti kodą, kad galėtume stebėti darbaknygės atidarymo datą ir laiką.
Aš jau parašiau kodą, o žemiau yra jūsų kodas.
Kodas:
Privati antrinė darbaknygė_Open () Dim LR As Long LR = Sheets ("Track Sheet"). Ląstelės (Rows.Count, 1). End (xlUp). Eilutė + 1 Sheets ("Track Sheet"). Ląstelės (LR, 1) .Value = Data & "" & laikas () Skaičiuoklės ("Takelio lapas"). Ląstelės (LR, 1) .NumberFormat = "dd-mmm-yyyy hh: mm: ss AM / PM" End Sub
Taip bus įrašytas jūsų darbaknygės atidarymo laikas, kaip nurodyta toliau.
