View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips Bob Phillips is offline
external usenet poster
 
Posts: 10,593
Default FaceID not available

Works fine here (XP). Must be something else.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"John" wrote in message
...
Hi there,

I'm having a problem with a FaceID property of a control button on a popup
menu. Basically it doesn't appear (in Intellisense) to be available (so

for
the moment I've commented it out). Can anyone tell me why it's not
availble? NB- I'm using Excel 2003 and the code below is adapted from
Stephen Bullen et al's book "Excel 2002 VBA"

Thanks

John

Private Sub MakePopups()
With Application.CommandBars.Add(Name:="JohnsPopup",
Position:=msoBarPopup)
With .Controls.Add(Type:=msoControlButton)
.OnAction = "AddCategoryRow"
'.FaceID = 200
.Caption = "Add Category"
.TooltipText = "Add a category"
End With
With .Controls.Add(Type:=msoControlButton)
.OnAction = "AddItemRow"
'.FaceID = 200
.Caption = "Add Item"
.TooltipText = "Add an item"
End With
With .Controls.Add(Type:=msoControlButton)
.OnAction = "DeleteRow"
'.FaceID = 200
.Caption = "Delete Row"
.TooltipText = "Delete selected row"
End With
End With
End Sub