Silahkan mas.. maaf lahir bathin saya ndak pandai menjelaskan
Private Sub ComboBox1_Change()
TextBox1.Value=WorksheetFunction.VLookup(ComboBox1.Value,Sheet1.Range("A10:B13"),
2)
TextBox1.value = "Rp." & FormatNumber(CSng(TextBox1.Value), 0)
End Sub
Pada tanggal 21/08/09, andri <[email protected]> menulis:
> Dear XL-Mania,
>
> Saya mau minta tolong ni...
> Saya punya userform yang berisi Nama Barang dan Harganya. Saya ingin
> format harga barang pada user form adalah Rp. ##,###. Saya sudah coba
> dengan NumberFormat ="Rp. ##,###" tapi tetap tidak bisa.
> Untuk lebih jelas mohon lihat attachment
>
> Terima kasih banyak,
>
> Andri
>
>
