计算三角形面积公式

计算三角形面积公式算法代码，操作平台：excel

在代码编辑界面的光标闪动处输入以下代码：

首先输入“a = Sheets(“Sheet1”).Range(“A1”).Value”，将Sheet1中A1单元格的值赋予变量a，需要程序运行之前先行在sheet1中的A1单元格输入数值；

下一行继续输入“b = Sheets(“Sheet1”).Range(“B1”).Value”，将Sheet1中B1单元格的值赋予变量b，需要程序运行之前先行在sheet1中的B1单元格输入数值；

下一行继续输入“c = Sheets(“Sheet1”).Range(“C1”).Value”，将Sheet1中C1单元格的值赋予变量c，需要程序运行之前先行在sheet1中的C1单元格输入数值；

下一行继续输入“p=(a+b+c)/2”；

下一行继续输入“s=sqr(p*(p-a)*(p-b)*(p-c))”，“sqr”指调用数学公式求平方根；

下一行继续输入“Sheets(“Sheet1”).Range(“D1”).Value=s”，将求得的面积写入Sheet1中的D1单元格；

代码输入结束之后，回到excel窗口，在“A1单元格，B1单元格，C1单元格”中分别输入一个数值，点图1中的第一个按钮“运行”，就可以自动在“D1单元格”中得到结果。

东行记