คือเมนูของโปรแกรม MS Access เองหรืออย่างไรครับ และใช้เวอร์ชั่นอะไรครับ แล้วปกติมันก็ต้องมีอยู่ หากเป็น 2007 เป็น Ribbon ก็กดขยายได้เลย ไปทำอะไรถึงหายไปครับ คือคำถามมันลอยๆมากๆครับ จะตอบว่าอะไรดี

MS ACCESS 2003 ครับ คือตอนRUN Program พวกเมนู File ด้านบนจะถูกซ่อนไว้ คือต้องการจะำ Export ข้อมูลจากบ้างฟอร์ม ออกมาเป็น Excel นะครับ

ซ่อนด้วยคำสั่งแบบนี้หรือเปล่า
DoCmd.ShowToolbar "Menu Bar", acToolbarNo

เวลาเรียกคืน
DoCmd.ShowToolbar "Menu Bar", acToolbarYes

เนื่องจากเป็นมือใหม่ โค้ดที่ว่านี้เข้าไปแก้ตรงไหนหรือครับ คุณ TTT

ลองกด Ctrl+G จะมีหน้าต่างว่างๆขึ้นมา (Immediate Window) แล้วพิมพ์ code ลงไปเลยครับ

คำถามคุณคือ
ถ้าขณะ Run Program access ในหน้าฟอร์มที่ใช้งานอยู่ ถ้าต้องการเปิดเมนูเต็มขึ้นมาต้องกดอะไรครับ

- ก็คือหากต้องการเปิดเมนูที่คุณซ่อนไว้ขึ้นมา ก็ใช้คำสั่ง
DoCmd.ShowToolbar "Menu Bar", acToolbarYes
ในเหตุการณ์อะไรก็ตามที่คุณอยากให้มันเปิดเมนูขึ้น หรือ อาจทำเป็นปุ่มบนฟอร์มแล้วใส่ใน On Click อะไรแบบนี้อ่ะครับ
- และเมื่ออยากซ่อนไว้เหมือนเดิมก็ทำเช่นเดียวกันแต่เรียกเป็น
DoCmd.ShowToolbar "Menu Bar", acToolbarNo

ประมาณนี้ครับ

คุณ TTT ผมต้องเข้าไปพิ่มพ์ตรงหน้าต่างไหนหรือครับ

ขอบคุณครับ

ในส่วนของโค๊ด VBA ตรง Event ไหนที่คุณต้องให้มันแสดงเมนูอ่ะครับ

ตัวอย่าง
1. สร้างปุ่มขึ้นใหม่บนฟอร์ม 1 ปุ่ม ตั้งชื่อว่า Cmd_Menu
2. กำหนด Property > Format > Caption: แสดงเมนู
3. ใส่โค๊ดใน Event > On Click ของปุ่ม ดังนี้:

    If Me.Cmd_Menu.Caption = "แสดงเมนู" Then
        DoCmd.ShowToolbar "Menu Bar", acToolbarYes
        Me.Cmd_Menu.Caption = "ซ่อนเมนู"
    Else
        DoCmd.ShowToolbar "Menu Bar", acToolbarNo
        Me.Cmd_Menu.Caption = "แสดงเมนู"
    End If