Hi Ron,

Oh that old chestnut. That's the one Harlan was talking of the other day
isn't it. I also get that if I paste a worksheet formula from Google, but
they are not usually so obvious :-(

It is just one of the many annoying 'features' of the new Google.

Regards

Bob

"Ron de Bruin" wrote in message
...
You see this when you paste it in the VBA Bob
With Application.CommandBars("Cell"-*)

I send a bug report again to Google


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bob Phillips" wrote in message
...
Dave,

With respect, what are you talking about? I cannot see trailing hyphens
in
your email, in my original post, or in Google.

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Dave Peterson" wrote in message
...
For some reason, copying and pasting from Google adds extraneous
dashes/hypens
to the code.

This line:
With Application.CommandBars("Cell"*)
should not have that trailing minus:
With Application.CommandBars("Cell")
(a couple of spots)


Bob Phillips wrote:

Charles,

Here is a simple example you can build upon. I tend to add in the
Workbook_Open event and remove in the Workbook_BeforeClose.

Public Sub addMenu()
removeMenu 'just in case
With Application.CommandBars("Cell"*)
With .Controls.Add(Type:=msoControl*Button)
.BeginGroup = True
.Caption = "Routine1"
.OnAction = "Another"
End With
With .Controls.Add(Type:=msoControl*Button)
.Caption = "Routine2"
.OnAction = "YetMore"
End With
End With
End Sub

Public Sub removeMenu()
On Error Resume Next
With Application.CommandBars("Cell"*)
.Controls("Routine1").Delete
.Controls("Routine2").Delete
End With
On Error GoTo 0
End Sub

--

HTH

RP
(remove nothere from the email address if mailing direct)

"Charles Jordan" wrote in message
om...
Hi I am trying to manipulate multiple controls on a worksheet plus
some drawing objects and in the days of XL95 John Walkenbach had a
marvellous "Power Utility Pak" "Object Properties" tool for
altering
both the location of objects and whether they were
Visible/Invisible.

One of its great features was that it was accessible by selecting
the
object and then *right clicking* it. We are now trying to reproduce
this right click ability but cannot find any code on this NG for
doing
it.

Can any one, (including John) help?. Mr Walkenbach if you are
there
perhaps you could direct us to the page in "Power Programming with
VBA" although its not immediately obvious that the code for this
feature is in the book..

(We are running XL 2000, /XP).

Thanks a million

Charles

--

Dave Peterson