Document.ProtectionType (Word)

Retorna o tipo de proteção para o documento especificado. Pode ser uma das seguintes constantes WdProtectionType : wdAllowOnlyComments, wdAllowOnlyFormFields, wdAllowOnlyReading, wdAllowOnlyRevisionsou wdNoProtection. Os valores de retorno possíveis são wdAllowOnlyComments - Permite que somente comentários sejam adicionados ao documento, wdAllowOnlyFormFields - Permite que o conteúdo seja adicionado ao documento somente através dos campos de formulário, wdAllowOnlyReading - Permite somente acesso de leitura ao documento, wdAllowOnlyRevisions - Permite que sejam feitas revisões somente ao conteúdo existente, wdNoProtection - Não aplica proteção ao documento.

If ActiveDocument.ProtectionType = wdNoProtection Then 
 ActiveDocument.Protect Type:=wdAllowOnlyComments 
End If