Coba gunakan tabel normal lalu dibuat pivot tablenya. Sedikit berbeda
tampilannya, tetapi tidak butuh VBA dan lebih cepat.
Kid.
2011/9/27 Adhi
> Wahai para suhu excel, kasih pencerahan dong pada kasusku ini..
>
>
> = Adhi =
>
>
> --- Mods ---
> Menceritakan kasus dengan detil dan terstruktur
Sub BuatSubTotal()
Sheets("Sheet1").Select
'remove/hapus
Range("a1").Select
Selection.CurrentRegion.Select
Selection.RemoveSubtotal
' create/buat
Range("a1").Select
Selection.CurrentRegion.Select
Selection.Subtotal GroupBy:=2, Function:=xlSum, TotalList:=Array(3), _
2 matches
Mail list logo