Hi again -

Actually, the macro 'works' 99.9% exactly as it should ... at least
according to what I saw via the Watch Window. The problem comes on on
the 2nd loop, when the InsertValues macros is triggered -- the line
'ActiveCell.value = amount' line results in a blank cell, even though
'amount' is a positive value (as confirmed in Watch Window).

So, why would the code insert a blank cell where an available value
exists? In fact, the InsertValues macro wouldn't have been called if
'amount' wasn't a non-blank value in the first place! The cell
formats look OK and no error is produced ...

Very odd!

TIA,
Ray