作业帮 > 综合 > 作业

Excel VBA中,怎样对一排数字去小数点?

来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/04/28 05:42:30
Excel VBA中,怎样对一排数字去小数点?
我有一张.csv格式的表格,里面有大量的小数,我需要取整.但是csv格式不能保存数字格式,所以我还不能用不显示小数点后n位的办法来处理.
我现在只会这样:
Sub 去小数()
Dim i
i = ActiveCell.Value
ActiveCell.Value = int(i)
End sub
但是这个只能去掉一格的小数点,有没有办法可以选中一个区域,一次性全区掉呢?
看来我没说明白>_
Excel VBA中,怎样对一排数字去小数点?
选中后运行这个宏 Sub aaa () For Each x In Selection If WorksheetFunction.IsNumber(x.Value) Then x.Value = Int(x.Value) End If Next End Su