C
cyberarmao
Function myFunction(myObject As object)
myObject.Caption = "ok"
.....
End Function
Private Sub OptionButton2_Click()
...
myFunction(ActiveSheet.OptionButton2)
...
End Sub
at the row2 , I find myObject is True, not ActiveSheet.OptionButton2.
Pls help me to modify the codes, thank you ^_^
myObject.Caption = "ok"
.....
End Function
Private Sub OptionButton2_Click()
...
myFunction(ActiveSheet.OptionButton2)
...
End Sub
at the row2 , I find myObject is True, not ActiveSheet.OptionButton2.
Pls help me to modify the codes, thank you ^_^