VBA šiandien | Kaip naudoti datos funkciją VBA, norint rasti šios dienos datą?

VBA Šiandien funkcija

Šiandien reiškia dabartinę datą, darbalapyje Dabar funkcija daro tą patį, kas suteikia mums dabartinę datą ir laiką, tačiau pačioje VBA nėra integruotos šiandienos funkcijos, metodas, norint gauti dabartinę sistemos datą, yra naudojant funkcijos funkcija data skirtingai nuo dabar funkcijos data funkcija suteikia mums tik dabartinę datą.

„Excel“ programoje turime keletą naudingų funkcijų, kurios gali mums padėti kasdien. „Excel“ palengvino visą mūsų gyvenimą darbe. Kai sakau „kasdien“, „Excel“ turi formulę, kad grąžintume ir šios dienos datą, ne tik datą, bet ir dabartinę datą bei laiką. Tokia yra „Excel“ formulių įvairovė. Tikiuosi, kad jei esate nuolatinis „Excel“ vartotojas, susidūrėte su „Excel“ formule, vadinama „ŠIANDIEN“, kad galėtumėte įterpti dabartinę datą, kuri rodoma jūsų kompiuteryje. Bet VBA neturime TODAY funkcijos, tada kaip iš VBA gauti TODAY datą. Šiame straipsnyje bus parodyta, kaip dirbti su VOD dienos data. Skaityk.

Kokia yra formulė norint gauti šios dienos datą VBA?

Jei nėra formulės, vadinamos TODAY, tai kaip mes gauname šios dienos datą iš VBA? Tai yra dažnas klausimas, kurį užduoda visi, tačiau sprendimas yra paprastas, mes turime formulę su kitu pavadinimu, ty DATE funkcija.

Kokia datos funkcija veikia VBA?

DATA yra visiškai tokia pati kaip funkcija VBA TODAY, bet tai nėra nepastovi funkcija, nebent paleisite makrokomandą arba suaktyvinsite makrokomandą.

Funkcijos DATA sintaksėje nėra jokių argumentų, kurių mums tereikia perduoti funkciją DATE, kad viskas.

DATA ()

VBA datos funkcijos pavyzdžiai

DATE funkcija grąžinti dabartinę sistemos datą. Tai labai naudinga, kai mes tai naudojame kaip didžiojo VBA projekto dalį. Pirmiausia norėdamas tinkamai žinoti apie tai, parodysiu paprastus DATE funkcijos pavyzdžius.

1 pavyzdys

Sukurkime paprastą DATE funkciją, kad pranešimo laukelyje būtų rodoma dabartinė data. Atlikite toliau nurodytus veiksmus, kad parašytumėte „Excel“ makrokomandą.

1 veiksmas: sukurkite antrinę procedūrą, pavadindami makrokomandą.

2 žingsnis: paskelbkite kintamąjį kaip „Data“. DATE funkcija grąžina rezultatą tik kaip datą, todėl kintamųjų duomenų tipas turėtų būti „Data“.

Kodas:

 Sub šiandien_pavyzdys1 () Dim K kaip eilutės pabaiga Sub 

3 žingsnis: priskirkite kintamojo „k“ reikšmę kaip DATE funkciją .

Kodas:

 Sub sub__pavyzdys1 () Dim K kaip eilutė K = Data End Sub 

4 žingsnis: Dabar kintamojo „k“ reikšmė VBA pranešimų laukelyje .

Kodas:

 Sub šiandien_pavyzdys1 () Dim K kaip eilutė K = Data MagBox K End Sub 

Paleiskite kodą, kurį turėtume matyti dabartinę datą, rodomą sistemoje.

Pastaba: datos formatas gali skirtis priklausomai nuo sistemos nustatymų. Tai gali būti „mm-dd-yy“, „dd-mm-yy“.

Datos funkcija, siekiant rasti terminą yra šiandien

Datos funkcija yra naudingesnė nustatant EMI, kredito kortelės, draudimo išmokų ir kt. Terminus.

Tarkime, kad dirbate paskolos išieškojimo pareigūnu ir turite klientų sąrašą, nurodydami jų mokėtiną sumą ir terminą.

Būsenos stulpelyje jums reikia rezultato kaip „Terminas šiandien“, jei terminas yra lygus dabartinei sistemos datai.

Tai galima padaryti naudojant IF sąlygą ir VBA kilpas. Žemiau yra parengtas kodas, kad galėtumėte pasiekti rezultatus.

Kodas:

 Sub šiandien_pavyzdys2 () Dydis K kaip sveikoji reikšmė K = nuo 2 iki 11, jei ląstelės (K, 3). Vertė = data, tada ląstelės (K, 4). Vertė = „Dienos laikas yra šiandien“ Kitos ląstelės (K, 4). Vertė = "Ne šiandien" pabaiga, jei kita K pabaigos antrinė dalis 

Tai pasieks būsenos stulpelio rezultatus.

Daugeliu atvejų taip galime naudoti datą, kad patikrintume datas ir atliktume tam tikrą veiksmą.

Šią „VBA Today“ funkciją galite atsisiųsti čia. „VBA Today Function Excel“ šablonas


$config[zx-auto] not found$config[zx-overlay] not found