我有这个VBA代码,我将数据从word提取到Excel,然后我以相反的方式传输其他数据。
我有这个代码: 调用findAndReplace(替换(Round(vbaSheet.Cells(i," U")。Value,2),",","。"),& #34;运费:",3)
例如,这段代码从excel" 155,40"中获取了这样的数字。并将其返回到#34; 155.4"。
只有在小数结尾处为零时才会出现此问题。但我想将号码转移为" 155.40"。 我可以添加什么
答案 0 :(得分:0)
Format(findAndReplace(...),"0.00")
或
vbaSheet.Cells(i, "U").NumberFormat = "0.00"
正是您所需要的。格式取值,并强制它返回逗号后的两位数。
只需选择单元格并运行:
Sub Makro1()
Selection.NumberFormat = "0.00"
End Sub
然后让它在循环中运行。