Macros & "Convert to Number"

[Scott Huerta]

I have a spreadsheet created by another application and the numeric fields
are being treated as text fields.

I can manually select the "Convert to Number" from the popup menu. But I
need to do it via a macro.

When I try to use a macro the "Convert to Number" action does not appear to
be recorded. How can I do this using a macro.

Thanks in advance,

 

[Bob Phillips]

Try

cell.Value = cell.Value

 

[Scott Huerta]

Thanks for the quick reply Bob.

How would I do this for a range of cells?

 

[Jacob Skaria]

Try the below

Sub Macro3()
Dim rngTemp As Range
Set rngTemp = ActiveSheet.UsedRange
rngTemp.NumberFormat = "General"
End Sub

If this post helps click Yes

 

[Jacob Skaria]

Oops...small correction.

Sub Macro3()
Dim rngTemp As Range, varRange As Variant
Set rngTemp = ActiveSheet.UsedRange
varRange = rngTemp.Value
rngTemp.NumberFormat = "General"
rngTemp.Value = varRange
End Sub

If this post helps click Yes

 

[Bob Phillips]

With Range("A2":H20")

.Value = .Value
End With