VBA code to AverageIF

[BCM_85]

Hi,

I am looking VBA code for Purchases average and sales average of a particular product mentioned in the below table.

PRODUCT	TYPE	RATE
A	Purchase	15
B	Purchase	9
A	Purchase	8
A	Sale	13
B	Sale	13
B	Purchase	11
A	Purchase	10
B	Sale	11
A	Sale	14

So kindly help me with code if I manually enter "A" then "Purchase" and result should be "Average Rate i.e 11".

Similarly for Sales of A result "Average Rate i.e 13.5".

Thank you.

 

[vletm]

BCM_85
Where will You manually enter those two texts?
Where/how would the result will give?
Could You send a sample Excel-file, which will show Your sample data as well as expected results?

 

[vletm]

BCM_85
Here one sample without those manually enter values and using AverageIFs.
Select any cell below PRODUCT or TYPE headers to get result.

 

[BCM_85]

BCM_85
Where will You manually enter those two texts?
Where/how would the result will give?
Could You send a sample Excel-file, which will show Your sample data as well as expected results?

Sir,

Thank you for the reply.

Kindly Refer Sheet named "Product_Price". In this sheet, If I enter product in cell B5 the average price of Purchase and Sale of product "B" in the product list should display In C5 and D5 using VBA Macros.


File attached.

Thank you.

 

[BCM_85]

Sir,

Thank you for the workbook, it is useful.

I have attached the sample workbook of my work. In this workbook, if I add any sale or purchase in the Sheet "Product_List" then the average price result should display in the sheet "Product_Price" in C5 and D5 cell if enter manually Product name in B5 Cell.


Thank you.

 

[vletm]

BCM_85
Did You notice that Your file is different than You've written in #1?
You could do that without VBA or this way.

 

[BCM_85]

Thank you very much Sir.