1、 新建EXCEL表格，现在我们要使A列中的数据按照B列中的规则进行变换，显然在EXCEL函数中是没有这种函数的，下面我们就用VBA来编辑一个乘法计算器，来快速完成这个计算。
4、 单击“开发工具”——VisualBasic，打开VBA代码编辑器，双击“模块6”，代开代码编辑框，如图在其中有一些代码：Sub 乘法()' 乘法 Macro' 快捷键: Ctrl+Shift+CEnd Sub
5、 现在我们来输入以下代码：Sub 乘法() ' 乘法 Macro ' 快捷键: Ctrl+Shift+C t = Val(ActiveCell.Value) x = InputBox("请输入数值", "计算器") ActiveCell.Value = Val(t * x)End Sub
7、 现在我们选择A2单元格，按住“Ctrl+Shift+C”，打开“请输入数值”对话框，在输入框中输入“-21”，单击确定，我们可以看到A1数据变成了-420.
8、 现在用同样的方式，利用右面的规则把A列中其他数据进行计算，结果如图所示，乘法计算器就只做完成了。
