Pak Harry,
coba manfaatkan event change pada text box
Private Sub TextBox1_Change()
TextBox1.Value = Format(TextBox1.Value, "#,###")
End Sub
Best Regard,
-Ms. Jan Raisin-
Pada 27 Desember 2012 19:21, Harry <[email protected]> menulis:
> **
>
>
> 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
>
>
>