1、首先在开发工具中打开VBA编辑器
2、在单元格区域当中输入一些内容作为例子
3、在VBA编辑器中插入模块
4、在模块当中输入如下代码，然后运行Function Formart(cell) As String Application.Volatile Formart=cell.NumberFormatEnd Function
5、在单元格B1中输入公式“=Formart(A1)”，结果如图14.15所示。和图14.14中示例处显示的格式一样。其中“0.00）”表示保留小数点后面两位；“[Red](0.00)”表示将负数用红色表示
