Ajouter un contrôle à une page
L’exemple suivant utilise la méthode Add de la collection Controls Microsoft Forms 2.0 pour ajouter un contrôle à un formulaire au moment de l’exécution.
Pour utiliser cet exemple, copiez-en le code vers l’éditeur de script d’un formulaire. Assurez-vous que le formulaire contient les éléments suivants :
- CommandButton nommé CommandButton1.
Dim Mycmd
Sub CommandButton1_Click()
Set Mycmd = Item.GetInspector.ModifiedFormPages("P.2").Controls.Add("Forms.CommandButton.1") ', CommandButton2, Visible)
Mycmd.Left = 18
Mycmd.Top = 150
Mycmd.Width = 175
Mycmd.Height = 20
Mycmd.Caption = "This is fun." & Mycmd.Name
End Sub
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.