dionys0s
XLDnaute Impliqué
Bonsoir le forum
J'ai un problème avec un userform.
J'ai une ListBox qui s'alimente correctement à l'initialisation du UserForm, et j'aimerais ajuster la hauteur de cette ListBox en fonction du nombre d'items, soit la macro suivante :
Et à l'ouverture du UserForm, la hauteur n'est pas modifiée.
Lorsque je fais l'ouverture du UserForm pas à pas (avec F8), ça marche, mais pas si j'utilise le bouton prévu pour ouvrir le UserForm.
Merci pour votre aide, je pense que le fichier joint sera utile.
dionys0s
J'ai un problème avec un userform.
J'ai une ListBox qui s'alimente correctement à l'initialisation du UserForm, et j'aimerais ajuster la hauteur de cette ListBox en fonction du nombre d'items, soit la macro suivante :
Code:
Private Sub UserForm_Initialize()
Dim Banque As Range
For Each Banque In Range("Banques")
ListBox_Banques.AddItem (Banque)
Next Banque
ListBox_Banques.Height = ListBox_Banques.ListCount * ListBox_Banques.Font.Size * 1.25
Application.ScreenUpdating = True
End SubEt à l'ouverture du UserForm, la hauteur n'est pas modifiée.
Lorsque je fais l'ouverture du UserForm pas à pas (avec F8), ça marche, mais pas si j'utilise le bouton prévu pour ouvrir le UserForm.
Merci pour votre aide, je pense que le fichier joint sera utile.
dionys0s
Dernière édition: