My problems with simple addition ...

L

Larry Levinson

where I have ...
Dim bn_all, ap_all, reuters_all, others_all, lat_all As Long

Set bn_range = Worksheets("Input").Range("b" & row & ":b40000")
Set ap_range = Worksheets("Input").Range("c" & row & ":c40000")
Set reuters_range = Worksheets("Input").Range("d" & row & ":d40000")
Set others_range = Worksheets("Input").Range("e" & row & ":e40000")


bn_all = Application.WorksheetFunction.Sum(bn_range) ' = 835.5
ap_all = Application.WorksheetFunction.Sum(ap_range) ' = 447
reuters_all = Application.WorksheetFunction.Sum(reuters_range) ' = 467
others_all = Application.WorksheetFunction.Sum(others_range) '= 117

why does this:

lat_all = bn_all + ap_all + reuters_all + others_all = 1886 and not
1886.5 ????


even when I set lat_range
tia ...


Larry Levinson
Talking up to the vocal ...
LLevinson*Bloomberg.net
(remove the star etc ....)
 
B

Bob Phillips

Is he variable lat_all defined as an integer or Long?

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
J

Jerome_t

-----Original Message-----
where I have ...
Dim bn_all, ap_all, reuters_all, others_all, lat_all As Long

Set bn_range = Worksheets("Input").Range("b" & row & ":b40000")
Set ap_range = Worksheets("Input").Range("c" & row & ":c40000")
Set reuters_range = Worksheets("Input").Range("d" & row & ":d40000")
Set others_range = Worksheets("Input").Range("e" & row & ":e40000")


bn_all = Application.WorksheetFunction.Sum(bn_range) ' = 835.5
ap_all = Application.WorksheetFunction.Sum(ap_range) ' = 447
reuters_all = Application.WorksheetFunction.Sum (reuters_range) ' = 467
others_all = Application.WorksheetFunction.Sum (others_range) '= 117

why does this:

lat_all = bn_all + ap_all + reuters_all + others_all = 1886 and not
1886.5 ????


even when I set lat_range
tia ...


Larry Levinson
Talking up to the vocal ...
LLevinson*Bloomberg.net
(remove the star etc ....)
.
Because you defined your data as long !
try with variant or double
 
L

Larry Levinson

Long, but it works if I set it to Single, thanks.


Bob Phillips said:
Is he variable lat_all defined as an integer or Long?

Larry Levinson
Talking up to the vocal ...
LLevinson*Bloomberg.net
(remove the star etc ....)
 
B

Bob Phillips

Looking at your post I can see the Long definition now, but I couldn't when
I answered. If it could be a big number, might be better to use Double.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Top