做了一个EXCEL宏，请帮助看看，谢谢

roych

yanwei82123300 发表于 2016-5-7 07:51
谢谢，大家的帮助！但是数据导入到access中还是不准确不是000三位的！在EXCEL中显示是三位，但是excel中显 ...

那个就不是显示格式的了。前面的都是用类似于单元格格式的写法的。应该修改单元格的值才能实现。

ly

yanwei82123300 发表于 2016-5-7 07:51
谢谢，大家的帮助！但是数据导入到access中还是不准确不是000三位的！在EXCEL中显示是三位，但是excel中显 ...

在excel中，可以用文本格式来表示，但一定不是数值了

1. Sub FormatRng()
   
2. ActiveSheet.Range("B2", Cells(Rows.Count, 2).End(xlUp)).Select
   
3.         For Each cell In Selection.Cells
   
4.             cell.Value = Format(cell, "'000")
   
5.         Next
   
6. End Sub

复制代码

yanwei82123300

ly 发表于 2016-5-7 15:48
在excel中，可以用文本格式来表示，但一定不是数值了

谢谢帮助