Como fechar um documento do Word com VBA

Escrito por tyler lacoma | Traduzido por ritaciro cavalcante
  • Compartilhar
  • Tweetar
  • Compartilhar
  • Pin
  • E-mail
Como fechar um documento do Word com VBA
Você pode usar o VBA para programar diversas funções no Word (computer image by blaine stiger from Fotolia.com)

O VBA (Visual Basic for Applications) é uma linguagem de programação usada, a princípio, para controlar certas funções do Excel, mas pode ser usada também para controlar outros recursos de programas como Word e PowerPoint. Algumas pessoas usam o VBA para efetuar funções específicas para o Word, que podem ser úteis para criar modelos de documentos ou executar funções analíticas.

Outras pessoas estão lendo

Usando o VBA

O código VBA é criado em janelas chamadas de módulos, que são interligados via comandos, formando um projeto VBA inteiro e designado a cumprir uma tarefa específica. Programas da Microsoft como o Excel e o Word contam com programas de edição de VBA, mas você deve ter alguma experiência com programação antes de começar um projeto VBA.

Quando um projeto VBA é completo, ele aparece como uma macro no Microsoft Word. Estas macros tem nomes específicos, os quais você pode digitar para chamá-las. Há também, na internet, uma grande variedade de macros prontas para serem usadas como blocos na construção do seu projeto VBA.

Criando comandos VBA para fechar o Word

Antes de fechar o documento Word, você pode querer salvá-lo.Você pode fazer isto com uma linha de código, usando o comando "saveas". Ele é parecido com o "doc.saveas(work_dir & "testdoc.doc")", mas ao invés de “testdoc” você pode determinar o nome do documento.

Para fechar o Word, "word.Quit" é o comando mais simples a ser dado. Mas você pode usar versões mais complexas. Há uma macro designada especificamente para fechar todos os documentos do Word e sair completamente do programa. Este é o módulo "CloseAll" e seu exato código é:

Sub CloseAll() 'Fechar todos os arquivos e desligar o Word

With Application .ScreenUpdating = False

'Repetir por todos os documentos Do Until .Documents.Count = 0 'Fechar sem salvar .Documents(1).Close SaveChanges:=wdDoNotSaveChanges Loop

'Sair do Word sem salvar .Quit SaveChanges:=wdDoNotSaveChanges End With End Sub

Esta versão do módulo não salva nenhum dos arquivos, mas você pode modificá-la para tal propósito. Uma vez salva como macro, aperte“ALT+F8” para abrir a janela de macros do Word, e selecione“CloseAll” e, depois, “Executar”. Isto fechará todos os documentos.

Não perca

Filtro:
  • Geral
  • Artigos
  • Slides
  • Vídeos
Mostrar:
  • Mais relevantes
  • Mais lidos
  • Mais recentes

Nenhum artigo disponível

Nenhum slide disponível

Nenhum vídeo disponível