XL 2019 Pb Combobox

YGBerard

XLDnaute Nouveau
Bonjour

J'ai un formulaire dans lequel il y a des Combobox.
Le principe est de consulter les données d'un véhicule après avoir choisi la plaque d'immatriculation dans une Combobox.
A chaque choix le formulaire se remplit des données récupérées.
Le problème est que les éléments des Combobox changent à chaque fois.
J'aimerai que la liste des éléments soit figée et même non modifiable.

Quelqu'un a un idée ?

Clt
 

ChTi160

XLDnaute Barbatruc
Bonjour YGberard
Bonjour le Forum
Bienvenue sur XLD
Nous ne sommes pas des devins lol
Un petit fichier aiderait !
Je pense deviner quand même qu'il s'agit de ComBobox en cascades! Un bon début non?
Bonne journée
Jean marie
 

YGBerard

XLDnaute Nouveau
Bonjour

Voici le code de remplissage de la Combobox qui me pose probleme

Public Sub UserForm_Initialize()

'------ Liste statut véhicule -----
ReDim Tableau(UBound(Tab_statut))
With Etat
.List() = Tableau
Select Case N_Ope
Case Is = 0 'En consultation tous les statuts sont selectionnables
For Count = 0 To UBound(Tab_statut)
.List(Count) = Tab_statut(Count)
Next Count
Case Is = 1 'En ajout seuls les statuts : "En circulation", "Libre", "En commande"; sont selectionnables
.List(0) = Tab_statut(2)
.List(1) = Tab_statut(3)
.List(2) = Tab_statut(6)
Case Is = 3 'En modification tous les statuts sont selectionnables sauf "Hors flotte"
Count = 0
For j = 2 To UBound(Tab_statut)
.List(Count) = Tab_statut(j)
Count = Count + 1
Next j
End Select
End With
End Sub
 

YGBerard

XLDnaute Nouveau
Voici le parametrage de la combobox et sa position dans le formulaire

1628667511220.png
 

ChTi160

XLDnaute Barbatruc
Re
Bonjour YGberard
Si j'ai bien compris il faut que je reproduise ce Userform et y coller la procédure(il y a des balises qui permettent de formater le Code que tu affiches sur le Forum) que tu as fournit ?
Bonne Journée
Jean marie
 

YGBerard

XLDnaute Nouveau
Bonjour

Je ne peux pas copier tous le code ce serait trop long
Mais voici des captures d'ecran.

Le formulaire vierge, la liste est complete et normale
1628687443978.png

Je selectionne un plaque et la liste à changée
1628687524128.png

J'aimerai que les éléments restent constants

Clt
 

ChTi160

XLDnaute Barbatruc
Bonjour YGberard
y'a pas beaucoup de gens ici qui travaillent sur Photo
tu ne peux pas joindre un fichier avec seulement quelques lignes de données anonymisées et le Userform Concerné ?
si non pas de possibilité de t'aider : seul changement dans ta Liste c'est qu'il y a deux fois "En Circulation" ! comment veux tu que l'on trouve le pourquoi du Comment ?
dans l'attente
jean marie
 

Discussions similaires

Statistiques des forums

Discussions
312 490
Messages
2 088 884
Membres
103 982
dernier inscrit
krakencolas