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

Statistiques des forums

Discussions
298 813
Messages
1 971 984
Membres
203 578
dernier inscrit
theo90170