1、在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】
2、会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】
3、会d出模块编辑窗口
4、在代码编辑窗口输入以下图中代码:
5、与指定编写的保留小数位数代码关联,且进入命名为【保留小数位数】
6、点击【保留小数位数】按钮,表格中的数值瞬间四舍五入保留成两位小数
Round函数返回一个数值,该数值是按照指定的小数位数进行四舍五入运算的结果。
示例:
b = Round(1.5555, 2)
保留2位小数,结果b=1.56
语法
Round(expression [,numdecimalplaces])
Round函数语法有如下几部分:
expression 必需的。要进行四舍五入运算的数值表达式。
numdecimalplaces 可选的。数字值,表示进行四舍五入运算时,小数点右边应保留的位数。如果忽略,则Round函数返回整数。
在VBA中可以利用下面的代码来控制当前单元格“显示”的小数位数:Selection.NumberFormatLocal
=
"0.00_
"'这里显示为2位小数
关于此处的numberformatlocal属性:
应用于
CellFormat、DataLabel、DataLabels、Range
和
TickLabels对象的
NumberFormatLocal属性。
以用户语言字符串返回或设置对象的格式代码。Variant
类型,可读写。
expression.NumberFormatLocal
expression
必需。该表达式返回上面的对象之一。
说明:
Format函数使用与
NumberFormat
和
NumberFormatLocal属性不同的格式代码字符串。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)