Converting text to number VBA

[mira2020]

Hi all,

i am trying to convert few column in my excel file from text to number. But the code is running super slow.
Is there a way to make it faster ? If i convert row 1 to 200 instead of the whole column , the code will run faster?

With Worksheets("Requisition Detail").Columns(4)
.NumberFormat = "0"
.Value = .Value
End With

thanks.

 

[Alex Blakenburg]

It should be, give it a try:

Sub test()
    With Worksheets("Requisition Detail")
        With Intersect(.UsedRange, .Columns(4))
            .NumberFormat = "0"
            .Value = .Value
        End With
    End With
End Sub