Thanks John!
I decided to use the Forms command button.
I added the following code:
Sub Macro8()
ActiveSheet.Buttons.Add(100, 40, 78.75, 27.75).Select
Selection.Name = "x"
Selection.Caption = "xxxxxx"
Selection.OnAction = "subX"
End Sub
Sub subX()
Debug.Print "x"
End Sub
This works fine.
However, how do I reference the button or find out property values? I
tried several things in subX, such as:
Debug.Print "cap: " & x.Caption
but got an error.
I tried called using:
subX(Me)
sub subX(byval o as object) 'and as commandbutton
but still got error (object related).
Do you know how I can do this?
Thanks again.
- Bruce
*** Sent via Developersdex
http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!