Come creare un pulsante con MS Word utilizzando Visual Basic

May 26

Microsoft Word è uno dei principali applicazioni di word processor in tutto il mondo. La funzionalità incluse nel prodotto consente operazioni più comuni da svolgere. Il linguaggio di programmazione Visual Basic Microsoft fornisce estensibilità per estendere il prodotto Word per eseguire funzioni complesse avanzate, personalizzato e. Le piccole applicazioni che prevedono l'elaborazione del testo possono essere costruiti utilizzando Word e Visual Basic. Automazione di funzioni in un ufficio può essere gestita utilizzando la potenza di Visual Basic in Word, risparmiando tempo e denaro.

istruzione

1 Aprire l'applicazione Microsoft Word e creare un nuovo documento utilizzando il modello vuoto.

2 Aprire l'editor di Visual Basic utilizzando i tasti "F11" "Alt" e.

3 Selezionare "Strumenti" nella barra dei menu, quindi fare clic sulla voce "di riferimento". Scorrere i riferimenti disponibili alla voce "Microsoft Visual Basic per Applications Extensibility". Dopo aver selezionato la voce, fare clic sul pulsante "OK".

4 Selezionare "Insert" dalla barra dei menu e scegliere l'opzione "Modulo".

5 Inserire il seguente codice per creare un pulsante che se cliccato verrà visualizzato un messaggio di testo:

Sub Test ()

'Add a command button to a new document
Dim doc As Word.Document
Dim shp As Word.InlineShape
Set doc = Documents.Add

Set shp = doc.Content.InlineShapes.AddOLEControl (ClassType: = "Forms.CommandButton.1")
shp.OLEFormat.Object.Caption = "Clicca qui"

'Aggiungi un procedimento per l'evento click del InlineShape
'** Nota: L'evento click risiede nel modulo di questo documento
Dim sCode As String
sCode = "Private Sub" & amp; shp.OLEFormat.Object.Name & amp; "_CLICK ()" & Amp; vbCrLf & amp; _
"MsgBox" "si è fatto clic sul pulsante di comando" "" & amp; vbCrLf & amp; _
"End Sub"
doc.VBProject.VBComponents ( "ThisDocument"). CodeModule.AddFromString sCode

End Sub

6 Eseguire il codice con il tasto "F5". Selezionare la macro "Test" dall'elenco dei menu e fare clic su "Esegui".

7 Fare clic sul pulsante "Clicca qui" nel nuovo documento di Word visualizzato sullo schermo. Una finestra di messaggio verrà visualizzato con il testo "si è fatto clic sul pulsante di comando."

Consigli e avvertenze

  • La semplice esecuzione di un messaggio di testo in questo esempio può essere sostituito con diverse funzionalità disponibili dal linguaggio Visual Basic.