Hai, sobat EXCEL-ID pada kesempatan kali ini aku akan menulis bagaimana caranya membatasi jumlah abjad maksimum yang bisa dimasukan atau diketikkan oleh user pada cell yang kita tentukan dengan memakai VBA.
Kenapa harus dibatasi? Sebuah pertanyaan yang mungkin ada pada Anda dan jawabannya simpel, kenapa dibatasi alasannya ialah dengan tujuan untuk meminimalisir kesalahan entri data oleh user ketika user mengetikkan jumlah abjad lebih (maksimal) dari yang kita tentukan maka excel akan menolak secara otomatis dan ini akan bisa mengurangi tingkat kesalahan pada ketika entri data.
Sebenarnya aku pernah membahas bagaimana cara membatasi jumlah abjad maksimum namun pada textbox dan combobox.
Baca:
Membatasi Jumlah Karakter maksimum pada Textbox Userform
Nah cara lain Anda bisa memakai validation data pada sajian Data di Ms. Excel dan hal ini juga pernah aku bahas sebelumnya silakan cek artikel di bawah ini jikalau Anda ingin memakai pembatasan abjad maksimal dengan validasi bukan coding VBA
Cara Membatasi Jumlah Karakter yang di entri memakai Validation
Oke, disini aku mengunakan mekanisme worksheet_change pada object Worksheet dimana ketika ada perubahan atau perpindahan pada cell maka munculah sebuah peringatan atau pesan maksimal jumlah abjad yang dientrikan.
Berikut Coding VBA yang bisa Anda tuliskan pada procedure Worksheet_change
Private Sub Worksheet_Change(ByVal Target As Range)
Dim cell As Excel.Range
If Not Intersect(Target, Columns("A")) Is Nothing Then
For Each cell In Intersect(Target, Columns("A"))
If Len(cell.Value) > 5 Then
cell.Value = Left(cell.Value, 5)
cell.Select
MsgBox "Hanya Diisi Maksimal 5 Karakter"
End If
Next cell
End If
End Sub
Nah, dari coding tersebut kita akan menargetkan pada kolom A dimana jumlah abjad yang bisa dientrikan pada kolom A ialah dilarang dari 5 abjad jikalau memaksa mengetikkan (mengentrikan) lebih dari 5 abjad maka akan muncul pesan "Hanya diisi Maksimal 5 Karakter"

Nah pada gambar diatas ketika aku mengetikan goresan pena "Mengapa Demikian" maka akan secara otomatis excel akan menghapus sisa dari jumlah abjad kalimat diatas sehingga yang muncul hanya goresan pena "Menga".
Dan munculah sebuah pesan bertuliskan "Hanya Diisi Maksimal 5 Karakter"

Oke, jadi Anda sudah mengetahui bagaimana cara membatasi jumlah abjad pada sebuah cell atau kolom yang bisa kita tentukan sendiri.
Demikian artikel ini supaya bermanfaat dan jangan lupa komentar di kolom komentar jikalau Anda mengalami kesulitan
Sumber http://www.excel-id.com/