[Anderson Paraibano]

Resolvido: Como editar/inserir objetos de equação Mathtype com uma macro VBA no MS-Word

Introdução:
A criação de documentos técnicos e científicos muitas vezes requer a inserção de equações matemáticas e símbolos especiais. O Mathtype é uma ferramenta popular para a criação desses elementos em documentos do Microsoft Word. No entanto, quando se trabalha com uma grande quantidade de equações, a edição manual pode se tornar demorada e propensa a erros. Felizmente, é possível automatizar esse processo usando macros VBA (Visual Basic for Applications) no MS-Word. Neste artigo, exploraremos como editar e inserir objetos de equação Mathtype usando macros VBA, proporcionando uma solução eficiente para a criação de documentos matemáticos.

Passo 1: Habilitando as ferramentas necessárias
Antes de começarmos a escrever macros VBA, é importante garantir que todas as ferramentas necessárias estejam habilitadas no Microsoft Word. Verifique se o suplemento “Mathtype Commands for Word” está instalado e ativado. Você pode fazer isso acessando a guia “Suplementos” nas opções do Word.

Passo 2: Abrindo o Editor VBA
Para começar a escrever a macro, abra o editor VBA no Microsoft Word. Você pode fazer isso clicando em “Desenvolvedor” na faixa de opções e, em seguida, selecionando “Editor VBA”. Se a guia “Desenvolvedor” não estiver visível, você pode ativá-la nas opções do Word.

Passo 3: Escrevendo a macro VBA
Agora que o editor VBA está aberto, você pode começar a escrever a macro para editar ou inserir objetos de equação Mathtype. A macro pode ser personalizada de acordo com suas necessidades específicas. Aqui está um exemplo básico para inserir uma equação Mathtype em um documento:

vba
Copy code
Sub InserirEquacaoMathtype()
‘ Ativa o suplemento Mathtype
Application.ActivateMicrosoftMathTypeEquations

‘ Insere uma nova equação
Selection.InlineShapes.AddOLEObject ClassType:=”Equation.Document”
End Sub
Esta macro primeiro ativa o suplemento Mathtype usando o método ActivateMicrosoftMathTypeEquations. Em seguida, insere uma nova equação usando o método InlineShapes.AddOLEObject. Você pode executar essa macro pressionando “F5” no editor VBA ou atribuindo-a a um botão ou atalho no Word.

Passo 4: Personalizando a macro
Além da inserção básica de uma equação, você pode personalizar a macro para editar ou formatar equações existentes. O Mathtype oferece uma API que permite acessar e modificar propriedades específicas de uma equação. Por exemplo, você pode alterar a fonte, o tamanho ou adicionar símbolos especiais.

vba
Copy code
Sub EditarEquacaoMathtype()
‘ Ativa o suplemento Mathtype
Application.ActivateMicrosoftMathTypeEquations

‘ Seleciona a equação existente
Selection.InlineShapes(1).OLEFormat.DoVerb verb:=wdOLEVerbPrimary

‘ Realiza alterações na equação
‘ Exemplo: alterar a fonte para “Arial”
Selection.OMaths(1).Range.Font.Name = “Arial”
End Sub
Neste exemplo, a macro seleciona a primeira equação inline (InlineShapes(1)) e abre a janela de edição da equação usando o método DoVerb. Em seguida, a macro altera a fonte da equação para “Arial” modificando a propriedade Font.Name do objeto OMaths(1).Range.

Conclusão:
O uso de macros VBA no Microsoft Word oferece uma maneira poderosa de automatizar a edição e inserção de objetos de equação Mathtype. Através da ativação do suplemento Mathtype e do acesso à API, é possível criar macros personalizadas que agilizam o processo de criação de documentos matemáticos e científicos. Ao adaptar as macros conforme suas necessidades, você pode otimizar a produtividade e minimizar possíveis erros ao trabalhar com equações complexas no MS-Word.

Lembre-se de salvar seu documento com as macros habilitadas como um arquivo com a extensão “.docm” para garantir que as macros funcionem corretamente.

[Autor]

Posts