I tried the following but it's not working:
Sub Enter_Values3()
Dim dbl As Double
dbl = ThisWorkbook.Worksheets(2).Columns("A:A").Select
End Sub
Marty McVry Link worked
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
Thanks
您是否尝试过使用 NumberFormat 或 CSNG?
The technical post webpages of this site follow the CC BY-SA 4.0 protocol. If you need to reprint, please indicate the site URL or the original address.Any question please contact:yoyou2525@163.com.