Excel Command bar controls

[spacebouncer]

When sheet is activated, I want to turn on Snap to Grid.

I've found the following code online to toggle the option, just like clicking the button, but it would be a whole lot better if anyone knows how to turn it on/off rather than just toggle.

Application.CommandBars.FindControl(ID:=549).Execute

 

[Snakehips]

spacebouncer,

Perhaps try....

Application.CommandBars.FindControl(ID:=549).Enabled = False

'and
Application.CommandBars.FindControl(ID:=549).Enabled = True

'or toggle enabled or not with
Application.CommandBars.FindControl(ID:=549).Enabled = Not Application.CommandBars.FindControl(ID:=549).Enabled

Hope that helps.

 

[spacebouncer]

No luck I'm afraid, thanks anyway! I'll get stuck into some reading when I get a chance.

 

[Arithos]

No Idea what snap to grid is
But how about the below, that is:

When sheet is activated, I want to turn on Snap to Grid.

is what you want?

Private Sub Worksheet_Activate()
Application.CommandBars.FindControl(ID:=549).Execute
End Sub

Just create that sub for the Worksheet in question

 

[spacebouncer]

Hi Arithos,

Thanks for the reply. I had this, only problem is that it toggles on to off, or off to on. I'm looking to turn on regardless of whether its on or off.

 

[Snakehips]

What about...

Private Sub WorkBook_Activate()
Application.CommandBars.FindControl(ID:=549).Execute
Application.CommandBars.FindControl(ID:=549).Enabled = False
End Sub

 

[spacebouncer]

Thanks again for the reply Snakehips.

Just done a little reading -
CommandBarControl methods (Microsoft.Office.Core)
and
CommandBarControl.Enabled property (Microsoft.Office.Core)

Not sure if I'm reading this properly, but is this saying that the "enabled" property can only be read?

It seems the enabled property doesn't actually have any effect! I've set it to true and false and it doesn't influence shapes snapping. But hopefully have a solution....

[COLOR=#333333]
Private Sub WorkBook_Activate()[/COLOR][COLOR=#333333]
Application.CommandBars.FindControl(ID:=549).Reset[/COLOR]
Application.CommandBars.FindControl(ID:=549).Execute

Still another problem for you though! I was hoping Snap would allow me to position a shape either on gridlines or exactly in the middle, but it seems to put them in odd places around the middle.

My plan was to create .addshape, with size equal to gridlines, allowing me to position everything very nicely, but it doesn't work! Your ideas would be appreciated!

 

[spacebouncer]

Just seen the snap to shape... whoa! How have I managed to entirely miss this the whole time I've been using office!

Still, if you know whether there is any way I could snap to gridlines or mid-gridlines precisely, and no funny bits in between, that would be great! Cheers