"Excel" VBA konvertuoti datą ir laiką tik į datą

Hugh West

16-10-2023 Makrokomandos ir "Excel VBA
  • Pasidalinti
Hugh West

Dažnai prireikia konvertuoti datų ir laikų intervalą tik į datas. Norėdami konvertuoti datą ir laiką tik į datą, galime naudoti "Excel" VBA. Šiame straipsnyje parodyta, kaip tai padaryti paprasčiausiu būdu. Iš toliau pateikto paveikslėlio galima suprasti šio straipsnio tikslą.

Atsisiųsti praktikos sąsiuvinį

Praktikos sąsiuvinį galite atsisiųsti iš toliau esančio atsisiuntimo mygtuko.

Tik iš DateTime į Date.xlsm

"Excel" VBA konvertuoti datą ir laiką tik į datą

Įsivaizduokite, kad turite tokį datų ir laikų duomenų rinkinį B stulpelis .

Dabar pasirinkite visą datų ir laikų intervalą. Tada pakeiskite numerio formatas į Bendra . Po to matysite datas ir laikus, konvertuotus į dešimtainius skaičius, kaip nurodyta toliau.

Čia sveikosios skaičių dalys reiškia datas, o dešimtainės trupmenos - laiką.

Tarkime, kad norite naudoti "Excel VBA", norėdami konvertuoti datas ir laikus tik į datas. Tada atlikite toliau nurodytus veiksmus.

📌 Žingsniai

  • Iš pradžių galite paspausti CTRL+Z grįžti prie datos ir laiko formato.
  • Tada paspauskite ALT+F11 "Windows" ir Opt+F11 "Mac", kad atidarytumėte "Microsoft Visual Basic for Applications . Tai taip pat galite padaryti naudodami Kūrėjas skirtukas.
  • Dabar įterpkite naują modulį pasirinkdami Įterpti>> Modulis .

  • Po to nukopijuokite šį kodą. 
 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" & amp; j) .NumberFormat = "mm-dd-yy" .Value = DateValue(.Value) End With Next j End Sub
  • Tada nukopijuotą įrašą įklijuokite į tuščią modulį taip.

  • Tada paleiskite kodą spustelėdami Paleisti mygtuką arba iš Paleisti

  • Po to datos ir laikai bus konvertuojami tik į datas, kaip parodyta toliau.

Dabar pasirinkite visą datų ir laikų intervalą bei konvertuotas datas. Tada pakeiskite skaičių formatą į Bendra . Pamatysite, kad konvertuotose datose yra tik sveikieji skaičiai. Taip patikrinama, ar datos ir laikai buvo tinkamai pakeisti tik į datas.

Susijęs turinys: Kaip konvertuoti teksto datą ir laiką į "Excel" datos formatą (7 paprasti būdai)

Dalykai, kuriuos reikia prisiminti

  • Kodo argumentus reikia pakeisti pagal savo duomenų rinkinį.
  • Galite keisti mm-dd-ry kodo formatą į norimą datos formatas .

Išvada

Dabar žinote, kaip naudoti "Excel VBA konvertuoti datą ir laiką į datą Jei turite daugiau klausimų ar pasiūlymų, naudokitės toliau esančiu komentarų skyriumi. Taip pat galite apsilankyti mūsų Exceldemy tinklaraštį, kad sužinotumėte daugiau apie "Excel" ir pagerintumėte savo rezultatus.

Ankstesnis įrašas Automatiškai įvesti datą, kai duomenys įvedami į "Excel
Kitas įrašas Kaip apskaičiuoti jungtinį nuokrypį programoje "Excel" (paprastais žingsniais)

Hugh Westas yra labai patyręs Excel treneris ir analitikas, turintis daugiau nei 10 metų patirtį šioje srityje. Jis yra įgijęs apskaitos ir finansų bakalauro bei verslo administravimo magistro laipsnius. Hugh turi aistrą mokymui ir sukūrė unikalų mokymo metodą, kurį lengva sekti ir suprasti. Jo ekspertinės žinios apie „Excel“ padėjo tūkstančiams studentų ir specialistų visame pasaulyje tobulinti savo įgūdžius ir tobulėti savo karjeroje. Savo tinklaraštyje Hugh dalijasi savo žiniomis su pasauliu, siūlydamas nemokamus „Excel“ vadovėlius ir internetinius mokymus, kad padėtų asmenims ir įmonėms išnaudoti visą savo potencialą.