Summing in Macros

  • Thread starter Thread starter tjohn176
  • Start date Start date
T

tjohn176

Still looking for a little help with any part of my problems wit
summing and/or subtotaling. I would like to be a contributor instea
of a receiver of info. on this forum, but it is a slow learnin
process
 
Dim rng as Range
set rng = Columns(3).specialCells(xlConstants,xlNumbers)
set rng1 = Intersect(rng.EntireRow,Columns(4))
rng1.formula = "=" & rng1(1,-1).Address(0,0) & _
"*" & rng1(1,0).address(0,0)

Will put in your formulas

Zip the text file and send it to me and I will suggest a method to do the
rest.
 
Back
Top