如何EXCEL里面在Sheet1加入一个按钮(CommandButton1).

想要用EXCEL实现所存储矩阵的马氏距离的计算.想在Sheet1中加入一个按钮(CommangButton1),将其’Caption’设为’计算协方差矩阵’,并为其编写代码.实现计算协方差矩阵.但是不知道如何加入按钮,如何让程序运行.代码如下:
Private Sub CommandButton1_Click()
For i = 1 To 25
p(i) = Sheet1.Cells(1026, i)
Next i
For i = i To 25
For j = i To 25
s(i, j) = 0
For k = 1 To 1025
s(i, j) = s(i, j) + (Sheet1.Cells(k, i) - p(i)) * (Sheet1.Cells(k, j) - p(j))

Next k
s(i, j) = s(i, j) / 1024
Sheet2.Cells(i, j) = s(i, j)
If i <> j Then Sheet2.Cells(i, j) = s(i, j)
Next i
Next j
End Sub
请问高手,能不能一个步骤一个步骤的教我把最后的计算结果调试出来.
非常感谢!

使用开发工具选项卡中的命令按钮,插入即可。


Excel版本参考:2010

1、选中要插入的单元格位置;

2、点击开发工具-插入(ActiveX),命令按钮;

3、在工作表中画出一个大家合适的按钮即可;

4、查看效果(OK)。

温馨提示:内容为网友见解,仅供参考
第1个回答  2007-03-24
这里并不能比其它论坛,不能传附件,因此,对于这种专业的问题,效果肯定会大打折扣。但是楼主自己花点时间还是很容易解决的,特别是楼主连代码都已经编出来了。
命令按钮(CommangButton1)的调出很简单:
视图--工具栏--控件工具箱,即可显示控件工具栏,然后点击命令按钮的图式,并在工作表内划出大小,右键编辑属性里的"Caption"为’计算协方差矩阵’,双击并把你的代码复制进去即可。本回答被网友采纳
相似回答