insert row with total where criteria count ends
i have excel sheet with 5 columns. i used following code for sorting. it works fine
lrow As Long
lrow = Application.WorksheetFunction.CountA(Sheet2.Range("A:A"))
Sheet2.Range("A3:E" & lrow).Sort key1:=Range("E3:E" & lrow), order1:=xlAscending, Header:=xlNo ' sno column
my data look like this...
refer image ... see the mode column, there are no of 1s are 7. i would like insert a row in last one and calculate the amount total (arrow mark in the image)
aany help tqs.