Find last row in column D then Sum
 

Hello from Steved

Is it possible in VBA to goto last row in Column D then to a Sum Function.

I know you can find the last row but was hoping to do a sum of that column D

Thankyou.

Find last row in column D then Sum
 

Steved:

try it,

r = Range("D65536").End(xlUp)
MsgBox "SUM:" & _
Application.WorksheetFunction.Sum(Range("D1:D" & r))

--
天行å�¥ï¼Œå�›å*�以自強ä¸�æ�¯
地勢å�¤ï¼Œå�›å*�以厚德載物

http://www.vba.com.tw/plog/


"Steved" wrote:

Hello from Steved

Is it possible in VBA to goto last row in Column D then to a Sum Function.

I know you can find the last row but was hoping to do a sum of that column D

Thankyou.

Find last row in column D then Sum
 

Thankyou very much.

"chijanzen" wrote:

Steved:

try it,

r = Range("D65536").End(xlUp)
MsgBox "SUM:" & _
Application.WorksheetFunction.Sum(Range("D1:D" & r))

--
天行å�¥ï¼Œå�›å*�以自強ä¸�æ�¯
地勢å�¤ï¼Œå�›å*�以厚德載物

http://www.vba.com.tw/plog/


"Steved" wrote:

Hello from Steved

Is it possible in VBA to goto last row in Column D then to a Sum Function.

I know you can find the last row but was hoping to do a sum of that column D

Thankyou.