Excel宏与控件关联

我用Excel做了一个宏,也画了一个控件按钮"commandbuttom1",宏是这样写的:
ActiveCell.Select

Range("g7").Select
ActiveCell.FormulaR1C1 = "=IF(MOD(INT(RAND()*100),2)=0,""A"",""B"")"
ActiveCell.Select
Range("g7").Select

怎样做可以按一下这个按钮就让宏运行?

把这个写成过程，例如起名叫aa吧。
在vba里新建个模块，把上面的代码粘过去，如下
sub aa()
ActiveCell.Select
Range("g7").Select
ActiveCell.FormulaR1C1 = "=IF(MOD(INT(RAND()*100),2)=0,""A"",""B"")"
ActiveCell.Select
Range("g7").Select
end sub
然后在你的按钮事件里调用aa过程即可。如下：
Private Sub CommandButton1_Click()
Call aa
End Sub
其实，在程序的任何地方，都可以这么调用aa，只是如果你要在所有窗口里都能调用，就把aa写在模块里，如果只是一个窗口调用，那就在CommandButton1所在的窗口里定义aa就行。

一般的表单按纽/控件/对象, 均没有隐藏或透明的属性。故应无人会答, 只可退而求其次 如不欲其他人看到按钮, 我的经验, 有以下两个办法 方法一, 不以按钮执行宏, 改用 快速键 ctrl [自定键] 按工具, 宏, 指定宏名称,选项, 自定快速键 方法二, 不用传统的表单按钮, 改用缯图的透明对象做按钮, 放在你心目中的指定单元格位置 点选指定的单元格位置, 按检视,工具列,缯图,选阴影对象 右击对象, 格式, 色彩无填满及无线条