Свойство RecordsetType не найдено как допустимое свойство в QueryDefs

Question

Я пытаюсь заблокировать свои запросы во внешнем интерфейсе MS Access 2016, чтобы пользователи могли видеть только снимок запросов и не могли редактировать код SQL или данные в запросах. Однако я сталкиваюсь с проблемами с моим кодом VBA:

'Lock queries
For Each oQD In CurrentDb.QueryDefs
    'If Left(oQD.Name, 3) = "qry" Then
    If Left(oQD.Name, 1) <> "~" Then
        Set oProp = oQD.Properties("RecordsetType")
        If Err Then
            Set oProp = oQD.CreateProperty("RecordSource", dbText, "Snapshot")
            oQD.Properties.Append oProp
        Else
            oProp.Value = 2
        End If
    End If
Next oQD

, который возвращает ошибку времени выполнения «3270»: свойство не найдено для «RecordsetType». Кто-нибудь может помочь с этим?