saat sedang membicarakan detil spt saat ini; saya kira, yg diperlukan (oleh pemilik kasus) adalah bentuk "format spt apa yg diperlukan", bukan aturan umum number formatting.
aturan spt itu sudah ada di milis sejak beberapa th yg lalu dan di situ malah lebih lengkap bisa dilihat lihat di web milis XL-mania : Msg# No.6127 tgl 3-aug-2006, subject: "Custom Number Format, apakah ada aturannya ?" 2009/8/24 Puthut Wibowo <[email protected]> > > Terlampir file : Custom Number Formats, semoga dapat membantu dalam memformat angka > Thanks > Puthut Wibowo > > > --- On Sun, 8/23/09, siti <[email protected]> wrote: > > From: siti <[email protected]> > Subject: Re: ]] XL-mania [[ Format "Rp. ###,###" di Textbox pada Form > To: [email protected] > Date: Sunday, August 23, 2009, 9:22 AM > > di pc saya (mudah mudahan tidak demikian di pc pak Puthut) > mengubah code menjadi seperti yg di sarankan > TextBox1.Value = Format(WorksheetFun ction. _ > VLookup(ComboBox1. Value, Sheet1.Range("A10:B13"), 2), "Rp.###,") > > penampilan hasilnya : Rp22000 > kayaknya ini bukan yg dikehendaki oleh pe-nanya. > > jadi yg diubah codenya 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 <puthut_...@yahoo. com> > > Syntak Macronya dirubah seperti ini : > > TextBox1.Value = Format(WorksheetFun ction.VLookup( ComboBox1. Value, Sheet1.Range("A10:B13"), 2), "Rp. ###,") > > > > Terlampir hasil revisi > > Thanks > > Puthut Wibowo
