Excel VBA na konverziu dátumu a času iba na dátum

Hugh West

16-10-2023 Makrá & Excel VBA
  • Zdieľajte To
Hugh West

Často sa stáva, že je potrebné previesť rozsah dátumov a časov len na dátumy. Na prevod dátumu a času len na dátum môžeme použiť program Excel VBA. Tento článok ukazuje, ako to urobiť najjednoduchším spôsobom. Nasledujúci obrázok dáva predstavu o účele tohto článku.

Stiahnite si cvičebnicu

Cvičebnicu si môžete stiahnuť z nižšie uvedeného tlačidla na stiahnutie.

DateTime len na Date.xlsm

Excel VBA na konverziu dátumu a času iba na dátum

Predstavte si, že máte nasledujúci súbor údajov s dátumami a časmi v stĺpec B .

Teraz vyberte celý rozsah dátumov a časov. Potom zmeňte formát čísla na Všeobecné Potom sa zobrazia dátumy a časy prevedené na desatinné čísla, ako je uvedené nižšie.

Celočíselné časti čísel tu predstavujú dátumy a desatinné zlomky predstavujú časy.

Predpokladajme, že chcete použiť program Excel VBA na prevod dátumov a časov len na dátumy. Potom postupujte podľa nasledujúcich krokov.

📌 Kroky

  • Najprv môžete stlačiť CTRL+Z pre návrat k formátu dátumu a času.
  • Potom stlačte tlačidlo ALT+F11 v systémoch Windows a Opt+F11 na Macu otvoriť Microsoft Visual Basic pre aplikácie . Môžete to urobiť aj z Vývojár tab.
  • Teraz vložte nový modul výberom Vložiť>> Modul .

  • Potom skopírujte nasledujúci kód. 
 Sub DateTimeToDateOnly() Dim Dataset, j As Long Range("B5:B17").Copy Range("C5:C17") Dataset = Range("C5:C17") For j = 5 To 17 With Range("C" & j) .NumberFormat = "mm-dd-yy" .Value = DateValue(.Value) End With Next j End Sub
  • Potom vložte skopírované údaje do prázdneho modulu takto.

  • Potom spustite kód kliknutím na Spustiť alebo z tlačidla Spustiť

  • Potom sa dátumy a časy prevedú len na dátumy, ako je uvedené nižšie.

Teraz vyberte celý rozsah dátumov a časov a prevedené dátumy. Potom zmeňte formát čísla na Všeobecné . Uvidíte, že prevedené dátumy obsahujú len celé čísla. Tým sa overí, že dátumy a časy boli správne zmenené len na dátumy.

Súvisiaci obsah: Ako previesť textový dátum a čas do formátu dátumu v programe Excel (7 jednoduchých spôsobov)

Čo si treba zapamätať

  • Argumenty rozsahu v kóde musíte zmeniť podľa vlastného súboru údajov.
  • Môžete zmeniť mm-dd-r formát v kóde na požadovaný formát dátumu .

Záver

Teraz viete, ako používať program Excel VBA na previesť dátum a čas na dátum Ak máte ďalšie otázky alebo návrhy, použite nižšie uvedenú časť s komentármi. Môžete tiež navštíviť našu Exceldemy blog, aby ste sa dozvedeli viac o programe Excel a zlepšili svoj výkon.

Predchádzajúci príspevok Automatické zadanie dátumu pri zadávaní údajov v programe Excel
Ďalší príspevok Ako vypočítať združenú odchýlku v programe Excel (s jednoduchými krokmi)

Hugh West je veľmi skúsený tréner a analytik Excelu s viac ako 10-ročnými skúsenosťami v tomto odvetví. Má bakalársky titul v odbore účtovníctvo a financie a magisterský titul v odbore Business Administration. Hugh má vášeň pre vyučovanie a vyvinul jedinečný vyučovací prístup, ktorý sa dá ľahko sledovať a pochopiť. Jeho odborné znalosti Excelu pomohli tisíckam študentov a profesionálov na celom svete zlepšiť svoje zručnosti a vyniknúť vo svojej kariére. Hugh sa prostredníctvom svojho blogu delí o svoje znalosti so svetom a ponúka bezplatné výukové programy Excelu a online školenia, ktoré jednotlivcom a firmám pomôžu naplno využiť ich potenciál.