Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Hỏi về menu điều khiển trong access 2010
#1
Các bạn cho mình hỏi cách làm menu điều khiển trong access 2010 mà không dùng đến marcro, trên 2003 mình làm được mà 2010 chưa làm được vì không tìm thấy hộp thoại customize trong đó có thẻ toolbar.
Chữ ký của nguyenluyentkt Xin chào, mình là nguyenluyentkt, Tham gia http://thuthuataccess.com/forum từ ngày 08-10 -12.
Reply
Những người đã cảm ơn
#2
(21-04-16, 03:16 PM)nguyenluyentkt Đã viết: Các bạn cho mình hỏi cách làm menu điều khiển trong access 2010 mà không dùng đến marcro, trên 2003 mình làm được mà 2010 chưa làm được vì không tìm thấy hộp thoại customize trong đó có thẻ toolbar.

Xem bài viết này: Cách tạo menu trong access 2007 ( cũng áp dụng cho Access 2010)

Demo thì tại bài này: Hiện Ribbon theo User đã phân quyền, phân quyền theo Danh sách lựa chọn. (Ribbon Access 2010)

[Hình: 3143359933_260396470_574_574.jpg]

Đây là file làm ví dụ về cho ẩn hoặc hiện Menu con: "Trợ Giúp": Demo Menu 2010_2.rar ( Tác giả: MatTroiNguQuen)


Ghi chú:
Từ Access 2007 trở lên người ta không gọi là Menu bar nửa là thay vào đó là thanh Ribbon Access 2007 hoặc 2010.

Thân mến![/b]
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn thanhtruong
#3
u
(30-04-16, 09:07 PM)maidinhdan Đã viết:
(21-04-16, 03:16 PM)nguyenluyentkt Đã viết: Các bạn cho mình hỏi cách làm menu điều khiển trong access 2010 mà không dùng đến marcro, trên 2003 mình làm được mà 2010 chưa làm được vì không tìm thấy hộp thoại customize trong đó có thẻ toolbar.

Xem bài viết này: Cách tạo menu trong access 2007 ( cũng áp dụng cho Access 2010)

Demo thì tại bài này: Hiện Ribbon theo User đã phân quyền, phân quyền theo Danh sách lựa chọn. (Ribbon Access 2010)

[Hình: 3143359933_260396470_574_574.jpg]

Đây là file làm ví dụ về cho ẩn hoặc hiện Menu con: "Trợ Giúp": Demo Menu 2010_2.rar ( Tác giả: MatTroiNguQuen)


Ghi chú:
Từ Access 2007 trở lên người ta không gọi là Menu bar nửa là thay vào đó là thanh Ribbon Access 2007 hoặc 2010.

Thân mến![/b]

Cho mình hỏi, Mình tải Cái menu này trên mạng về, nó rất hay và đúng ý của mình, nhưng không biết làm sao để chỉnh sửa thanh menu cho phù hợp. Mọi người có thể phân tích chút ít file này được không?
Cái này không có Macro, không biết nó ẩn hay sao, mình đã cho hện ra hết mà sao cũng không thấy, Không biết vào đâu để tạo menu. chứ cái menu này hay lắm.
Khi mở chương trình thì mọi người không thể xem được Ribbon, còn các thanh menu khác thì vẫn bấm chuột phải và chọn Customize the ribbon thì có thể cho hện ra hết được
file tải
Chữ ký của thanhtruong Xin chào, mình là thanhtruong, Tham gia http://thuthuataccess.com/forum từ ngày 23-06 -14.
Reply
Những người đã cảm ơn
#4
(28-06-17, 12:06 PM)thanhtruong Đã viết: u
(30-04-16, 09:07 PM)maidinhdan Đã viết:
(21-04-16, 03:16 PM)nguyenluyentkt Đã viết: Các bạn cho mình hỏi cách làm menu điều khiển trong access 2010 mà không dùng đến marcro, trên 2003 mình làm được mà 2010 chưa làm được vì không tìm thấy hộp thoại customize trong đó có thẻ toolbar.

Xem bài viết này: Cách tạo menu trong access 2007 ( cũng áp dụng cho Access 2010)

Demo thì tại bài này: Hiện Ribbon theo User đã phân quyền, phân quyền theo Danh sách lựa chọn. (Ribbon Access 2010)

[Hình: 3143359933_260396470_574_574.jpg]

Đây là file làm ví dụ về cho ẩn hoặc hiện Menu con: "Trợ Giúp": Demo Menu 2010_2.rar ( Tác giả: MatTroiNguQuen)


Ghi chú:
Từ Access 2007 trở lên người ta không gọi là Menu bar nửa là thay vào đó là thanh Ribbon Access 2007 hoặc 2010.

Thân mến![/b]

Cho mình hỏi, Mình tải Cái menu này trên mạng về, nó rất hay và đúng ý của mình, nhưng không biết làm sao để chỉnh sửa thanh menu cho phù hợp. Mọi người có thể phân tích chút ít file này được không?
Cái này không có Macro, không biết nó ẩn hay sao, mình đã cho hện ra hết mà sao cũng không thấy, Không biết vào đâu để tạo menu. chứ cái menu này hay lắm.
Khi mở chương trình thì mọi người không thể xem được Ribbon, còn các thanh menu khác thì vẫn bấm chuột phải và chọn Customize the ribbon thì có thể cho hện ra hết được
file tải

Bạn thân mến cái demo này của bạn không khác gì link tôi đã chỉ dẫn cho bạn,

Vui lòng xem lại; Xem bài viết này: Cách tạo menu trong access 2007 ( cũng áp dụng cho Access 2010)

Tôi xin lấy đoạn XML từ table UsysRibbons của file của bạn cho bạn xem như sau:
Mã PHP:
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="OnRibbonLoad">
  <ribbon startFromScratch="true">
  <officeMenu>
    <button idMso="FileOpenDatabase" visible="false"/>
    <button idMso="FileNewDatabase" visible="false"/>
    <splitButton idMso="FileSaveAsMenuAccess" visible="false"/>
  </officeMenu>
    <tabs>
      <tab id="tab1" getLabel="GetLabel" getVisible="GetVisible">
        <group id="grp1_1" getLabel="GetLabel">
          <button id="btn1_1_1" size="large" getLabel="GetLabel" getScreentip="GetScreentip" imageMso="DatabasePermissionsMenu" onAction="OnActionButton" />
          <button id="btn1_1_2" size="large" getLabel="GetLabel" getScreentip="GetScreentip" imageMso="PrintPreviewClose" onAction="OnActionButton" />
        </group>
      </tab>
      <tab id="tab2" getLabel="GetLabel" getVisible="GetVisible">
        <group id="grp2_1" getLabel="GetLabel" getVisible="GetVisible">
          <labelControl id="lbl2_1_3" getLabel="GetLabel" />
        </group>
        <group id="grp2_2" getLabel="GetLabel" getVisible="GetVisible">
        </group>
        <group id="grp2_3" getLabel="GetLabel" >
          <button id="btn1_1_3" size="large" getLabel="GetLabel" getScreentip="GetScreentip" imageMso="PrintPreviewClose" onAction="OnActionButton" />
        </group>
      </tab>
      <tab id="tab3" getLabel="GetLabel" getVisible="GetVisible">
        <group id="grp3_1" getLabel="GetLabel" getVisible="GetVisible">
          <labelControl id="lbl3_1_4" getLabel="GetLabel" />
        </group>
        <group id="grp3_2" getLabel="GetLabel" getVisible="GetVisible">
        </group>
        <group id="grp3_3" getLabel="GetLabel" getVisible="GetVisible">
        </group>
        <group id="grp3_4" getLabel="GetLabel" getVisible="GetVisible">
          <button id="btn1_1_4" size="large" getLabel="GetLabel" getScreentip="GetScreentip" imageMso="PrintPreviewClose" onAction="OnActionButton" /> 
       </group>
      </tab>
    </tabs>
  </ribbon>
</
customUI

Còn các đoạn code trong modules basRibbonCallbacks, bạn chỉ cần quan tâm đến các hàm sau;
1. OnActionButton: Để thực thi hành đồng khi click vào Buttom
2. GetVisible: Để ẩn/hiện theo từng User đăng nhập dựa trên table tblUsers.

Như vậy khi bạn thực hiện click nó sẽ map đến table UsysRibbons và nó sẽ dò đến tab mà bạn chọn sẽ thực hiện gọi hàm tương ứng.

Thực ra dùng Macro hày viết trong Modules nó đều như nhau cả. Và chúng ta là lập trình viên thì đừng vội, cái nào biết làm trước để hiểu, cái nào chưa biết thì so sánh thì nó sẽ ra thôi.

Đừng hấp tấp vội vàng.

Xin gửi tặng bạn Icon và Lists of Control IDs

Office 2007 Add-In: Icons Gallery:
https://www.microsoft.com/en-us/downl...

Office 2010 Add-In: Icons Gallery:
https://www.microsoft.com/en-us/downl...

Office 2007 Control ID spreadsheet:
http://www.microsoft.com/en-us/downlo...

Office 2010 Control ID spreadsheet:
http://www.microsoft.com/en-us/downlo...

Office 2013 Control ID spreadsheet:
http://www.microsoft.com/en-us/downlo...

Và đây là Video hướng dẫn sử dụng chúng

Thân mến!
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn thanhtruong
#5
Mình đã làm được menu như thế này
[Hình: Picture148927.png]

Nhưng cái nút đóng và cái nút in nó cứ nhảy lum ba đa hết

ở Mcr_dong : mình dùng Close
Ở Mcr_in : mình dùng printpreview

Nhưng khi click vào 2 nút này nó thế này: khi mình đang ở trên report thì bấm in nó lại in cái form nhập liệu, và khi đóng cái report này thì lại đóng hết cả chương trình, bắt buột mình phải làm thêm nút khởi động lại chương trình, đúng lý nó phải đóng cái reporrt đó rồi hiện lại cái form nhập liệu chứ.

Vậy cho hỏi? xửa lý 2 cái nút này như thế nào
Chữ ký của thanhtruong Xin chào, mình là thanhtruong, Tham gia http://thuthuataccess.com/forum từ ngày 23-06 -14.
Reply
Những người đã cảm ơn
#6
Thông thường thì mình nên tạo cái menu liên quan đến Print (gồm nhiều menu con trong đó) riêng, chỉ gọi menu này lên khi Report được Open.
Nếu để sẳn trên menu chính luôn thì nó choáng chỗ không cần thiết.
- Đối với nút [Đóng] nếu chỉ dùng lệnh Docmd.Close không chỉ định rõ đóng cái gì thì nó cứ đóng cái nào nó nghĩ là đang active.
Tôi sẽ dùng cái hàm sau để xác định Object nào đang On Screen Active rồi đóng nó. 

Mã PHP:
Public Sub CloseFormReport()

   Dim intState As Integer
   Dim intCurrentType 
As Integer
   Dim strCurrentName 
As String

   intCurrentType 
Application.CurrentObjectType
   strCurrentName 
Application.CurrentObjectName

   DoCmd
.Close intCurrentTypestrCurrentNameacSaveYes

End Sub 

- Từ 2 cái biến này bạn áp dụng cho nút Print Preview luôn.
Vd: 
Mã PHP:
DoCmd.SelectObject intCurrentTypestrCurrentName
DoCmd
.RunCommand acCmdPrintPreview 
Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake!
ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn maidinhdan , thanhtruong
#7
(05-07-17, 09:15 PM)ongke0711 Đã viết: Thông thường thì mình nên tạo cái menu liên quan đến Print (gồm nhiều menu con trong đó) riêng, chỉ gọi menu này lên khi Report được Open.
Nếu để sẳn trên menu chính luôn thì nó choáng chỗ không cần thiết.
- Đối với nút [Đóng] nếu chỉ dùng lệnh Docmd.Close không chỉ định rõ đóng cái gì thì nó cứ đóng cái nào nó nghĩ là đang active.
Tôi sẽ dùng cái hàm sau để xác định Object nào đang On Screen Active rồi đóng nó. 

Mã PHP:
Public Sub CloseFormReport()

   Dim intState As Integer
   Dim intCurrentType 
As Integer
   Dim strCurrentName 
As String

   intCurrentType 
Application.CurrentObjectType
   strCurrentName 
Application.CurrentObjectName

   DoCmd
.Close intCurrentTypestrCurrentNameacSaveYes

End Sub 

- Từ 2 cái biến này bạn áp dụng cho nút Print Preview luôn.
Vd: 
Mã PHP:
DoCmd.SelectObject intCurrentTypestrCurrentName
DoCmd
.RunCommand acCmdPrintPreview 

Ý là mình tạo cái module chứa code trên, rồi vào macro sửa lại cái mcr_đóng và in như thế nào vậy?
Mình hiểu ý, nhưng chưa biết bỏ cái code vào đâu và làm sao gọi nó ra.
Chữ ký của thanhtruong Xin chào, mình là thanhtruong, Tham gia http://thuthuataccess.com/forum từ ngày 23-06 -14.
Reply
Những người đã cảm ơn
#8
Tôi không dùng Macro lâu lắm rồi nên bây giờ kêu làm macro là pó chiếu luôn đó.  014 
Tôi dùng 1 cái thủ tục trong module và gọi nó khi 1 nút trên Ribbon menu được bấm.
Bạn xem trong đoạn code XML ở bài post trên của bác Dân có đoạn:

<button id="btn1_1_2" size="large" getLabel="GetLabel" getScreentip="GetScreentip" imageMso="PrintPreviewClose" onAction="OnActionButton" />

- Bạn sẽ sử dụng 2 cái tham số trong đó là: button id = “btn1_1_2” và cái tham số onAction=“OnActionButton” cho cái Sub tự tạo.
- Copy đoạn code này vào module:


Mã PHP:
Option Explicit
[/font][/font]


Public 
gobjRibbon As IRibbonUI



Public Sub OnRibbonLoad(ribbon As IRibbonUI)

   Set gobjRibbon ribbon

End Sub



Public Sub OnActionButton
(control As IRibbonControl)

On Error Resume Next



   Select Case control
.ID

       Case 
"btn1_1_2"  'Nút [Đóng]'

            Call CloseFormReport

       Case  
"btn1_1_4"

            ...

       Case "myButton3"

            ...

       Case "myInfoBtn"

            ..

End Select


[font=Tahoma][font=Tahoma]End Sub 
Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake!
ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn thanhtruong
#9
Ok. Mình làm được rồi. Xin đa tạ. tạo cái menu khó thật.!!
Chữ ký của thanhtruong Xin chào, mình là thanhtruong, Tham gia http://thuthuataccess.com/forum từ ngày 23-06 -14.
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Nhờ giúp dùm bài access mới tập làm nguyentrunghoadh 3 294 08-06-17, 03:14 PM
Bài mới nhất: tranthanhan1962
Lightbulb [Hỏi] Thắc mắc về bài tập Access Thanh Tu 1 147 12-05-17, 05:54 PM
Bài mới nhất: tranthanhan1962
  Mở thư mục trên máy tinh theo điều kiện ChiMai 7 505 25-03-17, 05:39 PM
Bài mới nhất: ongke0711
  viết chương trình QLkhachsan với điều kiện là mỗi phòng không được ở quá 3 người.... phong 2 464 23-03-17, 10:49 AM
Bài mới nhất: cpucloi
  [Help] Access cho nhiều người dùng và bảo mật toidjtjmtoi 3 388 22-03-17, 11:15 PM
Bài mới nhất: ongke0711

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ