Share via


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