I found the solution in another forum. A great code that solves the
problem for good like magic. A big thanks to this guy, Dave Hawley.
Here's the code :
Code:
--------------------
Sub ForceToNumber()
Dim wSheet As Worksheet
For Each wSheet In Worksheets
With wSheet
.Range("IV65536") = vbNullString
.Range("IV65536").Copy
.UsedRange.PasteSpecial xlPasteValues, xlPasteSpecialOperationAdd
End With
Next wSheet
End Sub
--------------------
--
Werner
------------------------------------------------------------------------
Werner's Profile:
http://www.excelforum.com/member.php...o&userid=24304
View this thread:
http://www.excelforum.com/showthread...hreadid=389026