Vba: cara menghapus karakter pertama dari sebuah string

Anda dapat menggunakan sintaks dasar berikut untuk menghapus karakter pertama dari string menggunakan VBA:

 Sub RemoveFirstChar()

    Dim i As Integer
    Dim myString As String

    For i = 2 To 11
    myString = Range(" A " & i)
    Range(" B " & i) = Right(myString, Len(myString) - 1)
    Next i
    
End Sub

Contoh khusus ini menghapus karakter pertama dari setiap string dalam rentang A2:A11 dan menampilkan hasilnya dalam rentang B2:B11 .

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Terkait: Cara menghapus karakter terakhir dari string menggunakan VBA

Contoh: Menggunakan VBA untuk Menghapus Karakter Pertama dari String

Misalkan kita memiliki daftar nama tim bola basket berikut di Excel:

Katakanlah kita ingin menghapus karakter pertama dari setiap nama tim.

Kita dapat membuat makro berikut untuk melakukan ini:

 Sub RemoveFirstChar()

    Dim i As Integer
    Dim myString As String

    For i = 2 To 11
    myString = Range(" A " & i)
    Range(" B " & i) = Right(myString, Len(myString) - 1)
    Next i
    
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Kolom B menampilkan setiap string di kolom A dengan karakter pertama dihapus.

Jika Anda ingin menghapus n karakter pertama dari sebuah string, cukup ganti 1 di metode Kanan dengan nomor lain.

Misalnya, kita dapat membuat makro berikut untuk menghapus 2 karakter pertama dari sebuah string:

 Sub RemoveFirstTwoChar()

    Dim i As Integer
    Dim myString As String

    For i = 2 To 11
    myString = Range(" A " & i)
    Range(" B " & i) = Left(myString, Len(myString) - 2)
    Next i
    
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Kolom B menampilkan masing-masing string di kolom A dengan dua karakter pertama dihapus.

Catatan : Anda dapat menemukan dokumentasi lengkap untuk metode VBA Right di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya menggunakan VBA:

VBA: Cara menghitung kemunculan karakter dalam sebuah string
VBA: cara memeriksa apakah suatu string berisi string lain
VBA: Cara menghitung sel dengan teks tertentu