Cara mengonversi string menjadi tanggal di vba (dengan contoh)

Anda dapat menggunakan fungsi CDate di VBA untuk mengonversi string teks menjadi tanggal.

Berikut dua cara umum untuk menggunakan fitur ini dalam praktiknya:

Metode 1: Konversi String ke Tanggal Menggunakan Format Default (MM/DD/YYYY)

 Sub ConvertStringToDate()

    Dim i As Integer

    For i = 2 To 8
        Range(" B " & i) = CDate(Range(" A " & i))
    Next i
    
End Sub

Makro khusus ini akan mengonversi setiap string dalam rentang A2:A8 menjadi tanggal dengan format tanggal default MM/DD/YYYY.

Misalnya, string teks 15/04/2023 akan dikonversi ke tanggal 15/04/2023.

Metode 2: Konversi String ke Tanggal Menggunakan Format Kustom

 Sub ConvertStringToDate()

    Dim i As Integer

    For i = 2 To 8
        Range(" B " & i) = Format(CDate(Range(" A " & i)), " MM.DD.YYYY ")
    Next i
    
End Sub

Makro khusus ini akan mengonversi setiap string dalam rentang A2:A8 menjadi tanggal dalam format MM.DD.YYYY.

Misalnya, string teks 15/04/2023 akan dikonversi ke tanggal 15/04/2023.

Contoh berikut memperlihatkan cara menggunakan setiap metode dalam praktik dengan kolom string berikut di Excel:

Contoh 1: Konversi String ke Tanggal Menggunakan Format Default

Kita bisa menggunakan makro berikut untuk mengonversi setiap string di kolom A menjadi tanggal dalam format MM/DD/YYY default:

 Sub ConvertStringToDate()

    Dim i As Integer

    For i = 2 To 8
        Range(" B " & i) = CDate(Range(" A " & i))
    Next i
    
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Perhatikan bahwa kolom B mengonversi setiap string di kolom A menjadi tanggal dengan format tanggal default MM/DD/YYYY.

Contoh 2: Konversi String ke Tanggal Menggunakan Format Kustom

Kita dapat menggunakan makro berikut untuk mengonversi setiap string di kolom A menjadi tanggal dengan format khusus MM.DD.YYY:

 Sub ConvertStringToDate()

    Dim i As Integer

    For i = 2 To 8
        Range(" B " & i) = Format(CDate(Range(" A " & i)), " MM.DD.YYYY ")
    Next i
    
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Perhatikan bahwa kolom B mengonversi setiap string di kolom A menjadi tanggal dengan format MM.DD.YYYY khusus.

Jangan ragu untuk menggunakan fungsi Format VBA untuk menampilkan tanggal dalam format pilihan Anda.

Catatan : Anda dapat menemukan dokumentasi lengkap untuk fungsi VBA CDate di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

Bagaimana mengkonversi string ke int di VBA
Cara mengubah string menjadi panjang di VBA
Bagaimana mengkonversi string menjadi double di VBA