إعدادات العميل

[رولي]

السلام عليكم
عاوزين واحد ابن حلال كده يعمل فيديو يشرح فيه إعدادات العميل كاملة مع تطبيق التغييرات عمليا. 

وهل توجد أكواد VBA يمكننا من خلالها تغيير إعدادات العميل تلقائيا (مثل ما نخفي الواجهة ونعطل الشيفت)؟ 

تم تعديل سبتمبر 23, 2023 بواسطه رولي
زيادة

[عمر ضاحى]

جرب هذا الكود

Sub ChangeAccessClientSettings()
    ' Set "Move After Enter" setting (True/False)
    Application.SetOption "MoveAfterEnter", False ' Change to True if you want to enable it
    
    ' Set arrow key behavior (0 = Normal, 1 = Move the control)
    Application.SetOption "ArrowKeyBehavior", 0 ' Change to 1 if you want to move the control
    
    ' Set default record locking (0 = No Locks, 1 = Edited Record, 2 = All Records)
    Application.SetOption "DefaultRecordLocking", 0 ' Change to the desired value
    
    ' Set default commit behavior (0 = Deferred, 1 = Immediate)
    Application.SetOption "DefaultCommitBehavior", 0 ' Change to the desired value
    
    ' Set default open mode for databases (0 = Exclusive, 1 = Shared)
    Application.SetOption "DefaultOpenMode", 0 ' Change to the desired value
    
    ' Set navigation keys (True/False)
    Application.SetOption "UseNewRow", True ' Change to False if you don't want to use the new row
    
    ' Save the changes
    Application.SaveUserOptions
End Sub