Coba di TextBox2 Properties: MaxLength disi 4


On 22/04/2016 10:17, Prazt Math [email protected] [belajar-excel] wrote:

O ya Mas Nangagus, satu lagi

Jika di TextBox2 diwajibkan input 4 digit ckripnya giman beserta peletakannya ?

Dikirim dari Email <https://go.microsoft.com/fwlink/?LinkId=550986> untuk Windows 10

*Dari: *nangagus [email protected] [belajar-excel] <mailto:[email protected]>
*Dikirim: *Jumat, 22 April 2016 09.59
*Kepada: *[email protected] <mailto:[email protected]>
*Subjek: *Re: [belajar-excel] tampil, edit dan simpan dengan UserForm

Wa'alaikumsalam warahmatullah,
Mas Praz, sambil menunggu jawaban para master mungkin dapat dicoba begini: 1. jika saya menuliskan nomor pendaftaran kurang 4 digit maka data yang sesuai maupun tidak sesuai dengan nomor tersebut tidak akan tampil textbox maupun combobox
tambahkan cekrip pada textbox2_Change:
Private Sub TextBox2_Change()
If Len(TextBox2.Value) > 3 Then
2. jika nomor pendaftaran yang saya ketik sudah 4 digit dan kebetulan nomor tersebut sudah ada maka data yang sesuai akan tampil pada textbox maupun combobox- dan tombol simpan (CommandButton1) akan terhiden
untuk menghidden tombol simpan:
CommandButton1.Visible = False
namun perlu dipikirkan pula untuk menampakkan kembali tombol simpan, jika kriteria tersebut tidak terpenuhi.
(CommandButton1.Visible = True)

untuk pertanyaan lainnya saya belum bisa mencobanya karena di komputer saya belum terpasang mscal.ocx

wasalamualaikumwarahmatullah

thole Agus


On 21/04/2016 16:55, Prazt Math [email protected] <mailto:[email protected]> [belajar-excel] wrote:

    Assalamu’alaikum para master dan rekan rekan semua

    Mohon penyelesaiannya pada kasus saya tentang menampilkan, edit
    dan simpan data menggunakan userform, terus terang saya masih
    cetek menggunakan VBA Excel, jadi saya masih kopas sana-sini dari
    grup ini. Pada permasalahan saya ini, saya ingin pada userform
    bisa mengedit data yang sudah di input pada Sheet DB. Penjelasan
    atas pertanyaan saya lebih lengkapnya ada pada file lampiran.

    Mohon bantuannya pada para master semua,dan Mohon maaf apa bila
    ada salah sebut pada kata-kata maupun istilah..

    Sent from Mail <https://go.microsoft.com/fwlink/?LinkId=550986>
    for Windows 10



Kirim email ke