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 yaitu 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 dikala 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 hidangan Data di Ms. Excel dan hal ini juga pernah aku bahas sebelumnya silakan cek artikel di bawah ini kalau Anda ingin memakai pembatasan abjad maksimal dengan validasi bukan coding VBA
Cara Membatasi Jumlah Karakter yang di entri memakai Validation
Kenapa harus dibatasi? Sebuah pertanyaan yang mungkin ada pada Anda dan jawabannya simpel, kenapa dibatasi alasannya yaitu 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 dikala 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 hidangan Data di Ms. Excel dan hal ini juga pernah aku bahas sebelumnya silakan cek artikel di bawah ini kalau 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 yaitu dilarang dari 5 abjad kalau 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 biar bermanfaat dan jangan lupa komentar di kolom komentar kalau Anda mengalami kesulitan
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 yaitu dilarang dari 5 abjad kalau 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 biar bermanfaat dan jangan lupa komentar di kolom komentar kalau Anda mengalami kesulitan
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 biar bermanfaat dan jangan lupa komentar di kolom komentar kalau Anda mengalami kesulitan
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 biar bermanfaat dan jangan lupa komentar di kolom komentar kalau Anda mengalami kesulitan
Related Posts
- Cara Menampilkan Nama File Otomatis Pada Folder Drive J Dengan Macro VbaMasih membahas seputar Excel dan kali ini aku akan bahas bagaimana caranya mengambil nama file tanpa mengetik ulang nama file di sebuah folder terten ...
- Cara Menampilkan Pesan Jikalau Data Yang Dientrikan Ganda (Double)Mengolah daya Ms. Excel tak terlepas dari entry data secara vertikal hal ini dinamakan dengan data satu field. Biasanya Anda entri data yang banyak m ...
- Cara Memilih Atau Mencari Baris Terakhir Yang Ada Datanya Pada Kolom Dengan VbaMencari baris terakhir pada sebuah kolom tentunya akan dilakukan kalau Anda akan menciptakan sebuah aplikasi entry data memakai VBA pada Ms. Excel da ...
- Cara Menciptakan Upercase (Huruf Besar Semua) Otomatis Dengan VbaHi Excel-ID, bagaimana mencar ilmu VBA nya semoga lancar dan tidak ada kendala, namun jikalau kalian ada persoalan silakan tuliskan komentar sesuai d ...
- Cara Membuat/Split File Sesuai Nama Sheet Berbasis Vba (Macro)Bagaimana cara split file sesuai jumlah dan nama worksheet? Nah, pada kesempatan kali ini Excel-ID akan membahas sebuah tutorial Ms. Excel Advanced b ...
- Coding Translate Dengan Vba Macro ExcelHai sobat Excel-ID ada beberapa pertanyaan yang masuk kedalam komentar dan melalui email bahwa menanyakan bagaimana seh cara menciptakan google trans ...
