Ramesh - There are multiple ways to accomplish this. But since your
request is to just sum the numbers for the given column, here is the
snippet which is not production ready.

Dim oRange as Range
Dim iTotal as Double

iTotal = 0

For Each oRange In Application.Range ("A1:A10")
   iTotal = iTotal + oRange.Value
Next

MsgBox ("Total Value is : " + iTotal)

Thank you,
Dev


On May 29, 9:47 am, Ramesh Katta <kr.sap...@gmail.com> wrote:
> Hi Gurus,
>
> I am Ramesh, new to vba programs.  I need a macro to calculate sum for
> range of column.  The should be displayed with MsgBox.
>
> For example: Column A has numbers 1,2,3,4,5,6,7,8,9,10...................
>
> I want to calculate the cells we entered and displayed on MsgBox.
>
> Thanks&Regards
> Ramesh

--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at 
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 

To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain  @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---

Reply via email to