excel - 将列单元格“数字另存为文本”转换为数字格式的宏

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

谢谢

Answer 2

您是否尝试过使用 NumberFormat 或 CSNG？