Bonjour,

J'essaie tant bien que mal à concevoir un formulaire. Mon classeur contient 2 feuilles.
La 1ère feuille nommée Listes me servira pour afficher de source pour ComboBox.
La 2ème feuille nommée Données sert à alimenter les données via le formulaire SaisieInfos.

Ce code est contenu dans le module de classe ThisWorkbook :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Option Explicit
Sub Affiche_Formulaire
'Affiche le formulaire SaisieInfos
SaisieInfos.Show
End Sub

Code associé au formulaire SaisieInfos
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub UserForm_Initialize()
Dim rng As Range
 
Set rng = ThisWorkbook.Worksheets("Listes").Range("B1").CurrentRegion
With rng
Distributeur.RowSource = .Offset(1).Resize(.Rows.Count  -1).Address(external:=True)
End With
End Sub

Lorsque que j'exécute la macro ThisWorkbook.Affiche_Formulaire, la ComboBox est alimentée si la colonne A:A est remplie. Seulement, c'est la colonne B:B que je souhaiterais voir dans la ComboBox.

D'où vient le problème ? Comment corriger à partir de mon exemple ?

Vous en remerciant par avance de l'aide apportée

Cordialement.