Thread: summing range
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Frank Kabel Frank Kabel is offline
external usenet poster
 
Posts: 3,885
Default summing range

Hi
change
rngTotal = Sum(rngTotal)

to
rngTotal = application.Sum(rngTotal)


--
Regards
Frank Kabel
Frankfurt, Germany


Tim Johnson wrote:
I am knowledgeable about Access VBA but new to XL VBA
I want to sum B2:B12 and display in A1. This is waht I
have:

Dim rngTotal As Range
Set rngTotal = Range("A1")


Dim rngData As Range
Set rngData = Range("B2:B12")

rngTotal = Sum(rngTotal)

I am not getting an error. What is the right way?
Thanks