ตอนนั้นผมดูจากไฟล์ตัวอย่าง ... ทำให้ตีความหมายออกมาได้ไงล่ะครับ Dim ControlFile As CommandBarPopup Set ControlFile = CommandBars.ActiveMenuBar.Controls.Add(xtpControlPopup, 0, "&File")
Caption คือ ป้ายบอกเมนู Category คือ การสร้างกลุ่มของเมนู (อันต่อไปให้ชื่อ PROGRAM ... พิมพ์เองเลย) ID คือ ตัวแปรกำหนดค่าคงที่ๆไม่ซ้ำกันเลย เพื่อนำไปใช้อ้างอิงในการเรียกใช้งาน Type - ต้องเลือก xtpControlPopup เพื่อระบุว่ามันมีรายการย่อยลงไปอีก ***
==== สิ้นสุดขั้นตอนของเมนูหลัก 2 กลุ่ม คือ File และ Program ====