Sub Total in worksheet or SUM IF function

[Shazi]

Hi,

I have a worksheet having some fields like:

A1: PartsID
B1: PartName
C1: Qty
D1: UnitPrice
E1: TotalPrice
F1: Category (can be Plumbing, Electrical, Laundry, Kitchen etc.)

and I have a data entry form, daily many entries can be done with
different category.

Can I have a VBA function to Calculate Sum OR Sub Total of all items
in H column by category.

If I Put type in

G column H column
-------------- --------------------
Plumbing Total amount from all the list.
Electrical Total amount from all the list.
Laundry Total amount from all the list.


I am using the below formula, in other excel file,
=SUMIF(D20249,W16,B20:B249)

but I need VBA procedure to this. if it possible pls send me the good
procedure. I will be highly appreciated.

with best regards.


Syed Shahzad Zafar
Madinah

 

[Tom Ogilvy]

mySum = Application.SUMIF(Range("D20249"), _
Range("W16"), Range("B20:B249"))

 

[Shazi]

mySum = Application.SUMIF(Range("D20249"), _
  Range("W16"), Range("B20:B249"))

--
Regards,
Tom Ogilvy















- Show quoted text -

Hi,

I tried your formula, but MySum is giving error.

saying: Variable not defined.....

how to fix.....

pls help me I am newbie.

Regards.

Shahzad