ça fait plusieurs jours que je tourne en rond.
J'ai un classeur qui comportent plusieurs feuilles.
Dans la première, j'ai la liste de tous les candidats. J'ai une extraction de ce tableau de tous ceux qui passent au jury (feuille Jury_). Après le jury sur cette dernière feuille une lettre est mentionnée sur une colonne ("décision modifiée").
Je voudrais pouvoir mettre à jour une colonne de ma première feuille (liste complète) avec cette décision.
j'ai réussi à écrire un code VBA pour :
- Vérifier la valeur d'une cellule (cellule_jury) de la feuille ("Jury_")
- En fonction du résultat, je récupéré le contenu d'une autre cellule de la même ligne ("Numéro") pour identifier le candidat
- Je compare le numéro du candidat de la feuille jury_ avec la feuille liste complète.
- Si OK, j'écrase la valeur d'une cellule de la feuille complète sur la même ligne.
Je ne sais pas si j'ai été clair mais voilà le code
'chercher le nom dans la feuille jury et mettre à jour la liste complète
Sub Cherche()
For Each cellule_jury In Sheets("Jury_").Range("Décision Modifiée")
i = i + 1
If cellule_jury.Value <> "" Then
'Sheets("Jury_").Range("Numéro").Cells(i).Value
For Each cellule_complet In Sheets("Liste complète").Range("Numéro")
J = J + 1
If cellule_complet.Value = Sheets("Jury_").Range("Numéro").Cells(i).Value Then
Sheets("Liste complète").Range("Décision Modifiée").Cells(J).Value _
= cellule_jury.Value
End If