why,,,, dificult??

  • Thread starter Thread starter x taol
  • Start date Start date
X

x taol

Dim grp As GroupObject, btn As Button
Set grp = ActiveSheet.GroupObjects("Group 131")
Set btn = grp.ShapeRange.GroupItems(Application.Caller)
but not work,,,,,,
debug error num = 5
 
My guess is that it does not like what is returned by the Application.Caller
expression.
 
no, you were wrong. the btn name is returned by application.caller.

Dim grp As GroupObject, btn As Button
Set grp = ActiveSheet.GroupObjects("Group 131")
Set btn = grp.ShapeRange.GroupItems(Application.Caller)
btn.caption="any_str"

but, 3 line is error... oh, no....
please help me.... guru xl....
 
Dim grp As GroupObject

Shouldn't this be Dim grp As GroupShape? I don't find GroupObject as a
valid declaration.
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

oh difficult... 3
Select drop down menu option using libre-calc macro 0
Excel crashes and restarts when accessing newly created worksheet 2
Click on website button with tag "button" 0
Adding buttons with macros 5
Test named range exists & exclude worksheet if it doesn't 5
Grouping Shapes in 2007 3
Set Button Caption 1

Back
Top