How do i stop numbers stringing together ? AB

A

Andy Bleese

I am using Visual Basic to add numbers in a macro in an Excel spreadsheet.
Something has now changed to where the resulting value of the numbers to be
added is a string of those numbers instead of the sum.
This is the format of the formula I am using:
total.value = a.value + b.value + c.value
If a = 1, b = 2, c = 3, then total.value returns 123, not 6.
This is the case in the file I'm currently working on as well as any new
file which uses this same type of formula. I've tried searching for any
settings that might have caused it to produce this result and used VB and
Excel Help without any success so far. Please help. Thanks.
 
G

Gary''s Student

Something like:

Sub andy1()
Dim a As Range, b As Range, c As Range, total As Range
Set a = Cells(1, 1)
Set b = Cells(2, 1)
Set c = Cells(3, 1)
Set total = Cells(4, 1)
total.Value = a.Value + b.Value + c.Value
End Sub

will produce 123 if the worksheet cells contain text. Make sure they
contain numbers.
 
K

KathyC

Sub andy1()
Dim a As single, b As single, c As single, total As single
a = Cells(1, 1).value
b = Cells(2, 1).value
c = Cells(3, 1).value
total = a.+ b + c
Cells(4, 1).value = total
End Sub

I used single in case there were decimals; if not, you could use As
Integer.
I didn't try it, but it ought to work.
Kathy
 
C

CLR

Works cool, but you need to eliminate the dot after the a in the line
to read:
total = a + b + c
instead of:
total = a.+ b + c

Vaya con Dios,
Chuck, CABGx3
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top