Well I'm surprised and pleased in equal measure. Thanks for the feedback.

Mike

"Marco" wrote:

I think it works.

YOU A STAR.....


Cheers,
Marco



"Mike H" wrote:

Hi,

You really haven't given a lot to go on but how about this for a start:

Sub stance()
Range("A1:A20").Select
For Each c In Selection
On Error Resume Next
c.Value = c.Value + 0
c.NumberFormat = "General"
Next
End Sub

Mike

"Marco" wrote:

Hi. I'm creating a macro and in the many things that it should do I need that
selects me a few cells and then convert the content into Number.

I can do it manually, but it seems that when I'm creating a macro it don'd
record that step.

What can I do????? Any special programming?

Regards,
Marco