Usando scripts para gerenciar as opções de AutoTexto do Word

  • Artigo

Scripts VBScript de exemplo que demonstram como você pode recuperar e configurar as opções de AutoTexto do Microsoft Word 2003.

Mapeando a caixa de diálogo para o modelo de objeto do Word

As opções mencionadas nos seguintes scripts correspondem às opções localizadas na guia AutoTexto da caixa de diálogo Correção Automática. Para acessar essas opções no Microsoft Word 2003, clique em Ferramentas, clique em Opções de Correção Automática e clique na guia AutoTexto. Um mapeamento entre as opções disponíveis nesta caixa de diálogo e o modelo de objeto do Microsoft Word é mostrado abaixo. Se você não conseguir ler o gráfico (provavelmente será o caso),

imageFile

Os scripts mostrados nesta página foram testados com o Microsoft Word 2003. Pelo menos algumas das funcionalidades poderão funcionar em qualquer versão do Microsoft Word que ofereça suporte ao Visual Basic for Applications (VBA); no entanto, os scripts não foram testados com nenhuma outra versão.

Código de exemplo para recuperar valores

Script de exemplo que recupera as informações de configuração encontradas na caixa de diálogo AutoTexto do Microsoft Word 2003.

On Error Resume Next

Set objWord = CreateObject("Word.Application")
Set objOptions = objWord.Options
Set objDoc = objWord.Documents.Add()

Wscript.Echo"Show AutoComplete suggestions: " & _
     objWord.DisplayAutoCompleteTips
For Each strEntry in objWord.NormalTemplate.AutoTextEntries
    Wscript.Echo "AutoText entry: " & strEntry.Name
Next

objWord.Quit

Código de exemplo para modificar valores

Script de exemplo que define a opção Mostrar sugestões de AutoCompletar no Microsoft Word como FALSE.

On Error Resume Next

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Add()
objWord.DisplayAutoCompleteTips = FALSE

objWord.Quit

Não há suporte para scripts de exemplo em qualquer serviço ou programa de suporte padrão da Microsoft. Os scripts de exemplo são fornecidos NO ESTADO EM QUE SE ENCONTRAM sem garantia de qualquer tipo. A Microsoft isenta-se também de todas as garantias implícitas, sem limitação, de comercialização ou adequação a uma finalidade específica. É todo seu o risco decorrente do uso ou do desempenho dos scripts de exemplo e da documentação. Em hipótese alguma a Microsoft, os autores ou qualquer pessoa envolvida na criação, produção ou entrega dos scripts serão responsáveis por qualquer dano (incluindo, sem limitação, danos por perda de lucros do negócio, interrupção dos negócios, perda de informações comerciais ou outras perdas financeiras) decorrentes do uso ou da inabilidade de usar os scripts de exemplo ou a documentação, mesmo que a Microsoft tenha sido avisada da possibilidade desses danos.