Liste de validation évolutives

[Micke-31]

Bonjour le Forum,

Je me tourne vers vous pour essayer de construire des listes de validation évolutives en VBA.

J’ai déjà vu ce genre de fichier très intéressant que je n’arrive pas à mettre au point et même montrer mon code qui ressemble plus à une usine à gaz, à des pros que vous êtes.

Je remercie tous ceux qui survoleront mon problème

 

[jp14]

Re : Liste de validation évolutives

Bonjour

Pour adapter automatiquement la liste de validation il faut utiliser la fonction DECALER au niveau du nom.
Exemple pour la colonne A
=DECALER('Mes Listes'!$A$2;;;NBVAL('Mes Listes'!$A:$A)).

Pour entrer une nouvelle valeur dans la liste il faut décocher "Quand des données non valides sont tapées"

Si on désire recopier automatiquement les données le plus simple est de rajouter une macro évènementielle.

JP

 

[Micke-31]

Re : Liste de validation évolutives

Merci pour ta réponse, mais le projet que j'ai vu est bien géré en VBA. et automatiquement lorsque on rentrait une valeur dans la case vide de la liste de validation une msgbox avec deux boutons OK et NON validait ou non la modif et la liste de validation s'allongeait d'une case

Mais merci encore.

 

[jp14]

Re : Liste de validation évolutives

Bonjour (re)

Ci dessous le fichier avec une macro pour mettre à jour les données.

A tester

JP

Autant pour moi je n'avais pas "zippé" le bon fichier.

 

[Micke-31]

Re : Liste de validation évolutives

merci JP14,

En fait pour te donner une idée de ce que l'on souhaiterai en pièce jointe un exemple inexploitable qui nous à mis la puce à l'oreille

Merci encore

 

[BOISGONTIER]

Re : Liste de validation évolutives

Bonjour,

>et automatiquement lorsque on rentrait une valeur dans la case vide de la liste de validation une msgbox avec deux boutons OK et NON validait ou non la modif et la liste de validation s'allongeait d'une case

http://boisgontierjacques.free.fr/fichiers/DonneesValidation/DV_AjoutListe.xls
Données/Validation

JB
Formation Excel VBA JB

 

[Micke-31]

Re : Liste de validation évolutives

Comme je l'ai écrit dans une discussion il y a quelques temps,

Bonjour maître Boisgontier et merci pour pour toutes les astuces et le temps que vous passez sur ce forum.
C'est tout à fait ce que nous cherchions faire depuis que nous avons ce modèle dans les mains, dommage que le VBA soit verrouillé.

Dans le modèle (projet1.xls, dans les listes de validation une cellule en fin de liste reste vide, est il possible dans ce code d'en intègrer une.

sinon nous monterons notre projet avec ces infos capitales

Encore merci.

 

[Micke-31]

Re : Liste de validation évolutives

ça y est nous sommes presque au bout de nos peines, quelqu'un pourait il nous dire comment mettre le texte dans une msgbox sur deux lignes, ce seari sympat

Merci encore à toute l'équipe

 

[BOISGONTIER]

Re : Liste de validation évolutives

-Dans Données/Validation/Alerte erreur, il faut décocher Quand les données non valides sont tapées

-Dans le nom de champ, il y a une ligne vide:
list_1 =DECALER(Listes!$A$3;;;NBVAL(Listes!$A:$A)-2;1)


Voir PJ:

Le code de Copie projet2 n'est pas protégé.

JB

 

[Micke-31]

Re : Liste de validation évolutives

Bonjour le forum,

Pour information, j'ai eu accès au code dans le module verrouillé et donc pu le copier, c'était tout simple, ouvrir le classeur Excel avec Office One et tout est accessible. Il parait qu’avec open office ça marche également.
Merci encore à tous pour vos implications.