Comment ajouter un bouton à un document Word et affecter son événement Click au moment de l'exécution

IMPORTANT : Cet article est issu d'une traduction automatique réalisée par un logiciel Microsoft et non par un traducteur professionnel. Cette traduction automatique a pu aussi être révisée par la communauté Microsoft grâce à la technologie Community Translation Framework (CTF). Pour en savoir plus sur cette technologie, veuillez consulter la page http://support.microsoft.com/gp/machine-translation-corrections/fr. Microsoft vous propose en effet des articles traduits par des professionnels, des articles issus de traductions automatiques et des articles issus de traductions automatiques révisées par la communauté Microsoft, de manière à ce que vous ayez accès à tous les articles de notre Base de connaissances dans votre langue. Il est important de noter que les articles issus de la traduction automatique, y compris ceux révisés par la communauté Microsoft, peuvent contenir des erreurs de vocabulaire, de syntaxe ou de grammaire. Microsoft ne pourra être tenu responsable des imprécisions, erreurs, ainsi que de tout dommage résultant d’une traduction incorrecte du contenu ou de son utilisation par les clients.

La version anglaise de cet article est la suivante: 246299
Résumé
Cet article explique comment vous pouvez utiliser une macro de Visual Basic pour Applications Microsoft pour ajouter un contrôle à un document Microsoft Word et ajouter un gestionnaire d'événements Click pour ce contrôle.
Plus d'informations
Les étapes suivantes illustrent comment vous pouvez créer une macro Word qui va ajouter un contrôle à un document et pour assigner l'événement Click du contrôle au moment de l'exécution. Les étapes sont pour Word. Toutefois, vous pouvez appliquer les mêmes concepts pour manipuler par programme les contrôles dans les classeurs Microsoft Excel.

Remarque La possibilité de manipuler le projet Visual Basic d'un document Microsoft Office au moment de l'exécution nécessite une référence à la de Visual Basic pour Applications Microsoft bibliothèque d'extensibilité.

Étapes pour créer l'exemple

  1. Démarrer un nouveau document dans Word.
  2. Appuyez sur Alt + F11 pour passer à l'éditeur de Visual Basic.
  3. Dans le menu Outils , cliquez sur références.
  4. Sélectionnez la référence pour Microsoft Visual Basic pour Applications Extensibility.
  5. Insérez un nouveau module, puis ajoutez l'exemple de code suivant.
    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. Exécuter la macro « Test ».
  7. Une fois la fin de la macro « Test », vous verrez un nouveau contrôle debouton de commande sur un nouveau document. Lorsque vous cliquez sur le contrôle CommandButton , l'événement Click de le déclenche de contrôle.

Remarques supplémentaires pour Word 2002 et Word 2003

Par défaut, l'accès à un projet VBA de Word est désactivée. Si désactivée, le code ci-dessus peut générer l'erreur d'exécution « 6068 », « L'accès par programme au projet de Visual Basic n'est pas un niveau de confiance ». Pour plus d'informations sur cette erreur et la façon dont vous pouvez corriger le problème, cliquez sur le numéro ci-dessous pour afficher l'article correspondant dans la Base de connaissances Microsoft :
282830 Accès par programme au projet Office VBA est refusé
exécution de vba kbmacro WD2003 WD2007

Avertissement : Cet article a été traduit automatiquement.

Propriétés

ID d'article : 246299 - Dernière mise à jour : 04/08/2016 01:59:00 - Révision : 6.0

Microsoft Office Word 2007, Microsoft Word 2002 Standard Edition, Microsoft Word 2000 Standard Edition

  • kbhowto kbmt KB246299 KbMtfr
Commentaires