Excel VBA, lai konvertētu datumu un laiku tikai uz datumu

Hugh West

16-10-2023 Makroprogrammas & amp; Excel VBA
  • Dalīties Ar Šo
Hugh West

Bieži vien ir nepieciešams pārvērst datumu un laiku diapazonu tikai datumos. Mēs varam izmantot Excel VBA, lai pārvērstu datumu un laiku tikai datumos. Šajā rakstā ir parādīts, kā to izdarīt visvienkāršākajā veidā. Nākamais attēls sniedz priekšstatu par šī raksta mērķi.

Lejupielādēt Practice Workbook

Jūs varat lejupielādēt prakses darba burtnīcu, izmantojot zemāk redzamo lejupielādes pogu.

Tikai no DateTime uz Date.xlsm

Excel VBA, lai konvertētu datumu un laiku tikai uz datumu

Iedomājieties, ka jums ir šāds datu kopums ar datumiem un laikiem. B sleja .

Tagad atlasiet visu datumu un laiku diapazonu. Pēc tam mainiet numuru formāts uz Vispārīgi . Pēc tam redzēsiet datumus un laikus, kas pārvērsti decimālskaitļos, kā norādīts turpmāk.

Šeit skaitļu veselie skaitļi apzīmē datumus, bet decimāldaļas apzīmē laikus.

Pieņemsim, ka vēlaties izmantot Excel VBA, lai datumus un laikus pārvērstu tikai datumos. Tad izpildiet tālāk norādītās darbības.

📌 Soļi

  • Sākumā varat nospiest CTRL+Z lai atgrieztos pie datuma un laika formāta.
  • Pēc tam nospiediet ALT+F11 operētājsistēmā Windows un Opt+F11 Mac operētājsistēmā, lai atvērtu Microsoft Visual Basic lietojumprogrammām . To var izdarīt arī, izmantojot Izstrādātājs cilne.
  • Tagad ievietojiet jaunu moduli, izvēloties Ievietot>>> Modulis .

  • Pēc tam nokopējiet šādu kodu. 
 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
  • Pēc tam ielīmējiet nokopēto uz tukšā moduļa šādi.

  • Pēc tam palaidiet kodu, noklikšķinot uz Palaist pogu vai no Palaist

  • Pēc tam datumi un laiki tiks pārvērsti tikai datumos, kā parādīts tālāk.

Tagad atlasiet visu datumu un laiku diapazonu un konvertētos datumus. Pēc tam mainiet skaitļa formātu uz Vispārīgi . Redzēsiet, ka pārveidotajos datumos ir tikai veseli skaitļi. Tādējādi tiek pārbaudīts, vai datumi un laiki ir pareizi pārveidoti tikai uz datumiem.

Saistīts saturs: Kā konvertēt teksta datumu un laiku datuma formātā programmā Excel (7 vienkārši veidi)

Lietas, kas jāatceras

  • Jums ir jāmaina diapazona argumenti kodā atbilstoši jūsu datu kopai.
  • Varat mainīt mm-dd-dn-gg koda formāts, lai jūsu vēlamo datuma formāts .

Secinājums

Tagad jūs zināt, kā izmantot Excel VBA, lai konvertēt datumu un laiku uz datumu Ja jums ir vēl kādi jautājumi vai ieteikumi, lūdzu, izmantojiet zemāk esošo komentāru sadaļu. Varat arī apmeklēt mūsu Exceldemy emuāru, lai uzzinātu vairāk par Excel un uzlabotu savu sniegumu.

Iepriekšējais ieraksts Automātiski ievadiet datumu, kad dati ievadīti programmā Excel
Nākamais ieraksts Kā aprēķināt apvienoto novirzi programmā Excel (ar vienkāršiem soļiem)

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.