Microsoft 365 Liste dans combobox

[Chasse]

Bonjour le Forum

Avec ce code j’ai une liste déroulante dans mon comboBox

Private Sub UserForm_Initialize()
Dim gest As Object
Set gest = Sheets("Gestion")
Me.pose.List = gest.Range("A2:A" & gest.Cells(Application.Rows.Count, 1).End(xlUp).Offset(2, 0).Row).Value
End Sub

les lignes sont numérotées de 1 à 100 seulement il me manque quelques n°(25,32,51 etc.)

J’aimerais, que quand je démarre la procédure le premier chiffre manquant ici le 25, ou la liste des chiffres manquants s’affiche dans l’userform.
En copie une partie du fichier original
Merci de votre aide et mes Salutations les meilleures

 

[danielco]

Bonjour,

Ou veux-tu faire apparaître cette liste ?

Cordialement.

Daniel

 

[pierrejean]

Bonjour Chasse
En supposant avoir compris

 

[Chasse]

Bonjour Daniel
Dans cette userform

Merci et bon après-midi

 

[Chasse]

Merci Pierrejean
vous avez bien comprit

c'est bien ce que je cherchais à faire

Bonne fin de journée et à bientôt