Liste déroulante Excel : aucune mise à jour du tableau via VBA
Bonjour à tous,
Je débute en VBA Excel et je rencontre une difficulté avec un script lié à une liste déroulante.
Dans la feuille "PLANIFICATION" de mon fichier (ci-joint), j’ai une liste déroulante en cellule C2 qui correspond à un type de plan d’action.
Je souhaite que, lorsque je sélectionne une valeur dans C2, le tableau affiche uniquement les lignes correspondant à cette valeur.
Et lorsque la valeur est vide, le tableau ne doit afficher aucun résultat.
Après avoir écrit mon code VBA (événement Worksheet_Change) sur la feuille concernée, lorsque je change la valeur en C2, rien ne se passe à l'écran (aucune variation des données).
Je joins mon fichier d'exemple pour que vous puissiez visualiser la structure de mes données et le code actuel.
Pouvez-vous m’indiquer :
- si l’événement est correctement utilisé ?
- où pourrait se situer l’erreur dans mon code ?
Merci d’avance pour votre aide 🙏
Bonjour
Cela vient de tes retours à la ligne pour la valeur PACP :
J'ai nommé proprement tes tableaux (de même que l'on nomme classeurs et onglets, on ne garde pas les noms automatiquse des tableaux structurés)
Je ne sais pas trop ce que tu comptes faire avec PowerQuery : j'ai cependant adapté les noms...
On peut simplifier VBA qui n'est en plus pas adapté à un tableau structuré...
Ton classeur a des liens avec un classeur externe que l'on n'a pas, donc les corrections peuvent ne plus fonctionner...
Bonjour à tous.
Je ne vois pas l'intérêt d'écrire une macro pour faire un filtre ! Il suffit d'utiliser le filtre natif sur les les tableaux structurés ! D'ailleurs, pour afficher toutes les données du tableau, dans le fichier de 78chris, on est obligé de cliquer sur le filtre natif.Senedja, il faudrait nous dire un peu plus de ce que vous cherchez à faire, vous faire des bouts de macros au fur et à mesure n'a pas beaucoup de sens.
A mon avis !
Cordialement.
Bonsoir à vous,
Je voudrais vous dire vraiment merci pour votre réactivité après avoir posté ma préoccupation.
La réorganisation du classeur proposé par 78chris ainsi que le code va dans le sens de m'a préoccupation. J'ai seulement ajouté ce bloc
If Target.Value = "" Then
' On vérifie si un filtre est déjà actif pour tout afficher
If .ShowAutoFilter Then
.AutoFilter.ShowAllData
pour réinitialiser l'affichage du tableau, lorsque la valeur de la liste déroulante est vide.
Aussi j'ai pris en compte les observations de PAYET Claude. A la vérité en plus du tri d'information dans le tableau, je dois être à mesure de renseigner, modifier et supprimer une information de façon dynamique dans le tableau tout en conservant l'intégrité des filtres et des formules.
Bonne réception à vous.
Cooll
Bonsoir à tous.
Tout d'abord, merci Senedja pour votre retour. Je regarde votre fichier d'un peu plus près et je vous fais un retour.Par contre, si vous pouvez nous fournir un fichier avec quelques données au plus près de la réalité, cela permettrait une meilleure analyse.
Cordialement.