LIstbox réduite par multiselect

4 pièce(s) jointe(s)

Bonjour à tous,

je suis en plein élaboration d'un formulaire de saisi sur Excel.

J'ai une incompréhension concernant l'usage des cases à cocher sur une listbox.

Le fichier est en PJ, lancement du formulaire par le bouton du 1er onglet.

J'ai associé le code suivant au bouton 1.
Pièce jointe 628184

Citation:

Private Sub CommandButton1_Click()
ListBox2.RowSource = Workbooks("Loadkizeo.xlsm").Sheets("Push").Range("A1:R19").address
End Sub

Rien de compliqué donc cela fonctionne, mais la taille de la fenêtre est réduite de moitié lorsque j'utilise les paramètres suivants :
Pièce jointe 628185

Voila le résultat.... Si quelqu'un a une piste pour résoudre cela....
Pièce jointe 628186

Merci

Hello,
si tu mets le paramètre columncount de ta Listbox à 18 il n'y a pas plus le problème.
D'autre part dans ton paramétrage par code de la largeur des colonnes il y a des erreurs (100100 par exemple).
Ami calmant, J.P

Nickel,

merci à toi.