Tartalomjegyzék
Gyakran válik szükségessé, hogy egy dátum- és időintervallumot csak dátumokká alakítsunk át. Az Excel VBA segítségével a dátumot és az időt csak dátumokká alakíthatjuk. Ez a cikk bemutatja, hogyan lehet ezt a legegyszerűbben megtenni. A következő ábra érzékelteti a cikk célját.
Gyakorlati munkafüzet letöltése
A gyakorlati munkafüzetet az alábbi letöltés gombra kattintva töltheti le.
DateTime to Date Only.xlsmExcel VBA a dátum és az idő csak dátumra történő átalakításához
Képzeljük el, hogy a következő dátumokat és időpontokat tartalmazó adatkészlettel rendelkezünk a B oszlop .
Most jelölje ki a teljes dátum- és időintervallumot. Ezután módosítsa a számformátum a címre. Általános Ezután a dátumokat és időpontokat a következőképpen alakítja át tizedes számokká.
Itt a számok egész számú részei dátumokat, a tizedes törtek pedig időpontokat jelölnek.
Most tegyük fel, hogy az Excel VBA segítségével a dátumokat és időpontokat csak dátumokká szeretné átalakítani. Akkor kövesse az alábbi lépéseket.
📌 Lépések
- Először megnyomhatja a CTRL+Z a dátum- és időformátumhoz való visszatéréshez.
- Ezután nyomja meg a ALT+F11 Windowson és Opt+F11 Macen a Microsoft Visual Basic for Applications Ezt megteheti a Fejlesztő tab.
- Most illesszünk be egy új modult a Beszúrás>> modul .
- Ezután másolja be a következő kódot.
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
- Ezután illessze be a másoltat az üres modulba az alábbiak szerint.
- Ezután futtassa a kódot a Fuss gombbal vagy a Fuss
- Ezután a dátumok és időpontok csak dátumokká lesznek átalakítva az alábbiakban látható módon.
Most jelölje ki a dátumok és időpontok teljes tartományát, valamint a konvertált dátumokat. Ezután módosítsa a számformátumot a következőkre Általános Látni fogja, hogy a konvertált dátumok csak egész számokat tartalmaznak. Ez azt igazolja, hogy a dátumok és időpontok megfelelően lettek csak dátumokra módosítva.
Kapcsolódó tartalom: Hogyan alakítsuk át a szöveges dátumot és időt dátumformátumba az Excelben (7 egyszerű módja)?
Emlékezetes dolgok
- A kódban a tartományi argumentumokat a saját adatkészletének megfelelően kell megváltoztatnia.
- Megváltoztathatja a mm-dd-yy formátumot a kódban a kívánt dátum formátum .
Következtetés
Most már tudja, hogyan használhatja az Excel VBA-t a következőkhöz dátum és idő átváltása dátumra Ha további kérdése vagy javaslata van, kérjük, használja az alábbi megjegyzés rovatot. Látogasson el a következő oldalunkra is Exceldemy blog, hogy többet tudjon meg az excelről és javítsa teljesítményét.