di pc saya (mudah mudahan tidak demikian di pc pak Puthut)
mengubah code menjadi seperti yg di sarankan
TextBox1.Value = Format(WorksheetFunction. _
VLookup(ComboBox1.Value, Sheet1.Range("A10:B13"), 2), "Rp.###,")penampilan hasilnya : Rp22000 kayaknya ini bukan yg dikehendaki oleh pe-nanya. jadi yg diubah *code*nya bukan syntaxnya, *sintaks* tidak boleh diubah dia karena berupa peraturan. Lagi pula, fungsi VLOOKUP tanpa argument ke 4, (berarti argument ke 4 = TRUE, dalam kondisi khusus, bisa menyesatkan.. 2009/8/23 Puthut Wibowo <[email protected]> > > Syntak Macronya dirubah seperti ini : > TextBox1.Value = Format(WorksheetFunction.VLookup(ComboBox1.Value, Sheet1.Range("A10:B13"), 2), "Rp. ###,") > > Terlampir hasil revisi > > Thanks > Puthut Wibowo > > --- On Fri, 8/21/09, andri <[email protected]> wrote: > > From: andri <[email protected]> > Subject: ]] XL-mania [[ Format "Rp. ###,###" di Textbox pada Form > To: "XL-mania" <[email protected]> > Date: Friday, August 21, 2009, 2:46 PM > > 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
