Bonjour, j'essaie de contrôler les propriétées d'un userform depuis un autre module mais cela ne fonctionne pas entierement comme je le voudrais. J'arrive à contrôler l'userform en entrant directement son nom avec la propriété que je veux modifier, mais je n'arrive pas à le faire avec une variable qui prendrait le nom de l'userform qui est déjà ouvert (pour pouvoir d'avoir une procédure paramétrée avec entre autres paramètres le nom de l'userform).
Voici le code sur lequel j'essai. Un userform nommé "Usf_Test", un bouton nommé "Btn_Test". Dans un autre module, une procédure paramétrée Move_USF.
Code VBA : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Private Sub Btn_Test_Click() Dim Usf As String Usf = Me.Name Call Move_USF(Usf) End Sub Sub Move_USF(Usf As String) Dim MonUsf As Object Set MonUsf = UserForms(Usf) '?????????? Je sais que ce n'est pas comme ça mais je ne trouve pas With MonUsf .Width = .Width - 12 .Height = .Height - 10 .Zoom = 80 End With End Sub
Merci de votre aide
Partager