ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   "box-select" mode (https://www.excelbanter.com/excel-programming/358436-box-select-mode.html)

borg

"box-select" mode
 
Hi,

I now understand that:
Application.CommandBars("Drawing").Controls("Selec t Objects").Execute puts
me into the box-select mode. And running
Application.CommandBars("Drawing").Controls("Selec t Objects").Execute again
puts me out of box-select mode.

Is there a way to tell if the control("select objects") is currently
selected because sometimes I want to only excute that code if it is not
currently in the box-select mode.

Thanks for you help!

Dave Peterson

"box-select" mode
 
Maybe you can use something like:

Dim myCtrl As CommandBarControl
Set myCtrl = Application.CommandBars("Drawing").Controls("Selec t Objects")
If myCtrl.State = msoButtonUp Then
MsgBox "ready to turn on"
myCtrl.Execute
Else
MsgBox "already clicked"
myCtrl.Execute
End If




borg wrote:

Hi,

I now understand that:
Application.CommandBars("Drawing").Controls("Selec t Objects").Execute puts
me into the box-select mode. And running
Application.CommandBars("Drawing").Controls("Selec t Objects").Execute again
puts me out of box-select mode.

Is there a way to tell if the control("select objects") is currently
selected because sometimes I want to only excute that code if it is not
currently in the box-select mode.

Thanks for you help!


--

Dave Peterson

borg

"box-select" mode
 
Thank you for the help! It is much appreciated.

"borg" wrote:

Hi,

I now understand that:
Application.CommandBars("Drawing").Controls("Selec t Objects").Execute puts
me into the box-select mode. And running
Application.CommandBars("Drawing").Controls("Selec t Objects").Execute again
puts me out of box-select mode.

Is there a way to tell if the control("select objects") is currently
selected because sometimes I want to only excute that code if it is not
currently in the box-select mode.

Thanks for you help!



All times are GMT +1. The time now is 10:08 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com