如何用excel计算正方形的面积

新建一个excel文件并打开

按ALT+F11快捷键打开VB编辑器窗口

单击菜单栏的“插入”→“模块”命令

在弹出的窗口输入以下代码： Sub 求正方形体积()    Dim x, y As Integer ' 定义变量x,y，用来保存长与宽    Dim s As Integer ' 定义变量s，用来保存面积s    x = InputBox("请输入长x:")    y = InputBox("请输入宽y:")        s = x * y    MsgBox ("面积为:" & s)        End Sub

单击“运行”→“运行子过程/用户窗体”，调试程序，ok！