Microsoft 365 Liste dans combobox

Chasse

XLDnaute Occasionnel
Bonjour le Forum

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

VB:
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
 

Pièces jointes

  • Gestion Essai.xlsm
    22.1 KB · Affichages: 15

Chasse

XLDnaute Occasionnel
Bonjour Daniel
Dans cette userform
1600179618102.png


Merci et bon après-midi
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
297 988
Messages
1 964 906
Membres
200 747
dernier inscrit
mtb60