กระทู้เก่าบอร์ด อ.Yeadram
1,376 7
URL.หัวข้อ /
URL
จะซ่อน Ribbon Bar ใน Access2007 อย่างไรครับ
หลังจากไปกำหนดใน current database ให้แสดง form เริ่มต้นตามที่เราต้องการแล้ว ผมไม่อยากให้มันแสดงแถบ ribbon home ด้านบนครับ ต้องทำอย่างไรครับ
(ไม่ใช่การ minimize ribbon นะครับ)
(ไม่ใช่การ minimize ribbon นะครับ)
7 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R21334
Private Sub Form_Load()
Dim i As Integer
DoCmd.NavigateTo "acNavigationCategoryObjectType"
DoCmd.RunCommand acCmdWindowHide
DoCmd.ShowToolbar "Ribbon", acToolbarNo 'ซ่อน Ribbon'
DoCmd.LockNavigationPane True 'ล๊อกNavigationPane'
For i = 1 To CommandBars.Count
CommandBars(i).Enabled = False 'ซ่อนNavigationPane'
Next i
End Sub
ลองดูครับ
Dim i As Integer
DoCmd.NavigateTo "acNavigationCategoryObjectType"
DoCmd.RunCommand acCmdWindowHide
DoCmd.ShowToolbar "Ribbon", acToolbarNo 'ซ่อน Ribbon'
DoCmd.LockNavigationPane True 'ล๊อกNavigationPane'
For i = 1 To CommandBars.Count
CommandBars(i).Enabled = False 'ซ่อนNavigationPane'
Next i
End Sub
ลองดูครับ
3 @R21335
ทำไมทำตามแล้วRibbonไม่ซ่อนครับ
ขึ้นแบบนี้ครับ ช่วยด้วย
ขึ้นแบบนี้ครับ ช่วยด้วย
4 @R21339
ขอดูที่คุณใส่หน่อย
5 @R21340
ลองใส่โค๊ดนี้ใน เหตุการณ์ "เมื่อเรียกใช้งานปัจจุบัน" ไม่ทราบว่าจะตรงกับที่ต้องการหรือเปล่าครับ
Private Sub Form_Current()
DoCmd.ShowToolbar "Ribbon", acToolbarNo
End Sub
Private Sub Form_Current()
DoCmd.ShowToolbar "Ribbon", acToolbarNo
End Sub
6 @R21347
ลองใส่สองบรรทัดนี้ด้วยคับ
DoCmd.NavigateTo "acNavigationCategoryObjectType"
DoCmd.RunCommand acCmdWindowHide
ถ้าไม่ได้ต้องใส่ทั้งหมดคับ
DoCmd.NavigateTo "acNavigationCategoryObjectType"
DoCmd.RunCommand acCmdWindowHide
ถ้าไม่ได้ต้องใส่ทั้งหมดคับ
7 @R21349
ผมใช้ตามคุณไพรินทร์ครับ
สั้นๆง่ายๆดี ฝังไว้ที่ on open
DoCmd.ShowToolbar "Ribbon", acToolbarNo
แต่ตอนแรกไม่เวริคครับ ติดปัญหานิดหน่อย
คือพอโปรแกรมเปิดแล้วมันยังไม่ซ่อน
งมอยู่นาน จนเจอว่า ต้องเข้าไปติ๊กที่
Access Option>Current Database
[ / ] Allow Built-in toolbars
มันถึงจะซ่อนตามที่ต้องการ
(Option ตัวนี้อาจจะติ๊กเป็น default อยู่แล้ว แต่ผมเอาโปรแกรมเดิมมาแก้ option ตัวนี้มันก็เลยไม่ได้ถูกติ๊กไว้มั๊งครับ)
ขอบคุณทุกคนนะครับ
สั้นๆง่ายๆดี ฝังไว้ที่ on open
DoCmd.ShowToolbar "Ribbon", acToolbarNo
แต่ตอนแรกไม่เวริคครับ ติดปัญหานิดหน่อย
คือพอโปรแกรมเปิดแล้วมันยังไม่ซ่อน
งมอยู่นาน จนเจอว่า ต้องเข้าไปติ๊กที่
Access Option>Current Database
[ / ] Allow Built-in toolbars
มันถึงจะซ่อนตามที่ต้องการ
(Option ตัวนี้อาจจะติ๊กเป็น default อยู่แล้ว แต่ผมเอาโปรแกรมเดิมมาแก้ option ตัวนี้มันก็เลยไม่ได้ถูกติ๊กไว้มั๊งครับ)
ขอบคุณทุกคนนะครับ
Time: 0.2989s
https://msdn.microsoft.com/en-us/library/bb258192%28v=office.12%29.aspx
https://www.youtube.com/watch?v=pX54zCCJzIY