Dear Be Exceller, Melanjutkan pertanyaan saya mengenai Format Currency, sebagaimana yang telah diinformasikan oleh Ms. Jan Raisin dng Scrip sbb:
Private Sub TextBox1_Change() TextBox1.Value = Format(TextBox1.Value, "#,###") End Sub Dengan menggunakan Scrip tersebut, jika saya meng-input 20000 memang sudah menampilkan 20.000 pada userForm-nya (sudah terbentuk Format Currency-nya). Tetapi ternyata timbul permasalahan selanjutnya yaitu setelah saya Klik Tombol SAVE, hasil yang terkirim ke Sheet yang dituju hasilnya adalah Rp. 20 Yang saya inginkan adalah : Jika saya input nominal 20000 maka tampilan di UserForm adalah 20.000 dan hasil yang dikirimkan ke Sheet yang dituju juga Rp. 20.000. Mohon berkenan informasi dari teman-teman BeExceller akan hal tersebut. Terima kasih atas berkenan informasinya. Regards, Harry Pada Sabtu, 29 Desember 2012 0:37, Slamet <slametha...@gmail.com> menulis: Pak Harry coba dengan TextBox1.Value = Format(TextBox1.Value, 0) Wassalam On 12/27/2012 7:21 PM, Harry wrote: >Dear BeExceller, > > >Mohon informasi dari rekan-rekan BeExceller bagaimana caranya mengisi UserForm >yang formatnya Currency. >Pada UserForm yang saya buat selama ini hanya berformat Text misalnya 15000. >Yang saya inginkan otomatis berformat 15,000.- > > >Mohon bantuan rekan-rekan BeExceller akan hal tersebut. > > >Terima kasih & Wassalam, > > > > >Harry >