Excel 2016 Open Read Only file

[twistedtrev]

Why don't you use ?

Sub M_snb()
  with getobject("G:\OF\example.xlsx")
     sn=.sheets(1).usedrange
    .close 0
  end with
End Sub

Snb

Thank you for your reply. I've tried your suggestion but I can't get it to work any better. It's frustrating that on my PC, the code is fine. It does exactly what I want it to do, which is to open a Write-Restricted workbook as read only, compare cell values against values on another workbook, and if they don't exist, it copies those values across.
The problem really feels like a difference between the way office 365 & 2016 work. Although I can't see why.

Cheers Trev