View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
mabond mabond is offline
external usenet poster
 
Posts: 14
Default Assign hyperlink to new commandbar control


I trust this has not been asked recently and I've mised it in my search

I am creating a new popup on the main Excel toolbar through an auto-open
macro.

Whenit comes to the "on action" for the command bar buttons on this popup i
want to be able to assign a hyperlink just as I would if I were using the
"customize" process, right-clicking on the object and selecting "assign
hyperlink". The hyperlink is required to take user to a file located on our
network.

I'm running up blind alleys trying to find out how to do this and would
appreciate any help

Regards

Michael Bond

Copy of sample code :
Sub auto_open()

Set fbMenuBar = CommandBars.ActiveMenuBar

Count = 0
For Each c In fbMenuBar.Controls
Count = Count + 1
Next

Set fbMenu = fbMenuBar.Controls.Add(Type:=msoControlPopup, Befo=Count-1,
Temporary:=True)
fbMenu.Caption = "Football"

Set ctrl1 = fbMenu.Controls.Add(Type:=msoControlButton, ID:=1)
ctrl1.Caption = "Fixtures"
ctrl1.TooltipText = "Fixtures"
ctrl1.Style = msoButtonCaption
ctrl1.OnAction = ?????

End Sub