Microsoft Word é um dos principais aplicativos de processador de texto do mundo. A funcionalidade incluídos no produto permite que as tarefas mais comuns para ser realizado . A linguagem de programação Visual Basic Microsoft fornece extensibilidade para estender o produto Word para executar funções avançadas, personalizadas e complexas. Pequenas aplicações que envolvem o processamento de texto pode ser construído usando o Word e Visual Basic. Automação de funções em um escritório pode ser tratada usando o poder do Visual Basic no Word, economizando tempo e dinheiro . Coisas que você precisa
Microsoft Word 2000 ou versão posterior
Show Mais instruções
1
Abra o aplicativo Microsoft Word e crie um novo documento usando o modelo em branco. < Br > Página 2
Abra o editor Visual Basic usando as teclas " F11 " "Alt" e .
3
Selecione "Ferramentas" na barra de menu , em seguida, clique no rubrica de " referência" . Percorra as referências disponíveis para a entrada de "Microsoft Visual Basic for Applications extensibilidade . " Após selecionar o item , clique no botão "OK" .
4
Selecione a opção " Inserir" na barra de menu e clique na opção "Módulo " .
5
Insira o seguinte código para criar um botão que, quando clicado irá exibir uma mensagem de texto :
Sub Test ( )
'Adicionar um botão de comando para um novo doc documentDim Como Word.DocumentDim shp Como Palavra . InlineShapeSet doc = Documents.Add
Definir shp = = " Clique Aqui "
'Adicionar um procedimento para o evento clique do InlineShape ' ** Nota: O evento clique reside no presente documento moduleDim sCode Como StringsCode = " Private Sub " & shp.OLEFormat . Object.Name & " _Click ()" & vbCrLf & _ " MsgBox" " Você clicou no CommandButton " "" & vbCrLf & _ " End Sub" doc.VBProject.VBComponents ( " ThisDocument " ) . CodeModule . AddFromString sCode
End Sub
6
Execute o código usando a tecla "F5" . Selecione a macro "Teste" na lista de menu e clique em " Executar".
7
Clique no botão " Clique aqui" no novo documento do Word exibida na tela . Uma caixa de mensagem aparecerá com o texto "você clicou no CommandButton. "