Ouvrir un UserForm depuis un bouton

Ecrivain77 · January 24, 2019, 1:33pm

Bonjour,
J’aimerai connaitre la macro pour ouvrir un UserForm depuis un bouton.
Merci
Cordialement.

Ecrivain77 · January 24, 2019, 4:42pm

Bonjour,

J'ai trouvé.

    Sub Ouverture
Dim oLib
Dim oLibDlg
DialogLibraries.loadLibrary("Standard")
oLib = DialogLibraries.getByName("Standard")
oLibDlg = oLib.getByName("Dialog")
oDialog = CreateUnoDialog(oLibDlg)
oDialog.execute()
End Sub

Merci

Ecrivain77 · February 27, 2019, 10:32am

Bonjour,
Merci pour votre aide, mais je ne sais pas comment l’attribuer au code du bouton.

jmp · February 21, 2019, 3:00pm

Bonjour,

Si on a plusieurs formulaires à ouvrir,il est possible de choisir l’ouverture par Tag.

Avantage : une seule Macro va suffire, car elle varécupérer le nom du formulaire à ouvrir dans Information du Contrôle Button.

Ecrivain77 · February 28, 2019, 1:33pm

Bonjour, Merci pour votre aide, mais je ne sais pas comment l’attribuer au code du bouton.