Kuidas vormindada kuupäeva VBA-ga Excelis (4 meetodit)

Hugh West

16-10-2023 Makros &; Excel VBA
  • Jaga Seda
Hugh West

Rakendamine VBA makro on kõige tõhusam, kiirem ja turvalisem meetod mis tahes toimingu teostamiseks Excelis. Selles artiklis näitame teile, kuidas vormindada kuupäeva Excelis, kasutades VBA .

Lae alla töövihik

Tasuta Exceli harjutusvihiku saate alla laadida siit.

Kuupäeva vormindamine VBAga.xlsm

4 meetodit kuupäeva vormindamiseks Excelis VBAga

Vaadake järgmist näidet. Me salvestasime samad kuupäevad mõlemasse Veerg B ja C nii et kui me vormindame kuupäeva Veerg C , siis te saate teada, et B veerg millises formaadis oli kuupäev enne.

1. VBA kuupäeva vormindamiseks ühest tüübist teise Excelis

Kõigepealt teame, kuidas vormindada kuupäeva alates Raku C5 meie antud andmestikus koos VBA et " Teisipäeva-Jaanuar-2022 ".

Sammud:

  • Press Alt + F11 klaviatuuril või mine vahekaardile Arendaja -> Visual Basic avada Visual Basic toimetaja .

  • Pikakoodi aknas klõpsake menüüribal nuppu Insert -> Moodul .

  • Kopeeri järgmine kood ja kleebi see koodiaknasse. 
 Sub DateFormat() Range("C5").NumberFormat = "dddd-mmmmmm-yyyy" 'See vormindab kuupäeva "Teisipäev-Jaanuar-2022" End Sub

Teie kood on nüüd valmis käivitamiseks.

  • Press F5 klaviatuuril või valige menüüribal Run -> Run Sub/UserFormi käivitamine Võite ka lihtsalt klõpsata väike Play ikoon allmenüüribal makro käivitamiseks.

See kood vormindab kuupäeva " 11-01-22 " kuni " Teisipäeva-Jaanuar-2022 ".

Seda kuupäeva formaati saab teisendada ka paljudesse teistesse formaatidesse. Lihtsalt järgige allolevat koodi, et muuta kuupäev soovitud formaati. 

 Sub FormatDate() 'Algne kuupäev on "11-01-22" Range("C5").NumberFormat = "dd-mm-yyy" 'See vormindab kuupäeva "11-01-2022" Range("C6").NumberFormat = "ddd-mm-yyy" 'See vormindab kuupäeva "Tue-11-2022" Range("C7").NumberFormat = "dddd-mm-yyy" 'See vormindab kuupäeva "Tuesday-11-2022" Range("C8").NumberFormat = "dd-mmm-yyy" 'See vormindab kuupäeva "Tuesday-11-2022" 'See vormindab kuupäeva"11-Jan-2022" Range("C9").NumberFormat = "dd-mmmm-yyy" 'See vormindab kuupäeva "11-Jan-2022" Range("C10").NumberFormat = "dd-mm-yyy" 'See vormindab kuupäeva "11-01-22" Range("C11").NumberFormat = "ddd mmm yyyy" 'See vormindab kuupäeva "Tue Jan 2022" Range("C12").NumberFormat = "dddd mmmm yyyy" 'See vormindab kuupäeva "Tuesday January 2022" End Sub

Ülevaade

Loe edasi: Nüüd ja vormingu funktsioonid Excel VBAs

2. Embed VBA konverteerimiseks kuupäeva FORMAT funktsiooniga

Excelil on oma seerianumber seoses üksikute kuupäevadega. Kui soovite teada mis tahes seerianumbrit

konkreetsel kuupäeval, peate taotlema funktsioon DATEVALUE .

Oletame, et soovite teada kuupäeva seerianumbrit " 11. jaanuar 2022 ", siis tuleb valem kirjutada järgmiselt,

=DATEVALUE("11. jaanuar 2022")

Excel annab teile seerianumbri 44572 sellest kuupäevast.

Nüüd muudame selle numbri vastavasse kuupäevavormingusse.

Sammud:

  • Samamoodi nagu varem, avatud Visual Basic toimetaja alates Arendaja vahekaart ja Sisesta a Moodul koodiaknas.
  • Kopeerige koodiaknas järgmine kood ja kleepige see sisse. 
 Sub Format_Date() Dim iDate As Variant iDate = 44572 'Exceli kuupäeva järjekorranumber "11. jaanuar 2022" MsgBox Format(iDate, "DD-MMMM-YYYY") End Sub

Teie kood on nüüd valmis käivitamiseks.

Saate kuupäeva " 11. jaanuar 2022 " sõnumikastis.

Lisateave: Kuidas kasutada VBA DateValue funktsiooni Excelis

Sarnased lugemised

  • Kuidas sisestada praegune kuupäev Excelis (3 võimalust)
  • Kuupäeva muutuja VBA koodides (7 makrode kasutamist koos näidetega)
  • Praeguse kuupäeva hankimine VBAs (3 võimalust)
  • Kuidas kasutada Exceli kuupäeva otseteed

3. VBA kuupäeva muutmiseks Exceli konkreetse osa põhjal

Oletame, et soovite vormindada kuupäeva konkreetset osa, näiteks ainult päeva/kuu/aasta, siis kirjutage kood järgmiselt, 

 Sub Date_Format() Range("C5").NumberFormat = "mmmm" 'See vormindab kuupäeva "jaanuariks" End Sub

Teie kood on nüüd valmis käivitamiseks.

" mmmm " selles koodis tähendab kuu nime pikka vormi.

Kuna kuupäev on " 11. jaanuar 2022 ", nii et see kooditükk tagastab " Jaanuar ".

Seda koodi saate rakendada, et vormindada ja eraldada kuupäevast mis tahes konkreetne osa, mida soovite. 

 Sub FormatDateValue() 'Algne kuupäev on "11-01-22" Range("C5").NumberFormat = "dd" 'See vormindab kuupäeva "11" Range("C6").NumberFormat = "ddd" 'See vormindab kuupäeva "Tue" Range("C7").NumberFormat = "dddd" 'See vormindab kuupäeva "Tuesday" Range("C8").NumberFormat = "m" 'See vormindab kuupäeva "1" Range("C9").NumberFormat = "mm" 'See vormindab kuupäeva "1" Range("C9").NumberFormat = "mm" 'See vormistab kuupäeva "1".vormindab kuupäeva "01" Range("C10").NumberFormat = "mmm" 'See vormindab kuupäeva "Jan" Range("C11").NumberFormat = "yy" 'See vormindab kuupäeva "22" Range("C12").NumberFormat = "yyyy" 'See vormindab kuupäeva "2022" Range("C13").NumberFormat = "dd-mm" 'See vormindab kuupäeva "11-01" Range("C14").NumberFormat = "mm-yyy" 'See vormindab kuupäeva "2022" Range("C13").NumberFormat = "dd-mm" 'See vormindab kuupäeva "11-01" Range("C14").NumberFormat = "mm-yyy" 'See vormindab kuupäeva "2022" Range("C12").NumberFormat = "mmm" 'See vormindab kuupäeva "2022".kuupäevale "01-2022" Range("C15").NumberFormat = "mmm-yyy" 'See vormindab kuupäeva "Jan-2022" Range("C16").NumberFormat = "dd-yyy" 'See vormindab kuupäeva "11-22" Range("C17").NumberFormat = "ddd yyyy" 'See vormindab kuupäeva "Tue 2022" Range("C18").NumberFormat = "dddd-yyyy" 'See vormindab kuupäeva "Tuesday-2022" Range("C19").NumberFormat = "dd-mmm"'See vormindab kuupäeva "11-Jan" Range("C20").NumberFormat = "dddd-mmmm" 'See vormindab kuupäeva "Teisipäev-Jaanuar" End Sub

Ülevaade

4. VBA sisestamine kuupäeva vormindamiseks Exceli konkreetsel töölehel

Kui soovite kuupäeva vormindada konkreetse töölehe alusel, siis tuleb kõigepealt määrata koodis töölehe nimi ja seejärel vormindada kuupäev vastavalt soovitud tüübile.

  • Avatud Visual Basic toimetaja alates Arendaja vahekaart ja Sisesta a Moodul koodiaknas.
  • Kopeerige koodiaknas järgmine kood ja kleebige see sisse. 
 Sub Format_Date() Dim iSheet As Worksheet Set iSheet = ThisWorkbook.Sheets("Example") 'Määra tööleht nimega "Example" iSheet.Range("C5").NumberFormat = "dddd, mmmmdd, yyyy" End Sub

Teie kood on nüüd valmis käivitamiseks.

Vaadake koodi 3. rida, kus kõigepealt seame " Näide " tööleht, siis vormindage selle konkreetse Exceli lehe kuupäev.

Kokkuvõte

See artikkel näitas teile, kuidas vormindada kuupäeva Excelis koos VBA . ma loodan, et see artikkel oli teile väga kasulik. Küsige julgelt, kui teil on küsimusi selle teema kohta.

Eelmine postitus Kuidas ümardada arvud Exceli lähima 5-kordse arvuni
Järgmine postitus Kuidas arvutada mahtu Excelis (7 erinevat võimalust)

Hugh West on suurte kogemustega Exceli koolitaja ja analüütik, kellel on selles valdkonnas üle 10-aastane kogemus. Tal on raamatupidamise ja rahanduse bakalaureusekraad ning ärijuhtimise magistrikraad. Hugh’l on kirg õpetamise vastu ning ta on välja töötanud ainulaadse õpetamisviisi, mida on lihtne järgida ja mõista. Tema Exceli ekspertteadmised on aidanud tuhandetel õpilastel ja spetsialistidel üle maailma oma oskusi parandada ja karjääris silma paista. Oma ajaveebi kaudu jagab Hugh oma teadmisi maailmaga, pakkudes tasuta Exceli õpetusi ja veebikoolitusi, mis aitavad üksikisikutel ja ettevõtetel oma potentsiaali täielikult ära kasutada.