After playing around myself I found the solution.

I had

Dim As Integer

Changed to

Dim As Currency

Thanks anyway.

Cheers,
Bernz


--
BernzG
------------------------------------------------------------------------
BernzG's Profile: http://www.excelforum.com/member.php...o&userid=22949
View this thread: http://www.excelforum.com/showthread...hreadid=465760