I need formula in vba
my spread sheet is like
in column 1 name, column 2 amount, column3, currncy like usd or euro (in word not sign),in column4 amount2,column5 curruncy5. and so on, now i need formula to sum all usd and all euro separably, under the title of usd and euro

pls help