On Jul 3, 8:53*pm, Tom Ogilvy
wrote:
mySum = Application.SUMIF(Range("D20:D249"), _
* Range("W16"), Range("B20:B249"))

--
Regards,
Tom Ogilvy



"Shazi" wrote:
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(D20:D249,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- Hide quoted text -

- 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