Sama-sama. Hati-hati dalam menggunakan value=value pada cell yang di-merge
Wassalam, Kid. 2012/10/18 M. Ferdiansyah <[email protected]> > ** > > > Maaf OTT, > > Selama ini kl mau paste value formula yg saya gunakan : > > Range("A1").select > selection.copy > selection.pastespecial xlpastevalues > > Ternyata ada yg lebih simple : > Range("A1").value = Range("A1").value > > (begitu terbahaknya melihat perkembangan rumus yg semakin woow..x_x) > *Motifasi untuk terus belajar. > > makasi Mr.Kid, > > wassalam, > Ferdy > > > > Pak Odhy, > > > > Coba pada sheet1 cell B3 : > >>> kalau angka 1500 dengan pemisah ribuan di komputer Anda ditulis sebagai > > 1,500 -> artinya setting regional Inggris maka bisa pakai formula apa > > adanya (bisa copas) > >>> kalau ternyata 1500 dengan pemisah desimal di komputer Anda ditulis > > sebagai 1.500 -> setting regional Indonesia, maka ganti semua tanda koma > > (,) dalam formula menjadi titik koma (;) > >>> Formulanya : > > =SUMIFS('BPPB Report'!$G:$G,'BPPB Report'!$C:$C,$A3,'BPPB > > Report'!$B:$B,B$2) > > > >>> kemudian klik kanan cell B3 -> format cells -> tab number -> pilih > > custom -> tulis di textbox : > > general;-general; > >>> Setelah itu, copy formula B3 ke seluruh cell di B3:T18 > > > > Kalau mau buat macro, coba : > > 1. save as file lebih dulu, pilih save as type adalah .xlsm atau .xlsb > > atau > > .xls, kemudian tekan save > > 2. ke VBE (tekan ALT F11) > > 3. menu Insert -> pilih Module -> hasilnya, akan muncul Module1 di sisi > > kiri layar (frame Project Explorer) > > 4. double click si Module1 yang baru saja terbentuk > > 5. ke lembar kanannya dan tulis prosedur berikut : (sesuaikan penggunaan > > koma (,) dengan setting regional setempat) > > public sub *BuatRekap*() > > > range("b3:t18").formula = "=SUMIFS('BPPB Report'!$G:$G,'BPPB > > Report'!$C:$C,$A3,'BPPB Report'!$B:$B,B$2)" > > activesheet.calculate > > range("b3:t18").value=range("b3:t18").value > > range("b3:t18").numberformat = "General;-General;" > > end sub > > > > 6. kembali ke worksheet (ALT F11) dan save (CTRL S) > > 7. klik sebuah cell di sheet hasil rekap -> jalankan macro (ALT F8) -> > > pilih nama prosedurnya tadi '*BuatRekap*' -> tekan Run > > > > > Mau buat tombolnya ? > > 1. insert sebuah shape dengan ribbon Insert -> pilih Shape -> pilih > > rectangle misalnya -> gambar di worksheet > > 2. klik kanan si shape tadi -> pilih Assign Macro -> pilih nama > > prosedurnya > > '*BuatRekap*' -> tekan OK > > > 3. klik sebuah cell di sheet1, kemudian klik si shape > > 4. save workbook (CTRL S) > > > > Wassalam, > > Kid. > > > > 2012/10/18 rodhy hakim <[email protected]> > > > >> ** > > >> > >> > >> Dear Master, > >> Mohon bantuan membuat Rekapitulasi data dengan menggunakan Macro. > >> untuk penjelesannya pada file terlampir. > >> terimakasih, > >> > >> odhy > >> > >> > >> > >> > >> > > > > ____________ _________ _________ _________ _________ _________ _________ > Notice : This e-mail (and any attachment) is strictly confidential and > is intended only for the addressee(s)above. Is strictly prohibited to > forward, print, copy, or otherwise reproduce this message that would > allow it to be viewed by any individual not originally listed as > a recipient(s). If you have received this e-mail in error, please > immediately notify the sender and delete this message. The opinions > expressed in this e-mail (and any attachment) are those of the individual > sender and may not necessarily reflect the views of PT Pusri. > ____________ _________ _________ _________ _________ _________ _________ > > >
