VBA中赋值直接使用=(赋值符号)
Excel版本参考:2010
假设将ActiveSheet.Shapes("Button 1").TopLeftCell.Address复制给变量 ADD
ADD=ActiveSheet.Shapes("Button 1").TopLeftCell.Address
注:如果被赋值的是对象,则需要SET辅助,如,Set d=createobject("scripting.dictionary")
alt
+
f11,打开vbe,在模块下,加入一段:
sub
按钮1_单击()
calculate
end
sub
将你设置的按钮,都指向它!
祝你工作顺利!!!
如果要知道第几行第几列,只需要只知道单元格的名称就行了
例如A6,就是A列,第六行嘛
然后要知道单元格的名称呢,用这个公式:=CELL("ADDRESS",B39)
ActiveSheet.Shapes("Button 1").TopLeftCell.Address