• Tắt mở Ribbon và thanh Navigation của Access 2007 trở về sau
  • Tắt mở Ribbon và thanh Navigation của Access 2007 trở về sau

    lehongduc > 21-11-17, 10:37 AM

    Chào các Bạn,

    Nhiều Bạn muốn tắt/mở Ribbon và thanh Navigation của MS. Access từ 2007 trở về sau.
    Sau đây là 1 giải pháp nhanh gọn tôi đã áp dụng.

    Trước hết, xin mời các Bạn xem giao diện ứng dụng tôi thiết kế trong MS. Access 2016 nhé:

    [Hình: nnbmfa919hejzrr4g.jpg]

    Và sau đây là Code:
    Mã:
    Function DisSecurityAlert()
    On Error Resume Next
    'msoAutomationSecurityByUI = 2
    'msoAutomationSecurityForceDisable = 3
    'msoAutomationSecurityLow = 1
    If Application.Version >= 10 Then
        Application.AutomationSecurity = 1 'msoAutomationSecurityLow
    End If
    End Function

    Function RibbonAndNavigationOff()
    With DoCmd
        .NavigateTo "acNavigationCategoryObjectType"
        .RunCommand acCmdWindowHide
        .ShowToolbar "Ribbon", acToolbarNo
    End With
    End Function

    Function RibbonAndNavigationOn()
    With DoCmd
        .SelectObject acTable, , True
        .ShowToolbar "Ribbon", acToolbarYes
    End With
    End Function

    Trong 3 Functions nêu trên có Function DisSecurityAlert dùng để tắt cảnh báo bảo mật của MS. Access mỗi khi ta thực hiện các tác vụ liên kết hoặc mở các database ngoài ứng dụng
  • RE: Tắt mở Ribbon và thanh Navigation của Access 2007 trở về sau

    ongke0711 > 21-11-17, 12:05 PM

    - Giao diện thoáng đãng để nhìn, dễ tập trung, màu sắc dịu mắt đó anh.
    - Thích cái font "CHI CỤC THUẾ....". Font Vni Helve Condense hả anh?
  • RE: Tắt mở Ribbon và thanh Navigation của Access 2007 trở về sau

    lehongduc > 21-11-17, 02:56 PM

    (21-11-17, 12:05 PM)ongke0711 Đã viết: - Giao diện thoáng đãng để nhìn, dễ tập trung, màu sắc dịu mắt đó anh.
    - Thích cái font "CHI CỤC THUẾ....". Font Vni Helve Condense hả anh?

    Chào Bạn,
    Dòng đó tôi sử dụng Font Impact
    Xin chú ý: Tôi đính kèm theo đây file nén Font Impact cho Unicode, Bạn install font này thay cho font cùng tên hiện có trên Windows, vì font Impact mặc định của Windows không hỗ trợ Unicode.