Problème listbox sous condition de date
Résolu
skyzino
Messages postés
32
Statut
Membre
-
skyzino Messages postés 32 Statut Membre -
skyzino Messages postés 32 Statut Membre -
(Re)Bonjour,
Suite à un problème sur le code de ce fichier, je me tournes vers vous dans l'espoir de dénicher la racine du problème.
N'étant pas un fin connaisseur du code, je me retrouve à la rue pour trouver ce qui me gène.
Tout d'abord voici le fichier : https://www.cjoint.com/?BIyn4f93iV6
Mon problème : lorsque je clique sur CDD fin de contrat, que je choisi ensuite un des agents dans la listbox, et que j'effectue les modifs demandé, je reviens alors sur la listbox et le dernier nom de la listbox s'est démultiplié *2. Si je refais l'action il se démultiplie *3, etc.
J'ai remarqué que cela ne se passait que lorsque toutes les personnes finissait leur contrat lors du mois.
J'espère avoir été claire et que vous saurez me donner un coup de main.
Merci par avance de votre temps
Suite à un problème sur le code de ce fichier, je me tournes vers vous dans l'espoir de dénicher la racine du problème.
N'étant pas un fin connaisseur du code, je me retrouve à la rue pour trouver ce qui me gène.
Tout d'abord voici le fichier : https://www.cjoint.com/?BIyn4f93iV6
Mon problème : lorsque je clique sur CDD fin de contrat, que je choisi ensuite un des agents dans la listbox, et que j'effectue les modifs demandé, je reviens alors sur la listbox et le dernier nom de la listbox s'est démultiplié *2. Si je refais l'action il se démultiplie *3, etc.
J'ai remarqué que cela ne se passait que lorsque toutes les personnes finissait leur contrat lors du mois.
J'espère avoir été claire et que vous saurez me donner un coup de main.
Merci par avance de votre temps
A voir également:
- Problème listbox sous condition de date
- Excel cellule couleur si condition texte - Guide
- Airpods 3 date de sortie - Guide
- Office 2024 date de sortie - Accueil - Bureautique
- Samsung a33 date de sortie - Guide
- Nombre de jours entre deux dates excel - Guide
En modifiant cette partie du code, la procédure ne se lance plus en cliquant sur le bouton pour lancer la problème.
Le problème est que l'indice n'appartient plus à la sélection
UserForm_FinCDD2:
dans Public Sub UserForm_activate()
il y a une ligne en commentaire qu'il faut remettre en code:
DCLA = Worksheets("CDD_Fin_de_Contrat").Range("A" & Rows.Count).End(xlUp).Row
sinon pas d'effacement de la zone:
Worksheets("CDD_Fin_de_Contrat").Range("A2:N29").ClearContents
A+
J'ai remis la ligne
DCLA = Worksheets("CDD_Fin_de_Contrat").Range("A" & Rows.Count).End(xlUp).RowCependant j'ai mis en commentaire cette ligne
'Worksheets("CDD_Fin_de_Contrat").Range("A2:N29").ClearContentsEt j'ai réactivé celle-ci, et cela semble effectivement bien fonctionner.
Worksheets("CDD_Fin_de_Contrat").Range("A2:N" & DCLA).ClearContentsSeulement l'alimentation des lignes sur l'onglet ArchiveCDD se met dans tous les sens et je ne comprends pas pourquoi cela ne démarre pas en A2, à la première ligne vide... Ce n'est pas l'objet du topic mais si vous avez une idée ?
Je vous renvoi votre fichier modifier car je pense que vous avez modifie quelque chose qu'il ne fallait pas.
https://www.cjoint.com/?BIypRg7IWIw
A+
Worksheets("CDD_Fin_de_Contrat").Range("A2:N29").ClearContents
à celle-ci :
Worksheets("CDD_Fin_de_Contrat").Range("A2:N" & DCLA).ClearContents