求一段VBA代码,将指定区域的文本格式的非空值的空白单元格转换成数值格...

发布网友发布时间：2024-08-20 13:58

共2个回答

热心网友时间：2024-08-31 10:10

先选中一个要转换的区域，然后执行下面宏代码即可
Sub 转换格式()
With Selection
For Each a In .Cells
.NumberFormatLocal = "0.00_ "
SendKeys "{F2}"
SendKeys "{enter}"
Next
End With
End Sub

热心网友时间：2024-08-31 10:13

Selection.NumberFormatLocal = "0.00_ "

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com