Lassé de perdre du temps à la mise à jour de la propriété ColumnWith d’un contrôle ListBox ou ComboBox ?

Voici une procédure d’adaptation automatique de cette propriété en fonction de la largeur des colonnes de la liste de données définies dans la propriété RowSource de ce même contrôle (Autrement dit la largeur des colonnes de la feuille d’excel).

Rappel

La propriété ColumnWidth permet de définir la largeur des colonnes d’un contrôle ListBox ou ComboBox. Par défaut la largeur des colonnes est de 72 points (72 points=1 pouce).

Lorsque nous décidons d’avoir plus d’une colonne, nous devons modifier la valeur de la propriété ColumnCount du dit contrôle.

Codes de la procédure AutoColumnWidth

A placer dans le formulaire (UserForm) ou dans un module standard

La largeur de chaque colonne du ListBox ou ComboBox s’adaptera automatiquement à celle des colonnes de votre feuille

Procédure d’appel de cette fonction

Dans cette ligne de code, cboBox est le nom du contrôle (ici un contrôle ComboBox) et rngData est la variable objet représentant la liste des données.

Classeur exemple à télécharger