Excel VBA Most funkció
A NOW egy dátum és idő függvény mind a VBA-ban, amelyet az aktuális rendszer dátumának és időpontjának lekérésére használnak, akárcsak a munkalapfüggvény, amely nem tartalmaz benne argumentumot, a VBA most funkcióban szintén nem vesz fel argumentumokat, a return kimenet mert ez a függvény a dátum.
A VBA NOW függvény hasonló az Excel munkalap funkcióhoz. A VBA-ban a DATE függvényhez hasonlóan a „NOW” -nak sincsenek paraméterei, amelyeket át kell adni, csak zárt zárójelekkel kell átadni a függvényt, vagy nincs szükség zárójelekre. A DATE függvény használatával a VBA-ban előállíthatjuk az aktuális dátumot, amely megmutatja a rendszeret, amin dolgozunk. Láttam azonban olyan helyzeteket, amikor aktuális időre van szükségünk a dátummal együtt. Az excelben sokféle dolgot megtehetünk, hasonlóan az aktuális dátumot és időt is előállíthatjuk az MOST nevű egyszerű funkcióval az excelben.
A VBA MOST képlete egyszerű.
MOST ()
Példa a MOST funkcióra a VBA Excel-ben
Nézze meg a VBA NOW függvényének egyszerű példáját. Kövesse az alábbi lépéseket a VBA kód megírásához, és megfelelő ismeretekkel rendelkezik a MOST-ról, valamint a kód megírásáról.
1. lépés: Indítsa el az alfolyamatot makrónév megadásával.
Kód:
Sub Now_Példa1 () End Sub
2. lépés: Nyújtsa be a változót „Dátum” -nak. Az ok, amiért a változót „Dátumnak” kell nyilvánítanunk, mert a végeredmény dátum és idő formátumú.
Kód:
Sub Now_Példa1 () Dim k As Date End Sub
3. lépés: A VBA NOW függvény alkalmazásával rendelje hozzá az értéket a „k” változóhoz.
Kód:
Sub Now_Példa1 () Dim k As Date k = Now End Sub
4. lépés: Most mutassa meg annak a funkciónak az értékét MOST, amelyet a „k” változóhoz rendeltünk a VBA üzenetmezőjében.
Kód:
Sub Now_Példa1 () Dim k As Date k = Now MsgBox k End Sub
Ok, készen vagyunk.
Futtassa a kódot az F5 billentyűvel vagy manuálisan, és nézze meg, mi az eredmény.
Az eredmény 2019.04.15-én 5: 03: 35-kor mutat.
A számítógépem dátumformátuma „éééé-hhééé”.
A dátumformátumot a FORMAT funkció segítségével is megváltoztathatjuk. Az alábbiakban látható a dátumformátum megváltoztatására szolgáló kód.
Kód:
Sub Now_Példa1 () Dim k As Date k = Most MsgBox Format (k, "DD-MMM-YYYY HH: MM: SS") End Sub
Futtassa a kódot, és nézze meg a különbséget.
Most van egy megfelelő dátum- és időformátumunk. Ezzel a formátummal bárki megértheti a dátum és az idő formátumát.
Illékony természet:
Amint az első példában láthatja, az időeredményt 5:03:35-ként kaptuk, a második példában pedig az eredményt 17:19:02-nek vesszük. Tehát ez azt mutatja, hogy a NOW függvény minden pillanatban változó volatilis függvény.
Az időzítő funkció alternatívája a VBA-ban
A VBA TIMER alternatívájaként a „VBA MOST” funkcióval kiszámíthatjuk a makró által a feladat elvégzéséhez szükséges teljes időt.
Használja az alábbi kódot a kódja által elvárt idő kiszámításához.
C0de:
Sub TotalDuration () Dim k As Date k = Most '' 'Írja be ide a kódját' '' MsgBox "A makró által a feladat végrehajtásához szükséges összes idő:" & _ Format ((Now - k), "HH: MM : SS ") Vége al
A zöld színű területre másolja és illessze be a kódot.
Végezze el a kódot az F5 gomb megnyomásával vagy a futtatás gomb megnyomásával. Amint befejezi a végrehajtást, megkapjuk a makró által az üzenetmezőben lévő feladatüzenet kitöltéséhez szükséges időt. Az alábbiakban példa erre.
Így a VBA-ban a NOW függvényt sokféleképpen használhatjuk.
Itt töltheti le ezt az Excel VBA Now Function sablont - VBA Now Function Template