hi al

this is a code to make just one menu

    Set newmbar = CommandBars.Add(Name:="MenuService",
Position:=msoBarTop, MenuBar:=True, Temporary:=True)
    newmbar.Visible = True
    newmbar.Protection = msoBarNoMove

      Set menumaster =
newmbar.Controls.Add(Type:=msoControlPopup,
Temporary:=True)
       menumaster.Caption = "&Master"

      Set menumasterkodejasa =
menumaster.Controls.Add(Type:=msoControlButton)
       menumasterkodejasa.Caption = "&Kode Uraian
Jasa"
       menumasterkodejasa.TooltipText = "Kode Uraian
Jasa"
       menumasterkodejasa.Style = msoButtonCaption
       menumasterkodejasa.OnAction =
"bukamasteruraian"


then my question is:
 how to create sub menu from Kode Uraian Jasa

thank you very much


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 



Please zip all files prior to uploading to Files section. 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/AccessDevelopers/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 


Reply via email to