Question

如何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
请问高手，能不能一个步骤一个步骤的教我把最后的计算结果调试出来．
非常感谢！

Answer 1

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

Excel版本参考：2010

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

2、点击开发工具-插入（ActiveX），命令按钮；

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

4、查看效果（OK）。

Answer 2

这里并不能比其它论坛，不能传附件，因此，对于这种专业的问题，效果肯定会大打折扣。但是楼主自己花点时间还是很容易解决的，特别是楼主连代码都已经编出来了。
命令按钮（CommangButton1）的调出很简单：
视图--工具栏--控件工具箱，即可显示控件工具栏，然后点击命令按钮的图式，并在工作表内划出大小，右键编辑属性里的"Caption"为’计算协方差矩阵’，双击并把你的代码复制进去即可。