vba--将excel单元格格式改为常规格式 

Sub 改格式()    
   ActiveWorkbook.activesheet.Select
   For Each Rng In ActiveSheet.UsedRange
    With Rng
    .NumberFormatLocal = "G/通用格式"
    .Value = .Value
   End With
   
   Next Rng
End Sub

 

posted @ 2019-07-20 23:03  瓶子xf  阅读(4996)  评论(0)  编辑  收藏  举报