Coba: If len(TextBox1.value) = then ' jalankan perintah penyimpanan else 'Tuliskan pesannya kalau panjang textBox1 tidak sesuai End If
2016-04-23 11:38 GMT+07:00 Prazt Math praztm...@gmail.com [belajar-excel] < belajar-excel@yahoogroups.com>: > > > rekan rekan mohon bantuannya > saya membuat UserForm yang mana pada UserForm tersebut saya kasih TextBox, > katakanlah TextBox1 yang datanya nanti akan masuk pada Sheet1 Range (“A:A”) > yang berupa 4 digit angka (ankgka 0 boleh di depan) . > pertanyaan: > bagaimana cekripnya supaya user hanya bisa menginput 4 digit angka saja (tidak > boleh kurang dan tidak boleh lebih), jika user lupa mengetik kurang dari > 4 atau lebih dari 4 maka data tersebut tidak bisa tersimpan ke Sheet1 Range > (“A:A”) dan muncul pop up/MsgBox peringatan untuk membetulkan > pengetikannnya..? > > > > Dikirim dari Email <https://go.microsoft.com/fwlink/?LinkId=550986> untuk > Windows 10 > > > > >