Sdílet prostřednictvím

Přidání tlačítka do wordového dokumentu a přiřazení jeho události Click za běhu

  • Článek
  • Platí pro:
    Microsoft Word

Souhrn

Tento článek ukazuje, jak lze pomocí makra Microsoft Visual Basic for Applications programově přidat ovládací prvek do dokumentu aplikace Microsoft Word a přidat Click obslužnou rutinu události pro tento ovládací prvek.

Další informace

Následující kroky ukazují, jak můžete vytvořit wordové makro, které přidá ovládací prvek do dokumentu a přiřadí událost Click daného ovládacího prvku za běhu. Postup je pro Word. Stejné koncepty však můžete použít k programové manipulaci s ovládacími prvky v sešitech aplikace Microsoft Excel.

Poznámka

Možnost manipulovat s projektem jazyka Visual Basic dokumentu Microsoft Office za běhu vyžaduje odkaz na knihovnu rozšiřitelnosti jazyka Microsoft Visual Basic for Applications.

Postup vytvoření ukázky

  1. Vytvořte nový dokument ve Wordu.

  2. Stisknutím kombinace kláves Alt+F11 přejděte do editoru jazyka Visual Basic.

  3. V nabídce Nástroje klikněte na Odkazy.

  4. Vyberte odkaz na rozšiřitelnost jazyka Microsoft Visual Basic for Applications.

  5. Vložte nový modul a potom přidejte následující příklad kódu.

    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 = "Click Here"

'Add a procedure for the click event of the inlineshape
'**Note: The click event resides in the This Document module
Dim sCode As String
sCode = "Private Sub " & shp.OLEFormat.Object.Name & "_Click()" & vbCrLf & _
        "   MsgBox ""You Clicked the CommandButton""" & vbCrLf & _
        "End Sub"
doc.VBProject.VBComponents("ThisDocument").CodeModule.AddFromString sCode

End Sub

  6. Spusťte makro Test.

  7. Po dokončení spuštění makra Test se v novém dokumentu zobrazí nový ovládací prvek CommandButton . Po kliknutí CommandButton řízení, Click událost ovládacího prvku se aktivuje.

Další poznámky pro Word 2002 a Word 2003

Ve výchozím nastavení je přístup k projektu VBA ve Wordu zakázaný. Pokud je zakázaný, výše uvedený kód může vygenerovat chybu za běhu 6068, že programový přístup k projektu jazyka Visual Basic není důvěryhodný. Další informace o této chybě a o tom, jak ji můžete opravit, získáte v následujícím článku znalostní báze Microsoft Knowledge Base:

282830 Programový přístup k projektu Office VBA byl odepřen