Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 VBA données ne remontent pas correctement dans Labels

Piment

XLDnaute Occasionnel
Bonjour à tous,
Une fois de plus, je reviens vers vous afin de m'aider à résoudre un problème de données qui ne remontent pas correctement dans mes Labels.
Je rappelle que je suis novice en VBA, aussi je vous demande toute votre indulgence.
Je bricole, je bricole...
Mon problème: dans mon USF "Visualiser Agent" j'ai mis en place 3 Frames afin de regrouper mes données: Frame Mobilier, Frame Informatique, Frame Téléphonie.
Les données sont issues du tableau se trouvant sur la feuille "Recensement".
Cet USF "Visualiser Agent" permet de visualiser tout le matériel affecté à un agent. Un autre USF("Visualiser Direction") permet lui de regrouper le matériel par direction, par Service et par Cellule, sur le même principe.
Mon problème est que lorsqu'une colonne du tableau sur la feuille "Recensement" n'est pas renseignée, il m'affiche le Label quantité et Désignation vide, ce qui est tout à fait logique. Mais ce que j'ai fait est que lorsque c'est le cas, le Label vide est rempli par les valeurs du Label qui suit, et les autres Label suivent le même mouvement. Ainsi, je n'ai pas de "trous" dans la raquette, et offrent un meilleur confort de lecture: Bureau="", Fauteuil remonte dans le Label Bureau qui est vide, Chaises remonte alors dans le Label Fauteuil....
Tout fonctionne correctement, sauf à partir de PC Fixe où là cette remontée ne se fait pas. Pareil pour Téléphonie.
Je pense que c'est lié aux Frames, mais en faîte je n'en sais rien.
Pardon pour les puristes, c'est une usine à gaz que j'ai construit, j'en ai bien conscience, mais je n'ai pas les compétences pour faire mieux.
Aussi n'hésitez pas à me faire des propositions pour simplifier tout çà. J'apprendrais encore.
Merci beaucoup pour votre aide.
 

Pièces jointes

  • Recensement Matériel V15 - Copie.xlsm
    180.4 KB · Affichages: 22
Solution
Re

ton problème vient du fait que tu as affecté Un Label (voir nom des labels) par Colonne ! Donc si la cellule de la Colonne est Vide et bien ton label sera Vide.
C'est pourquoi, je crois, que j'avais affecté les Cellules au Label (vide suivant) dans mon exemple ;
Labels Numéroté de 1 à x je crois)
Si tu as 5 cellules Pleines sur l'ensemble seuls les 5 premiers labels seront remplis.
Enfin je crois avoir fait ainsi !
voir vidéo :
Bonne continuation
Jean marie

ChTi160

XLDnaute Barbatruc
Re
Je pourrai enlève les TOUS ET TOUTES .
C'est ce qui permet d'avoir le décompte des éléments de l'ensemble des Directions ,Services et Cellules .
Pour ce qui est de :
Je viens de me rendre compte que le bouton "Initialiser" ne fonctionne pas sur l'USF "Visuel_MatCollectif", ainsi que "Tous" dans les ComboBox.
Sûrement un oubli de code de ma part.
Je regarde !
Bonne fin de soirée
Jean marie
 

ChTi160

XLDnaute Barbatruc
Re
je viens de vérifier le Userform "Visuel_MatCollectif"
tu dis :
Je viens de me rendre compte que le bouton "Initialiser" ne fonctionne pas sur l'USF "Visuel_MatCollectif", ainsi que "Tous" dans les ComboBox.
Et tout a l'ai de fonctionner chez moi Lol
Voir vidéo
Jean marie
 

Pièces jointes

  • piment-12.gif
    387.5 KB · Affichages: 21

ChTi160

XLDnaute Barbatruc
Bonjour Claude
J'ai trouvé sur "Développer.com" un Fichier de M. SilkyRoad .
Que l'on pourrait peut-être adapter pour répondre à ton Besoin !
Voir Vidéo !
J'y regarde dès que possible
Jean marie
 

Pièces jointes

  • piment-13.gif
    135.4 KB · Affichages: 19

Piment

XLDnaute Occasionnel
Bonjour Jean-Marie,
Désolé de te répondre si tardivement, mais hier, je n'étais pas du tout disponible (série d'examens de contrôle suite à mon opération du mois de Mai).
Pour répondre à ton post 62, chez moi le bouton initialiser ne marche pas. Mais, cela n'a pas d'importance puisque dans la version proposée dans ton poste 64, c'est exactement ce que je souhaitais.
Merci à toi pour le boulot !
 

ChTi160

XLDnaute Barbatruc
Bonjour Claude
J'espère que tu vas bien !
Une vidéo d'où j'en suis LOL
Encore un peu de travail pour finaliser !
Bonne fin de Journée
Jean marie
 

Pièces jointes

  • piment-15.gif
    478.9 KB · Affichages: 16

Piment

XLDnaute Occasionnel
Bonjour Jean-Marie,
Des soucis de connexion font que la messagerie ne remonte pas correctement : je viens d'avoir ton post.
Sur ce que j'ai vu, ça me semble tout bon.
Super boulot.
Bonne journée à toi.
Claude
 

Piment

XLDnaute Occasionnel
Bonjour Jean-Marie,
J'espère que tu vas bien.
Je viens un peu aux nouvelles.
J'en profite pour attirer ton attention sur le fait que lorsque j'ouvre l'USF " Visuel_MatCollectif", un tri se fait sur la colonne "Type de Matériel" du tableau t_BDD_MC.
Or, un tri se fait lors de l'ajout d'un matériel sur la colonne "Réf". Serait-il possible que le tableau reste classé sur cette colonne lors de l'ouverture de l'USF?
Je te joins le fichier sur lequel je travaille.
Tu remarqueras que j'ai rajouté une colonne à mon tableau.
Cette colonne me sert à entrer avec quel service ou cellule le matériel est partagé.
Je n'arrive pas à faire remonter dans la ListBox les données de la cellule renseignée en colonne "K". Si tu pouvais y jeter un œil (Le code se trouve en "CBx_2_Change()).
Avec tous mes remerciements.
Bonne journée à toi.
Claude
 

Piment

XLDnaute Occasionnel
Bonjour Jean-Marie,
N'ayant pas de tes nouvelles, j'espère que tu vas bien.
J'ai réussi à finaliser mon USF "Visuel_MatCollectif". Je te mets ci-joint le fichier modifié.
Je reste dans l'attente des modifications que tu devais y apportées.
Je te souhaite une bonne journée.
 

ChTi160

XLDnaute Barbatruc
Bonjour Claude ,
J'espère que tu vas bien ?
Moi ça va ,je suis chez ma fille ou je participe a des travaux divers lol .je n'ai pas le temps ni la force le soir de me mettre à l'ordi , que j'ai emmené.
Je regarde cela dès que possible.
Bonne fin de journée
Jean marie
 

Piment

XLDnaute Occasionnel
Re:
Je suis rassuré, je craignais des soucis de santé.
Profite bien.
Bonne journée à toi.
 

ChTi160

XLDnaute Barbatruc
Bonjour Claude
J'espère que tu vas bien ?
Regarde le fichier joint et dis-moi si ça correspond et les modifications éventuelles à apporter !
Bonne journée
Jean marie
 

Pièces jointes

  • Cascade Combobox Chti160 Piment-1.xls
    160 KB · Affichages: 6

Piment

XLDnaute Occasionnel
Bonjour Jean-Marie,
Comment ça vas aujourd'hui?
J'ai intégré tes codes dans mon fichier et j'ai dû résoudre des problèmes de "Nom ambigu détecté". J'ai donc modifié les variables en rajoutant MC à la fin de chaque variable, et de modifier tous les codes en conséquences. Il me reste une ligne de code que je n'arrive pas à identifier. Ce qui ne me permet pas de savoir si le formulaire intégré fonctionne correctement. Je te transmets le fichier modifié afin que tu y jettes un œil si tu le veux bien. Le problème se passe lors du lancement du formulaire "Visuel_MatCollectif" après un choix dans la 1ère ComboBox (Nom ambigue: Recup_MaterielMC). Il m'indique que le problème se situerait au niveau du module "Mdl_RecupListMC".
Je n'arrive pas à trouver le problème.
Je te confirme que ton fichier se comporte comme je le souhaitais.
J'aimerais que le formulaire "Visuel_Direction" se comporte de la même manière.
Merci infiniment pour ton aide.
Claude.
 

Discussions similaires

Réponses
4
Affichages
433
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…