宏将转换列单元格"保存为文本的数字"转换为数字格式

Question

我正在努力但是要工作

谢谢

Sub Enter_Values3()
Dim dbl As Double
dbl = ThisWorkbook.Worksheets(2).Columns("A:A").Select
End Sub

Answer 1

Marty McVry Link工作

Sub macro()
Range("A:A").Select 'specify the range which suits your purpose
Sheets(2).Select
With Selection
    Selection.NumberFormat = "0"
    .Value = .Value
End With
End Sub

谢谢