PDA

View Full Version : การเพิ่ม Menu item ใน Menu



anntiant
22 May 2007, 09:11
หนูอยากรู้จะมี code ที่จะเพิ่ม Menu item ใน Menu มั้ยคะ
หนูลองหาจากใน เว็บ ก็จะเจอแต่ code ที่เพิ่ม Menu
หนูลองอ่านในเว็บ และจากหนังสือ การจะเพิ่ม Menuก็จะมี HelpContextID
แล้วเอาใส่ใน code เพื่อหา Menu ที่ต้องการแล้วจึงจะเพิ่ม Menu ใหม่เข้าไป
หนูก็เลยคิดว่า ถ้าจะเพิ่ม Menu item ใน Menu ก็น่าจะคล้ายกันแต่ต้องรู้ HelpContextID
ของ Menu item - -"
-->> หนูเข้าใจถูกมั้ยคะ

หนูได้หาจากกระทู้เก่าๆ หนูเจอแต่ HelpContextID ของ Menu
http://www.excelexperttraining.com/forum/viewtopic.php?t=2099&highlight=helpcontextid
แต่ HelpContextID ของ Menu Item ค่าที่ได้เป็น 0

ขอบคุณมากคะ

มิตรภาพ
26 May 2007, 10:24
ลองดูโค้ดการทำเมนูที่ผมใช้ดังนี้ครับ

With MenuBars(xlWorksheet)
'----- Section 1 ------
.Menus.Add "myMenu1", 2
With .Menus("myMenu1")
With .MenuItems
.Add "1>menu11...", "menu11Macro"
.Add "-"
.Add "1>menu12...", "menu12Macro"
End With
End With
'----- Section 2 -------
With .Menus("Tools")
With .MenuItems
.AddMenu "myMenu2", before:=1
.Add "-", before:=2
End With
With .MenuItems("myMenu2").MenuItems
.Add "1>menu21...", "menu21Macro"
.Add "-"
.Add "2>menu22...", "menu22Macro"
End With
End With
'-------------------------------
End With

ส่วนที่ 1 นั้น เป็นการเพิ่ม menuitem ของเราเอง แล้วจึงสร้าง menu ย่อยๆข้างใน
ส่วนที่ 2 เป็นการเพิ่มกลุ่มเมนูของเรา เข้าไปในเมนู Tools จากนั้นจึงสร้างเมนูภายในอีกครั้งหนึ่งครับ

anntiant
28 May 2007, 15:37
เพิ่มได้แล้วคะ ขอบคุณมากนะคะ

sake
30 May 2007, 15:42
ถ้าต้องการ Add Menu ย่อยเพิ่มจาก menu21 หรือ menu22
ต้องเพิ่ม Code อย่างไรครับ