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 <odhyz83_assas...@yahoo.com>

> **
>
>
> Dear Master,
>    Mohon bantuan membuat Rekapitulasi data dengan menggunakan Macro.
> untuk penjelesannya pada file terlampir.
> terimakasih,
>
> odhy
>
>
>
>  
>

Kirim email ke