Como salvar documentos do Visio programaticamente
Há várias maneiras de salvar documentos do Visio de Microsoft Office:
Salve alterações em um documento existente.
Salvar um novo documento ou salvar um documento com um novo nome.
Salve um documento com argumentos especificados.
Para obter mais informações, consulte a documentação de referência do VBA para o Microsoft.Office.Interop.Visio.Document.Save método, Microsoft.Office.Interop.Visio.Document.SaveAs método, e Microsoft.Office.Interop.Visio.Document.SaveAsEx método.
Salvar um documento existente
Para salvar um documento
Chamar o Microsoft.Office.Interop.Visio.Document.Save método da Microsoft.Office.Tools.Visio.Document a classe de um documento que foi salvo anteriormente.
Para usar este exemplo de código, executá-lo na ThisAddIn classe em seu projeto.
Observação O Microsoft.Office.Interop.Visio.Document.Save método lança uma exceção se um novo documento do Visio ainda não foram salvas.
Me.Application.ActiveDocument.Save()
this.Application.ActiveDocument.Save();
Salvar um documento com um novo nome.
Use o Microsoft.Office.Interop.Visio.Document.SaveAs método para salvar um novo documento ou um documento que tem um novo nome.Este método requer que você especifique o novo nome de arquivo.
Para salvar o documento ativo do Visio com um novo nome.
Chamar o Microsoft.Office.Interop.Visio.Document.SaveAs método da Microsoft.Office.Tools.Visio.Document que você deseja salvar, usando um caminho totalmente qualificado, incluindo um nome de arquivo.Se já existe um arquivo com esse nome nessa pasta, é sobrescrito silenciosamente.
Para usar este exemplo de código, executá-lo na ThisAddIn classe em seu projeto.
Dim docPath As String = System.Environment.GetFolderPath(System.Environment.SpecialFolder.MyDocuments) + "\test\MyDrawing.vsd" Me.Application.ActiveDocument.SaveAs(docPath)
string docPath = System.Environment.GetFolderPath(System.Environment.SpecialFolder.MyDocuments) + @"\test\MyDrawing.vsd"; this.Application.ActiveDocument.SaveAs(docPath);
Salvar um documento com um novo nome e argumentos especificados
Use o Microsoft.Office.Interop.Visio.Document.SaveAsEx método para salvar um documento com um novo nome e especifique quaisquer argumentos aplicáveis para aplicar ao documento.
Para salvar o documento com um novo nome e argumentos especificados
Chamar o Microsoft.Office.Interop.Visio.Document.SaveAsEx método da Microsoft.Office.Tools.Visio.Document que você deseja salvar, usando um caminho totalmente qualificado, incluindo um nome de arquivo.Se já existe um arquivo com esse nome nessa pasta, uma exceção é lançada.
O exemplo de código a seguir salva o documento ativo com um novo nome, marca o documento como somente leitura e mostra o documento na lista de documentos usados recentemente.Para usar este exemplo de código, executá-lo na ThisAddIn classe em seu projeto.
Dim newDocPath As String = System.Environment.GetFolderPath(System.Environment.SpecialFolder.MyDocuments) + "\test\MyOtherDrawing.vsd" Me.Application.ActiveDocument.SaveAsEx(newDocPath, CShort(Microsoft.Office.Interop.Visio.VisOpenSaveArgs.visSaveAsRO) + CShort(Microsoft.Office.Interop.Visio.VisOpenSaveArgs.visSaveAsListInMRU))
string newDocPath = System.Environment.GetFolderPath(System.Environment.SpecialFolder.MyDocuments) + @"\test\MyOtherDrawing.vsd"; this.Application.ActiveDocument.SaveAsEx(newDocPath, ((short)Microsoft.Office.Interop.Visio.VisOpenSaveArgs.visSaveAsRO + (short)Microsoft.Office.Interop.Visio.VisOpenSaveArgs.visSaveAsListInMRU));
Compilando o código
Este exemplo de código requer o seguinte:
- Para salvar um documento que tenha um novo nome, um diretório chamado Test deve estar localizado na pasta Meus documentos (para Windows XP e versões anteriores) ou na pasta de documentos (para Windows Vista).
Consulte também
Tarefas
Como criar novos documentos do Visio programaticamente
Como abrir documentos do Visio programaticamente
Como fechar documentos do Visio programaticamente
Como imprimir documentos do Visio programaticamente
Conceitos
Visão geral do modelo de objeto do Visio