Excel VBA Nyt -toiminto
NYT on päivämäärä- ja aikatoiminto molemmissa VBA-laitteissa, joita käytetään nykyisen järjestelmän päivämäärän ja kellonajan saamiseen, aivan kuten laskentataulukko-funktio, joka ei sisällä mitään argumentteja, VBA now -funktiossa ei myöskään oteta mitään argumentteja, palautuslähtö tälle toiminnolle on päivämäärä.
VBA NOW -toiminto on samanlainen kuin Excel-laskentataulukko-funktion. Kuten VBA: n DATE-funktiolla, myös "NYT": llä ei ole parametreja syötettäväksi. Meidän on vain siirrettävä funktio suljetuilla sulkeilla tai sulkeita ei myöskään tarvita. Käyttämällä VBA: n PÄIVÄYS-funktiota voimme luoda nykyisen päivämäärän, joka näyttää työskentelemämme järjestelmän. Olen kuitenkin nähnyt tilanteita, joissa tarvitsemme myös nykyisen ajan sekä päivämäärän. Excelissä voimme tehdä monia erilaisia asioita; Vastaavasti voimme tuottaa nykyisen päivämäärän ja kellonajan yksinkertaisella toiminnolla, jota kutsutaan nyt excelissä
VBA NYT -kaava on yksinkertainen.
NYT ()
Esimerkki NYT-toiminnosta VBA Excelissä
Katso yksinkertaista esimerkkiä NOW-toiminnosta VBA: ssa. Seuraa alla olevia ohjeita kirjoittaa VBA-koodi ja saada riittävästi tietoa NYT sekä koodin kirjoittamisesta.
Vaihe 1: Aloita alimenettely antamalla makron nimi.
Koodi:
Sub Now_Example1 () End Sub
Vaihe 2: Ilmoita muuttuja päivämääräksi. Syy, miksi meidän on ilmoitettava muuttuja päivämääräksi, koska lopputuloksemme on päivämäärä ja aika -muodossa.
Koodi:
Sub Now_Example1 () Dim k Päivämäärän loppu Sub
Vaihe 3: Määritä arvo muuttujalle “k” soveltamalla VBA NOW -toimintoa.
Koodi:
Sub Now_Example1 () Dim k As Date k = Now End Sub
Vaihe 4: Näytä nyt funktion arvo NYT, jonka olemme määrittäneet muuttujalle “k” VBA: n viestiruudussa.
Koodi:
Sub Now_Example1 () Dim k As Date k = Now MsgBox k End Sub
Ok, olemme valmiit.
Suorita koodi F5-näppäimellä tai manuaalisesti ja katso tulos.
Tulos näkyy 15.4.2019 klo 5.03.35.
Tietokoneeni päivämäärämuoto on “kk-pp-vvvv”.
Voimme myös muuttaa päivämäärämuotoa FORMAT-toiminnolla. Alla on koodi päivämäärän muodon muuttamiseksi.
Koodi:
Sub Now_Example1 () Dim k As Date k = Now MsgBox Format (k, "PP-KK-VVVV HH: KM: SS") Lopeta ali
Suorita koodi ja katso ero.
Nyt meillä on oikea päivämäärä- ja aikamuoto. Tämän muodon avulla kuka tahansa voi ymmärtää päivämäärän ja kellonajan muodon.
Haihtuva luonteeltaan:
Kuten näet ensimmäisessä esimerkissä, saimme aikatulokseksi 5:03:35 ja toisessa esimerkissä tulokseksi 17:19:02. Joten tämä osoittaa, että NOW-toiminto on haihtuva toiminto, joka muuttuu joka sekunti.
Vaihtoehto ajastintoiminnolle VBA: ssa
Vaihtoehtona VBA TIMER -toiminnolle voimme käyttää “VBA NOW” -toimintoa laskeaksesi kokonaisajan, jonka makro vie tehtävän suorittamiseen.
Käytä alla olevaa koodia laskeaksesi koodisi viemän ajan.
C0de:
Sub TotalDuration () Dim k As Date k = Now '' 'Syötä koodi tähän' '' MsgBox "Makron tehtävän suorittamiseen kuluva aika on yhteensä:" & _ Format ((Now - k), "HH: MM : SS ") Lopeta ala
Kopioi ja liitä koodi vihreällä alueella.
Suorita koodi painamalla F5-näppäintä tai painamalla ajo-painiketta. Heti kun se on suoritettu loppuun, saamme makron kuluttaman ajan tehtäväviestin suorittamiseen viestiruudussa. Alla on esimerkki samasta.
Näin voimme käyttää NYT-toimintoa monin tavoin VBA: ssa.
Voit ladata tämän Excel VBA Now -toimintomallin täältä - VBA Now -toimintomalli
