At a guess, do you have declaration like :
Dim lCreditSum, MySingleVar as single

If so, this ONLY declares "MySingleVar" as a single ; "lCreditSum" is the
default for undeclared variables - Variant.
You need to explicitly state the datatype of each variable.

Dim lCreditSum As Single, MySingleVar as Single

NickHK

<RjS; <CISSP; "CISA" wrote in
message ...
Hi - I have a VB program I wrote for excell some months ago. It has been
processing a bank report every day without a hitch for all that time.
Today
it produced an entirely different and erroneous result. I traced the error
to
the following statement:

lCreditSum = lCreditSum + wsSRC.Cells(i, 13).Value

Where lCreditSum is previously declared as a type Single. The SRC value is
formatted as a number with 2 decimal points. When I set a watch on the
lCreditSum variable and process a previous input report, its type
assignment
remains as type Single throughout the entire run, but when it processes
todays input report the type assignment changes to a "Variant/String" on
the
very first assignment. It then proceeds to append each new value to the
variable instead of adding the new values to the sum as its supposed to.

Please, anybody... any suggestions? Absolutely nothing has changed with
this
program for several months and I have examined in input reports in minute
detail and can detect no changes.

Thanks much,