ReadOnly Property [Publisher 2003 VBA Language Reference]
Returns True if the publication is read-only; False if it is read-write. Read-only Boolean.
expression.ReadOnly
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example saves the active publication and notifies the user that the file is saved and if it is read-only or not.
Sub SaveAndStatus()
Dim bStatus As Boolean
Application.ActiveDocument.SaveAs "c:\testfile.pub"
bStatus = Application.ActiveDocument.ReadOnly
MsgBox "File Saved and Read-only Status = " & bStatus
End Sub
Applies to | Document Object