[已解决]工作表1中按钮控制工作表2中按钮

ymq123

请教：
   点击工作表1中按钮1时，能否调用工作表2中按钮2里代码？若能，请编写代码。
谢谢！

最佳答案

月排行榜 / 总排行榜

kevinshe

2014-5-28 13:28

ymq123 发表于 2014-5-28 11:06
这代码只有编在一个代码窗口有效，我要求的是编写在二个代码窗口。
谢谢

首先插入一个模块
public sub Plus()

Range("c1") = Range("a1") + Range("b1")
end sub

把这一段写在模块里, 这样就能被所有sheet的控件调用了

跳转到最佳答案楼层

kevinshe

private sub button1_click()'''sheets(1)的按钮
call  plus
end sub

private sub button2_click()'''sheets(2)的按钮

call  plus
end sub

public sub Plus()

Range("c1") = Range("a1") + Range("b1")
end sub

ymq123

kevinshe 发表于 2014-5-28 10:19
private sub button1_click()'''sheets(1)的按钮
call  plus
end sub

这代码只有编在一个代码窗口有效，我要求的是编写在二个代码窗口。
谢谢

kevinshe

ymq123 发表于 2014-5-28 11:06
这代码只有编在一个代码窗口有效，我要求的是编写在二个代码窗口。
谢谢

首先插入一个模块
public sub Plus()

Range("c1") = Range("a1") + Range("b1")
end sub

把这一段写在模块里, 这样就能被所有sheet的控件调用了

jx8524

显示压缩文件已损坏

大灰狼1976

Sheet1代码：

1. Public Sub CommandButton1_Click()
   
2. Sheets(2).CommandButton1_Click
   
3. End Sub

复制代码

Sheet2代码：

1. Public Sub CommandButton1_Click()
   
2. MsgBox 123
   
3. End Sub

复制代码