Kā lietot VBA funkciju DateAdd programmā Excel

  • Dalīties Ar Šo
Hugh West

Portāls VBA funkcija DateAdd ir Excel programmas datuma un laika kategorijā. VBA funkcijas Izmantojot šo funkciju, mēs varam pievienot vai atņemt gadus, mēnešus, dienas, ceturkšņus un pat dažādus laika intervālus, piemēram, stundas, minūtes, sekundes no dotā datuma. Darbs ar datumu un laiku ikdienas aprēķinos, lai ģenerētu pārskatus vai veiktu salīdzinājumus, ir bieži sastopams scenārijs. Excel programmā VBA datuma un laika funkciju, piemēram, DateAdd funkcijas, izmantošana padara sarežģītus vai laikietilpīgus aprēķinus.efektīvāk un ātrāk.

Lejupielādēt prakses darba burtnīcu

Lejupielādējiet šo prakses darba burtnīcu, lai vingrinātos, kamēr lasāt šo rakstu.

VBA DateAdd funkcija.xlsm

Iepazīstināšana ar Excel VBA DateAdd funkciju

Rezultāts:

datums, kuram tiek pieskaitīts vai atņemts noteikts laika intervāls.

Sintakse:

DateAdd (intervāls, numurs, datums)

Argumenti:

Arguments Obligāti/pēc izvēles Apraksts
intervāls Nepieciešams A virkne izteiksme.

Laika intervāls dažādos iestatījumos, ko vēlamies pievienot. numurs Nepieciešams A ciparu izteiksme .

Portāls numurs no intervāli jāpieskaita vai jāatņem

Var būt pozitīvs - par nākotnes datumi

Var būt negatīvs - par pagātne datumi datums Nepieciešams A datums izteiksme

Portāls datums uz kuru intervāli ir pievienots

Iestatījumi:

Portāls DateAdd funkcija ir šie intervāla iestatījumi:

Iestatīšana Apraksts
yyyy Gads
q Ceturtdaļa
m Mēnesis
y Dienas gads
d Diena
w Nedēļas diena
ww Nedēļa
h Stunda
n Minūtes
s Otrais

Excel VBA DateAdd funkcijas piemēri

Excel DateAdd funkcijas formulas izteiksmes

Ir dažādi veidi, kā ievietot datums arguments uz DateAdd funkcija. To visu rezultāts ir viens un tas pats.

Ievietojiet šādus kods in the Visual Basic redaktors:

(Kā palaist kodu programmā Visual Basic Editor)

 Sub add_year() Range("D3") = DateAdd("yyyy", 2, #1/1/2022#) Range("D4") = DateAdd("yyyy", 2, DateSerial(2022, 1, 1)) Range("D5") = DateAdd("yyyy", 2, DateValue("Jan 1, 2022")) Range("D6") = DateAdd("yyyy", 2, Range("B6")) End Sub 

Paskaidrojums :

DateAdd("yyyy",2, viena no šādām metodēm)

Lai ievietotu datuma argumentu, varam izmantot dažādas metodes:

  • #1/1/2011#
  • DateSerial( gads , mēnesis, diena)
  • DateValue( datums )
  • Diapazons ("šūna") - šūnā saglabāts datums
  • Datuma saglabāšana mainīgajā

Šūnās D3, D4, D5, D6, D7 mēs iepriekš minētās metodes ievietosim kā datums arguments DateAdd funkciju secīgi un ieguva tas pats rezultāts.

Mēs pievienojām 2 vairāk gadi uz 1/1/2022 kā rezultātā 1/1/2024.

Šeit,

yyyy atspoguļo gadu kā intervāls

2 intervālu skaits ir šāds numurs .

Palīdzība: Kā palaist kodu Visual Basic redaktorā

Izpildiet norādījumus:

  • No Excel lente , dodieties uz Izstrādātāja cilne un izvēlieties Visual Basic Tab.

  • Jaunajā logā noklikšķiniet uz Ievietot cilni un izvēlieties Modulis.

  • Uzrakstiet savu kods redaktorā un nospiediet F5 uz palaist.

Dažādu intervālu iestatījumu pievienošana, izmantojot DateAdd funkciju programmā Excel

1. Pievienot gadu

Kods:

 Sub DateAdd_Years() Range("F5") = DateAdd("yyyy", 2, Range("D5")) End Sub 

Rezultāts: 2 gadi pievienots 1/1/2022 (mm/dd/dn/ggggggg), un tā rezultāts ir 1/1/2024 (mm/g/dd/gggggg).

Lasīt vairāk: Kā lietot gada funkciju programmā Excel VBA

2. Pievienot ceturksni

Kods:

 Sub DateAdd_Quarters() Range ("F5") = DateAdd("q", 2, Range("D5")) End Sub 

Rezultāts: 2 ceturkšņi = 6 mēneši pievienots 1/1/2022 (mm/dd/dn/ggggggg), un tā rezultāts ir 7/1/2022 (mm/g/dd/gggggg).

3. Pievienot mēnesi

Kods:

 Sub DateAdd_Months() Range("F5") = DateAdd("m", 2, Range("D5")) End Sub 

Rezultāts: 2 mēneši pievienots 1/1/2022 (mm/dd/dn/ggggggg), un tā rezultāts ir 3/1/2022 (mm/g/dd/gggggg).

Lasīt vairāk: Kā lietot Excel VBA funkciju MONTH

4. Pievienot gada dienu

Kods:

 Sub DateAdd_DayOfYear() Range("F5") = DateAdd("y", 2, Range("D5")) End Sub 

Rezultāts : pievienota 2 gada diena uz 1/1/2022 (mm/dd/dn/ggggggg), un tā rezultāts ir 1/3/2022 (mm/g/dd/gggggg).

Lasīt vairāk: Kā lietot funkciju Diena programmā Excel VBA

5. Pievienot dienu

Kods:

 Sub DateAdd_Day() Range("F5") = DateAdd("d", 2, Range("D5")) End Sub 

Rezultāts : pievienotas 2 dienas uz 1/1/2022 (mm/dd/dn/ggggggg), un tā rezultāts ir 1/3/2022 (mm/g/dd/gggggg).

Līdzīgi lasījumi

  • Excel VBA, lai atrastu nedēļas numuru (6 ātri piemēri)
  • Kā lietot VBA DatePart funkciju programmā Excel (7 piemēri)
  • VBA DateSerial funkcijas izmantošana programmā Excel (5 vienkāršas lietojumprogrammas)
  • Kā konvertēt datumu no virknes, izmantojot VBA (7 veidi)

6. Pievienot nedēļas dienu

Kods:

 Sub DateAdd_WeekDay() Range("F5") = DateAdd("w", 10, Range("D5")) End Sub 

Rezultāts: pievienotas 10 nedēļas dienas uz 1/1/2022 (mm/dd/dn/ggggggg), un tā rezultāts ir 1/11/2022 (mm/g/dd/gggggg).

7. Pievienot nedēļu

Kods:

 Sub DateAdd_Weeks() Range("F5") = DateAdd("ww", 2, Range("D5")) End Sub 

Rezultāts: pievienotas 2 nedēļas = 14 dienas. uz 1/1/2022 (mm/dd/dn/ggggggg), un tā rezultāts ir 1/15/2022 (mm/g/dd/gggggg).

Lasīt vairāk: Kā iegūt nedēļas dienu, izmantojot VBA

8. Pievienot stundu

Kods:

 Sub DateAdd_Hours() Range("F5") = DateAdd("h", 14, Range("D5")) End Sub 

Rezultāts: pievienotas 14 stundas uz 1/1/2022 12:00 (mm/dd/dg/ggggggg: hh/mm), un tā rezultāts ir 1/1/2022 14:00 (mm//dd/dg/gggg : hh/mm).

9. Pievienot minūti

Kods:

 Sub DateAdd_Minutes() Range("F5") = DateAdd("n", 90, Range("D5")) End Sub 

Rezultāts: 90 minūtes = 1,30 pievienotās stundas. uz 1/1/2022 12:00 (mm/dd/dn/ggggggg), un tā rezultāts ir 1/1/2022 1:30 (mm/g/dd/gggggg).

10. Pievienot otro

Kods:

 Sub DateAdd_Seconds() Range("F5") = DateAdd("s", 120, Range("D5")) End Sub 

Rezultāts: pievienotas 120 sekundes = 2 minūtes. uz 1/1/2022 12:00 (mm/dd/dg/gggggg : hh/mm), un tā rezultāts ir 1/1/2022 12:02 (mm//dd/dg/gggg : hh/mm).

DateAdd funkcijas izmantošana programmā Excel, lai atņemtu dažādus intervālu iestatījumus

Līdzīgi mēs varam atņemt gadu, mēnešu, dienu, stundu, stundu, minūšu utt. no datuma, izmantojot mīnusa zīme vietnē priekšējais no skaitļa arguments Piemēram:

Kods:

 Sub DateAdd_Subtract_Years() Range("F5") = DateAdd("y", -2, Range("D5")) End Sub 

Rezultāts: 2 gadi atņemts no 1/1/2022 (mm/dd/dn/ggggggg), un tā rezultāts ir 1/1/2020 (mm/g/dd/gggggg).

Lietas, kas jāatceras

  • Kad mēs izmantojam 'w' pievienot darba dienās tas summējas visas nedēļas dienas ieskaitot sestdienu un svētdienu, ne tikai darba dienas(kāds varētu sagaidīt).
  • DateAdd funkcija nebeidzas ar to, ka tiek parādīts nederīgs datums Piemēram, ja 2022. gada 31. janvārim pievienosim 1 mēnesi, rezultāts būs 2022. gada 28. februāris, nevis 2022. gada 31. februāris (tā nav).
  • Ja mēs atņemam vairāk nekā 122 gadus no tagad an kļūda notiktu, jo Excel datums sākas no 1990. gada 1. janvāris.
  • DateAdd funkcijas atgriešanas datums ir atkarīgs no Vadības paneļa datuma iestatījumi.
  • DateAdd funkcijas datuma argumentam jābūt saskaņā ar Kalendāra īpašums . Ja kalendārs ir Gregoriāņu , ievades da te arguments jābūt arī Gregoriāņu . Līdzīgi, ja kalendārs ir Hijri, datuma argumentam jābūt tādā pašā formātā.

Secinājums

Tagad mēs zinām, kā lietot VBA DateAdd funkciju programmā Excel. Cerams, ka tas mudinās jūs pārliecinošāk izmantot šo funkciju. Jebkādi jautājumi vai ieteikumi neaizmirstiet tos ievietot komentāru lodziņā zemāk.

Hjū Vests ir ļoti pieredzējis Excel treneris un analītiķis ar vairāk nekā 10 gadu pieredzi šajā nozarē. Viņam ir bakalaura grāds grāmatvedībā un finansēs un maģistra grāds uzņēmējdarbības vadībā. Hjū aizraujas ar mācīšanu, un viņš ir izstrādājis unikālu mācīšanas pieeju, kas ir viegli izpildāma un saprotama. Viņa ekspertu zināšanas programmā Excel ir palīdzējušas tūkstošiem studentu un profesionāļu visā pasaulē uzlabot savas prasmes un izcelties karjerā. Izmantojot savu emuāru, Hjū dalās savās zināšanās ar pasauli, piedāvājot bezmaksas Excel apmācības un tiešsaistes apmācību, lai palīdzētu personām un uzņēmumiem pilnībā izmantot savu potenciālu.