Efnisyfirlit
Í Microsoft Visual Basic forritinu eru dagsetningaraðgerðir eða hvers kyns dagsetningartengd hugtök nauðsynleg til að framkvæma ýmsar aðgerðir í gagnasafninu þínu. Þú gætir lent í ýmsum aðstæðum þar sem þú verður að nota þessar aðgerðir. Í þessari kennslu muntu læra um dagsetningaraðgerðina í VBA með viðeigandi dæmum og réttum myndskreytingum. Einnig munum við útvega þér margar dagsetningaraðgerðir sem þú getur innleitt í vinnublaðinu þínu.
Sækja æfingarbók
Notkun VBA Date.xlsm
Kynning á VBA Date Function
Excel flokkar dagsetningar í Date/Time fallinu. Það er innbyggð aðgerð. Við getum notað það í VBA fjölvi til að framkvæma allar dagsetningartengdar aðgerðir.
Áður en þú byrjar með Date fallinu þarftu að vita um Date breyturnar í VBA .
⏺ Setningafræði
Date()⏺ Rökskýringar
Það eru engin rök .
⏺ Skilar
Skilar núverandi dagsetningu.
⏺ Í boði í
Excel fyrir Office 365, Excel 2019, Excel 2016, Excel 2013, Excel 2011 fyrir Mac, Excel 2010, Excel 2007, Excel 2003, Excel XP, Excel 2000
⏺ Dæmi
Eins og þú veist eru engin rök, þú getur bara sett þau inn eins og eftirfarandi:
4780
Þegar við vinnum með Date fallinu gefum við enga sviga í VBA kóðana eins og þetta dæmi.
Úttak :
12Sunnudagur
2 – Mánudagur
3 – Þriðjudagur
4 – Miðvikudagur
5 – Fimmtudagur
6 – Föstudagur
7 – Laugardagur
Code Snippet:
3598
Output:
Eins og þú sérð skilar VBA dagsetningarfallið 4. Það þýðir Miðvikudagur.
Tengt efni: Hvernig á að nota lagaaðgerð í Excel VBA (4 dæmi)
9. VBA WeekdayName Fall
Skýrir streng sem sýnir lokaðan dag vikunnar.
Syntax :
WeekdayName(vikudagur, skammstafur, fyrsti dagur vikunnar)
Rök:
vikudagur: Áskilið reitur. Töluauðkenni fyrir vikudaginn. Tölugildi hvers dags byggir á stillingu á fyrsta degi vikunnar.
skammstöfun: Þetta er valfrjálst. Boolean gildi sem gefur til kynna hvort stytta eigi nafn vikudagsins. Ef því er sleppt er sjálfgefið False, sem gefur til kynna að nafn vikudags er ekki stytt eða stytt.
firstday of week: Valfrjáls reitur. Tölugildi sem gefur til kynna fyrsta dag vikunnar. Það getur haft ýmis gildi.
firstdayof week röksemd getur haft eftirfarandi gildi:
vbSunday – notar sunnudaginn sem fremsti dagur vikunnar.
vbMonday – er mánudagur sem fyrsti dagur vikunnar.
vbTuesday – virkar þriðjudaginn sem fyrsti degi afvikuna.
vbWednesday – miðvikudagurinn er fyrsti dagur vikunnar.
vbThursday – virkar fimmtudagur sem frekar dagur vikunnar .
vbFriday – notar föstudaginn sem fyrsta dagur vikunnar.
vbSaturday – virkar laugardaginn sem fyrsti dagur vikunnar.
vbUseSystemDayOfTheWeek – notar fyrsta dag vikunnar sem er skilgreindur af stillingum tækisins.
Kóðabútur:
4185
Úttak:
Eins og þú sérð sýna ofangreindir VBA kóðar nafn virkadags.
Tengd efni: Hvernig til að nota VBA WeekdayName fall í Excel (2 dæmi)
10. Year fall in VBA Date
Það skilar afbrigði (heiltölu) með rauntölu sem gefur til kynna árið.
Setjafræði :
Ár(dagsetning)
Rök:
Tilskilin dagsetningabreyta er hvaða afbrigði, töluleg segð, strengjasjáning eða hvaða samsetning sem er. Það táknar dagsetningu. Ef dagsetningin inniheldur Null mun hún einnig skila Null.
Kóðabút:
7869
Output:
Hér geturðu séð ártal tiltekinnar dagsetningar eftir innleiðingu VBA kóðans.
Lesa meira: Hvernig á að nota VBA Replace Function í Excel ( 11 Forrit)
11. FormatDateTime Fall
Þessi aðgerð skilar tjáningu sem er sniðin sem dagsetning eða tími.
Syntax :
FormatDateTime(Date, [ NamedFormat])
Rök:
Dagsetning: Áskilið reitur. Dagsetningartjáning sem á að forsníða.
NamedFormat: Þetta er valfrjálst. Það er tölulegt gildi sem sýnir snið dagsetningar/tíma. Ef því var sleppt notaði það vbGeneralDate .
NamedFormat getur haft eftirfarandi gildi:
vbGeneralDate (0): Sýna dagsetningu og/eða tíma. Ef það er dagsetningarhluti, tjáðu hann sem stutta dagsetningu. Ef það er tímahluti skaltu sýna hann sem langan tíma. Báðir hlutar eru sýndir ef þeir eru til staðar.
vbLongDate(1): Sýndu dagsetningu með því að nota langa dagsetningu sem valin er í svæðisstillingum tölvunnar.
vbShortDate (2): Sýna dagsetningu með því að nota stutta dagsetningarsniðið sem tilgreint er í svæðisstillingum tölvunnar.
vbLongTime(3): Sýna tíma með því að nota tímasniðið sem tilgreint er í svæðisstillingar tölvunnar þinnar.
vbShortTime(4): Sýna tíma með því að nota 24-tíma sniðið (hh:mm).
Kóðabút:
1767
Úttak:
Þú munt sjá eftirfarandi glugga eftir að hafa keyrt kóðann:
Hér geturðu séð öll tíma- og dagsetningarsniðin í VBA.
Lesa meira: Hvernig á að nota VBA TimeValue Function (6 viðeigandi dæmi)
12. VBA CDate Fall
Fullið breytir gildri dagsetningu og tíma tjáningu í dæmigerða dagsetningu.
Syntax :
CDdagur(dagsetning)
Rök:
Tilskilið dagsetningarviðmið er hvaða afbrigði, töluleg segð, strengjasjáning eða hvaða samsetning sem er. Það táknar dagsetningu. Ef dagsetningin inniheldur Null mun hún einnig skila Null.
Kóðabút:
2174
Output:
Eins og þú sérð skilaði VBA kóðinn okkar bara dæmigerðu dagsetningarsniði Excel.
Tengt efni: Hvernig á að nota VBA DIR aðgerðina í Excel (7 Dæmi)
Dæmi um VBA dagsetningu
Í eftirfarandi köflum munum við veita þér þrjú hagnýt og hentug dæmi um dagsetningu með VBA. Þessi dæmi munu innihalda dagsetningartengd vandamál og lausnir þeirra. Við mælum með að þú lesir og æfir öll þessi dæmi til að bæta VBA þekkingu þína. Við skulum komast inn í það.
1. Reiknaðu yfirfalladaga með því að nota Dagsetningu í VBA
Merkingin með tímabært gerist seint eða fram yfir frestinn. Seint, sérstaklega, fram yfir frest eða of seint til að uppfylla skilyrði.
Segjum sem svo að þú þurfir að skila verkefni á sunnudag. En það er þriðjudagur og þú hefur ekki sent það inn. Það er hægt að kalla það tvo tímabundna daga.
Kíktu á eftirfarandi gagnasafn:
Hér höfum við gagnapakka yfir nokkra nemendur og skil á verkefnum þeirra dagsetningu. Þú getur séð síðasta dagsetningu skila. Markmið okkar er að finna gjalddaga út frá innsendingardegi. Nú, til að ná þessu, fylgdu þessum skrefum:
📌 Skref
- Fyrst skaltu ýta á Alt+F11 á lyklaborðinu þínu til að opna VBA ritilinn.
- Veldu síðan Insert > Module .
- Eftir það skaltu slá inn eftirfarandi kóða:
3474
Við notuðum ABS aðgerð til að fjarlægja mínusmerkið.
- Vista síðan skrána.
- Þá skaltu ýta á Alt+F8 á lyklaborðinu til að opna Macro valmyndinni.
- Næst skaltu velja
- Smelltu síðan á Run .
Eins og þú sérð höfum við notað dagsetninguna með góðum árangri í VBA og fundið tímabundna daga.
Svipuð lestur
- Hvernig á að nota VBA Space Virkni í Excel (3 dæmi)
- Notaðu VBA ChDir aðgerð í Excel (4 viðeigandi dæmi)
- Hvernig á að nota IsNull aðgerðina í Excel VBA (5 dæmi)
- Notaðu VBA While Wend Statement í Excel (4 dæmi)
- Hvernig á að hringja í undirmann í VBA í Excel (4 Dæmi)
2. Finndu fæðingarár frá dagsetningu með því að nota VBA
Nú geturðu fundið árið frá tiltekinni dagsetningu. Þetta er frekar einfalt að finna.
Kíktu á eftirfarandi gagnasafn:
Hér geturðu séð fæðingardag sumra einstaklinga. Markmið okkar er að draga fæðingarárið út úr dagsetningu og einnig fæðingarári síðustu færslu Elizabeth.
📌 Skref
- Ýttu fyrst á Alt+F11 á lyklaborðinu þínu til að opna VBA ritilinn.
- Veldu síðan Insert>Module .
- Eftir það skaltu slá inneftirfarandi kóða:
1576
- Síðan skaltu vista skrána.
- Eftir það skaltu ýta á Alt+F8 á lyklaborðinu til að opna Macro gluggann box.
- Næst, veldu find_year .
- Smelltu síðan á Run .
Að lokum geturðu séð að okkur gengur vel að draga fæðingarárið út úr hverri dagsetningu. Einnig fundum við fæðingarár síðustu færslu með því að nota dagsetningu VBA í Excel.
3. Bæta við dögum í dagsetningu með VBA
Nú geturðu skilgreint dagsetningarbreytuna og notað hana til að bæta við dagsetningunni. Til að framkvæma þetta notum við DateAdd aðferðina í VBA. Þú getur notað þessa aðgerð til að bæta dögum, mánuðum og árum við ákveðna dagsetningu.
Kíktu á eftirfarandi gagnasafn:
Hér, þú getur séð nokkur nöfn og sumar dagsetningar sem fylgja þeim. Nú er markmið okkar að bæta fimm dögum við þessar tilteknu dagsetningar og búa til nýja dagsetningu.
📌 Skref
- Ýttu fyrst á Alt +F11 á lyklaborðinu þínu til að opna VBA ritilinn.
- Veldu síðan Insert>Module .
- Eftir það skaltu slá inn eftirfarandi kóða:
4676
Hér notuðum við „d“ sem rök í DateAdd fallinu. Þú getur breytt því í „y“ eða „m“ til að bæta við árum eða mánuðum í sömu röð,
- Vista síðan skrána.
- Þá skaltu ýta á Alt+F8 á lyklaborðinu þínu til að opna Macro valmyndina.
- Næst skaltu velja.
- Smelltu síðan á Run .
Eins og þú getursjáðu, við höfum bætt dögum inn í dagsetningu með því að nota dagsetninguna í VBA. Nú geturðu breytt kóðanum í samræmi við val þitt.
💬 Atriði sem þarf að muna
✎ VBA Date aðgerð virkar í raun eins og TODAY aðgerðin í Excel.
✎ VBA DATE er óstöðugt fall í excel. Það þýðir að það mun halda gögnunum jafnvel þótt rof sé á aflgjafanum.
✎
Í grundvallaratriðum vistar VBA Date-gildi sem DATE við innleiðingu.
✎
Þannig að ef þú reynir að úthluta dagsetningarbreytu sem streng/texta mun það valda villu.
✎
Sjálfgefið gildi Date er 0: 00:00 (miðnætti) 1. janúar 0001.
Niðurstaða
Til að ljúka við vona ég að þessi kennsla hafi veitt þér gagnlega þekkingu um dagsetninguna í VBA kóða. Við mælum með að þú lærir og notar allar þessar leiðbeiningar á gagnasafnið þitt. Sæktu æfingabókina og prófaðu þessar sjálfur. Einnig skaltu ekki hika við að gefa álit í athugasemdareitnum. Dýrmæt endurgjöf þín heldur okkur áhugasömum um að búa til kennsluefni eins og þessa.
Ekki gleyma að skoða vefsíðu okkar Exceldemy.com fyrir ýmis Excel-tengd vandamál og lausnir.
Haltu áfram að læra nýjar aðferðir og haltu áfram að vaxa!
Dagsetningaraðgerðir í VBA sem þú ættir að læraNú, í næstu köflum, munum við sýna þér nokkrar viðbótar dagsetningaraðgerðir sem þú getur notað í fjölmörgum tilgangi í VBA. Lestu þessa hluta til að vita allar mögulegar leiðir til að vinna með dagsetninguna í VBA. Við mælum með að þú geymir þau í vopnabúrinu þínu. Það mun örugglega bæta þekkingu þína.
1. DateAdd aðgerð sem dagsetning í VBA
Í VBA notum við DateAdd aðgerðina til að bæta við dögum á tiltekinni dagsetningu. Eftir það mun það skila dagsetningunni sem myndast.
Syntax:
DateAdd(bil, tala, dagsetning)
Rök:
bil: Það er áskilið. Strengjatjáning er tímabilið sem þú vilt bæta við.
númer: Áskilið. Það er töluleg tjáning sem er fjöldi millibila sem þú vilt bæta við. Það getur verið jákvætt (til að fá dagsetningar í framtíðinni) eða neikvæðar (til að fá dagsetningar í fortíðinni).
dagsetning: Upprunaleg dagsetning/tími.
Nú geta bil röksemdirnar haft eftirfarandi stillingar:
áááá – Ár
kv – Fjórðungur
m – Mánuður
á – Dagur ársins
d – Dagur
w – Vikudagur
ww – Vika
klst – Klukkutími
n – Mínúta
s – Annað
Kóðabútur :
4448
Úttak:
Eins og þú sérð bætti það við 15 dagsetningum í núverandi dagsetningu íVBA.
Lesa meira: Hvernig á að nota IsDate aðgerð í VBA (3 dæmi)
2. DateDiff aðgerð í VBA
DateDiff fallið skilar Variant (Long) sem ákvarðar fjölda tímabila milli tveggja tilgreindra dagsetninga.
Syntax :
DateDiff( interval, date1, date2, [ firstdayof week, [ first weekofyear ]] )
Rök:
bil: Það er Áskilið. Strengjatjáning er tímabilið sem þú vilt bæta við Strengjatjáningu sem er tímabilið sem þú notar til að reikna út greinarmuninn á milli tveggja dagsetninga.
date1,date2 : Required; Afbrigði (dagsetning). Tvær dagsetningar sem þú vilt nota við útreikninginn.
firstday of week: Valfrjálst. Fasti sem skilgreinir fyrsta dag vikunnar. Ef ekki er ákveðið er gert ráð fyrir sunnudag.
first weekofyear: Valfrjálst. Fasti sem ákvarðar fyrstu viku ársins. Ef ekki er stillt á fyrsta vikan að vera vikan sem 1. janúar birtist.
Nú geta bil röksemdirnar haft eftirfarandi stillingar:
áááá – Ár
kv – Fjórðungur
m – Mánuður
y – Dagur ársins
d – Dagur
w – Vikudagur
ww – Vika
klst – Klukkutími
n – mínúta
s – Annað
firstdayof week röksemd hefur þessar stillingar:
vbSunday –notar sunnudaginn sem fremsta dag vikunnar.
vbMonday – notar mánudaginn sem fyrsta dag vikunnar.
vbTuesday – starfar á þriðjudaginn sem fyrsti dagur vikunnar.
vbWednesday – miðvikudaginn er fyrsti dagur vikunnar.
vbThursday – starfar á fimmtudaginn sem frekar dagur vikunnar.
vbFriday – notar föstudaginn sem fyrsta dagur vikunnar.
vbSaturday – virkar laugardaginn sem fyrsti dagur vikunnar.
vbUseSystemDayOfTheWeek – notar fyrsta dag vikunnar sem er skilgreindur af stillingum tækisins.
The first weekofyear hefur þessar stillingar:
vbFirstJan1 – notar vikuna sem inniheldur 1. janúar.
vbFirstFourDays – notar fyrstu vikuna sem hefur a.m.k. fjóra daga á nýju ári.
vbFirstFullWeek – starfar fyrstu heilu viku ársins.
vbSystem – notar fyrstu vikuna í ári eins og það er skilgreint af staðsetningu tækisins þíns.
Kóðabútur:
1285
Out setja :
Á endanum skilar það mismuninum á dagsetningunum tveimur í VBA.
Lesa meira: Hvernig á að nota VBA DateDiff fall í Excel (9 dæmi)
3. DatePart fall sem dagsetning
DatePart fallið skilar afbrigði (heiltölu) sem inniheldur skilgreindan hluta af uppgefin dagsetning.
Syntax :
DatePart(bil, dagsetning, [ firstday of week, [firstweekofyear ]])
Rök:
bil: Það er áskilið. Strengjatjáning er tímabilið sem þú vilt bæta við Strengjatjáningu sem er tímabilið sem þú notar til að reikna út greinarmuninn á milli tveggja dagsetninga.
dagsetning: Áskilið; Afbrigði (dagsetning). Dagsetningin sem þú vilt nota í útreikningnum.
firstday of week: Valfrjálst. Fasti sem skilgreinir fyrsta dag vikunnar. Ef ekki er ákveðið er gert ráð fyrir sunnudag.
first weekofyear: Valfrjálst. Fasti sem ákvarðar fyrstu viku ársins. Ef ekki er stillt á fyrsta vikan að vera vikan sem 1. janúar birtist.
Nú geta bil röksemdirnar haft eftirfarandi stillingar:
áááá – Ár
kv – Fjórðungur
m – Mánuður
y – Dagur ársins
d – Dagur
w – Vikudagur
ww – Vika
klst – Klukkutími
n – mínúta
s – Annað
firstdayofweek röksemdin hefur þessar stillingar:
vbSunday – notar sunnudaginn sem fremsta dag vikunnar.
vbMonday – er mánudagur sem fyrsti dagur vikunnar.
vbTuesday – virkar á þriðjudag sem fyrsti dagur vikunnar.
vbWednesday – miðvikudaginn er fyrsti dagur vikunnar.
vbThursday – virkar fimmtudagur sem frekar dagur vikunnar.viku.
vbFriday – notar föstudaginn sem fyrsta dagur vikunnar.
vbSaturday – virkar laugardaginn sem fyrsti dagur vikunnar.
vbUseSystemDayOfTheWeek – notar fyrsta dag vikunnar sem er skilgreindur af stillingum tækisins þíns.
The first weekofyear hefur þessi gildi:
vbFirstJan1 – starfar vikuna þar á meðal 1. janúar.
vbFirstFourDays – notar fyrstu vikuna sem hefur í mesta lagi undirstærð fjóra daga í nýju ári.
vbFirstFullWeek – notar fyrstu heilu viku ársins.
vbSystem – notar fyrstu viku ársins eins og valið er eftir staðsetningu tækisins.
Kóðabútur :
1917
Output :
Á þennan hátt geturðu notað þessa dagsetningaraðgerð í VBA kóða.
Lesa meira: Hvernig á að nota VBA FileDateTime aðgerð í Excel (3 notar)
4. DateSerial aðgerð
Þú getur séð dagsetningu byggða á inntaksári, mánuði og degi með því að nota DateSerial aðgerðina.
Syntax:
DateSerial(ár, mánuður, dagur)
Rök:
ár – Áskilið reit. Tala á milli 100 og 9999, að meðtöldum, eða töluleg tjáning sem táknar árið.
mánuður – Áskilið reitur. Heiltölugildi sem skilgreinir mánuðinn.
dagur – Áskilið reitur. Heiltölugildi sem lýsir deginum.
Code Snippet:
4262
Output :
Lesa meira: Hvernig á að nota VBA TimeSerial í Excel (3 dæmi)
4. VBA DateValue Fall
Nú notum við DateValue fallið til að skilgreina dagsetningu.
Syntafræði :
DateValue(dagsetning)
Rök:
Hér eru dagsetning röksemd venjulega strengjatjáning sem lýsir dagsetningu frá 1. janúar 100 , til og með 31. desember 9999. Óháð því getur dagsetningin ennfremur hvaða tjáningu sem er sem getur táknað dagsetningu, tíma eða bæði dagsetningu og tíma á því bili.
Code Snippet:
2168
Output :
Eins og þú sérð notuðum við dagsetningaraðgerðina með góðum árangri í VBA kóða.
5. Dagsfall í VBA
Það skilar afbrigði (heiltölu) sem ákvarðar rauntölu á milli 1 og 31, að meðtöldum, sem gefur til kynna dag mánaðarins.
Syntafræði :
Dagur(dagsetning)
Rök:
Áskilin dagsetning er hvaða afbrigði sem er , talnatjáning, strengjatjáning eða hvaða samsetningu sem er. Það táknar dagsetningu. Ef dagsetningin inniheldur Null mun hún einnig skila Null.
Kóðabút:
5663
Output:
Eins og þú sérð, með því að nota VBA kóðana komumst við að því að dagur tiltekinnar dagsetningar er 12.
Tengd efni: VBA sniðaðgerð í Excel (8 notar með dæmum)
6. VBA mánaðarfall sem dagsetning
Það skilar afbrigði (heiltölu) sem skilgreinir rauntölu á milli 1 og 12,innifalið, miðlar mánuð ársins.
Syntax :
Month(date)
Rök:
Tilskilið dagsetningarviðmið er hvaða afbrigði, töluleg segð, strengjasjáning eða hvaða samsetning sem er. Það táknar dagsetningu. Ef dagsetningin inniheldur Null mun hún einnig skila Null.
Kóðabút:
7265
Output:
Tengt efni: Hvernig á að nota VBA hægri virkni í Excel (6 dæmi)
Svipuð lestur
- Hvernig á að nota VBA Environ aðgerðina (4 dæmi)
- Hvernig á að nota VBA og virkni í Excel (4 dæmi)
- VBA If – Then – Else yfirlýsing í Excel (4 dæmi)
- Hvernig á að nota VBA Abs virkni í Excel (9 dæmi)
- Hvernig á að nota Concatenate í Excel VBA (4 aðferðir)
7. MonthName Fall
Það skilar streng sem sýnir tilgreindan mánuð.
Syntafræði :
MonthName(mánuður, [ skammstöfun ])
Rök:
mánuður: það er áskilið. Tölulegur titill mánaðarins. Til dæmis er janúar 1, febrúar er 2, og svo framvegis.
skammstöfun: Það er valfrjálst. Boolean gildi sem sýnir hvort stytta eigi nafn mánaðar. Ef því er sleppt er sjálfgefið False, sem gefur til kynna að nafn mánaðarins sé ekki skammstafað.
Kóðabútur:
5962
Output:
Eins og þú sérð fundum við mánaðarnafniðmeð þessari VBA dagsetningaraðgerð.
8. Vikudagsfall
Það skilar afbrigði ( heildtala ) sem hefur rauntölu sem gefur til kynna daginn viku.
Syntafræði :
Vikudagur (dagsetning, [ fyrsti dagur vikunnar ])
Rök:
dagsetning: Áskilin dagsetningarröksemdafærsla er hvaða afbrigði, töluleg segð, strengjasjáning eða hvaða samsetning sem er. Það táknar dagsetningu. Ef dagsetningin inniheldur Null mun hún einnig skila Null.
firstday of week: Valfrjálst. Fasti sem skilgreinir fyrsta dag vikunnar. Ef það er ekki fast, er gert ráð fyrir sunnudag.
firstdayof week röksemdirnar hafa þessar stillingar:
vbSunday – notar sunnudaginn sem fremsti dagur vikunnar.
vbMonday – er mánudagur sem fyrsti dagur vikunnar.
vbTuesday – virkar þriðjudaginn sem fyrsti dagur vikunnar.
vbWednesday – miðvikudagurinn er fyrsti dagur vikunnar.
vbThursday – virkar fimmtudagur sem frekar dagur vikunnar. vikuna.
vbFriday – notar föstudaginn sem fyrsta dagur vikunnar.
vbSaturday – virkar laugardaginn sem fyrsti dagur vikunnar .
vbUseSystemDayOfTheWeek – notar fyrsta dag vikunnar sem er skilgreindur af stillingum tækisins.
Return Parameters
Nú, þessi aðgerð skilar heiltölu. Þannig að merking þessara heiltölna er eftirfarandi:
1 –