Método Application.Open (Publisher)

Retorna um objeto Document que representa a publicação recém-aberta.

Sintaxe

expressão. Abrir (FileName, ReadOnly, AddToRecentFiles, SaveChanges, OpenConflictDocument)

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
FileName	Obrigatório	String	O nome da publicação (os caminhos são aceitos).
ReadOnly	Opcional	Boolean	True para abrir a publicação como somente leitura. O padrão é False.
AddToRecentFiles	Opcional	Boolean	True (padrão) para adicionar o nome do arquivo à lista de arquivos usados recentemente na parte inferior do menu Arquivo .
SaveChanges	Opcional	PbSaveOptions	Especifica o que o Microsoft Publisher deve fazer se já houver uma publicação aberta com alterações que não foram salvas. Pode ser uma das constantes PbSaveOptions declaradas na biblioteca de tipos publisher.
OpenConflictDocument	Opcional	Boolean	True para abrir a publicação de conflito local se houver um conflito offline. Padrão é False.

Valor de retorno

Documento

Comentários

Como o Publisher tem uma única interface de documento, o método Open funciona apenas quando você abre uma nova instância do Publisher. O exemplo de código a seguir mostra como criar uma nova instância visível do Publisher.

Quando concluído com a segunda instância, você pode definir a propriedade Visible da janela do aplicativo como False, mas o processo continua a ser executado em segundo plano, mesmo que não esteja visível. Para fechar a segunda instância, você deve definir o objeto igual a Nothing.

Exemplo

Este exemplo cria uma segunda instância do Publisher e abre a publicação especificada como somente leitura. Para que esse exemplo funcione, substitua PathToFile pelo caminho para uma publicação existente.

Sub OpenNewPub() 
 Dim appPub As New Publisher.Application 
 appPub.Open FileName:="PathToFile", _ 
 ReadOnly:=True, AddToRecentFiles:=False, _ 
 SaveChanges:=pbPromptToSaveChanges 
 appPub.ActiveWindow.Visible = True 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.