macro - how to sum a moving range?

[psrs0810]

I have a file there the range of data is always different. How to I sum a moving range?

and if I break the data into sections. How would I sum just that section?

So if I had data from row 1:50. I break it into two sections 1:25 a space at row 26 and 27:51. How can I sum that range to recgonize and stop at the space?

 

[VoG]

Try like this

Dim LR As Long
LR = Range("A1").End(xlDown).Row
mysum = WorksheetFunction.Sum(Range("A1:A" & LR))

 

[psrs0810]

if I have it at the bottom of the data, can I replace xldown with xlup?

 

[VoG]

if I have it at the bottom of the data, can I replace xldown with xlup?

With your example that would sum A1:A51.