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.
____________ _________ _________ _________ _________ _________ _________
