This browser is no longer supported.
Upgrade to Microsoft Edge to take advantage of the latest features, security updates, and technical support.
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(297.6, 74%, 38%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3ENS%3C/text%3E%3C/svg%3E)
Hello support team I have error appear on every second run "Maxlocksperfile" error windows 10 office 2016 access with VBA and DAO with microsoft office 16 library referance I change the registry from 9500 to 40000 and not help can you help?
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(76.8, 73%, 17%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3ESQ%3C/text%3E%3C/svg%3E)
Since your issue is more related to VBA and DAO which our windows-10-general forum doesn't focus on. I will add VBA related tag to see if there is any VBA support engineer can help. Thanks for your understanding.
Hello SunnyQi-MSFT
Its looks that the problem is solved by VBA next command:
DAO.DBEngine.SetOption dbMaxLocksPerFile, 15000
Nir
Hi Nir,
Glad to hear that the issue has been resolved. You could accept the helpful answer as it would be helpful to anyone who encounters similar issues.
If there is anything else we can do for you, please feel free to post in the forum.
Best Regards,
Sunny