list déroulante semi-automatique

M

meldja

XLDnaute Impliqué

• 17 Août 2008

• #2

Re : list déroulante semi-automatique

Re,
C''est bon, j'ai trouvé, fallait juste remplacer :

=SI(B5<>"";DECALER(debut;EQUIV(B5&"*";list;0)-1;;SOMME((STXT(list;1;NBCAR(B5))=TEXTE(B5;"0"))*1));list)

par

=SI(B5<>"";DECALER(list;EQUIV(B5&"*";list;0)-1;;SOMME((STXT(list;1;NBCAR(B5))=TEXTE(B5;"0"))*1));list)

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 17 Août 2008

• #3

Re : list déroulante semi-automatique

Bonjour meldja, le forum,

La formule de validation n'est pas correcte en effet car il faut que la recherche se fasse dans le groupe défini en B3. Voici la formule corrigée :

=SI(B5<>"";DECALER(debut;EQUIV(B5&"*";list;0)-1;EQUIV($B$3;groupe;0)-1;SOMME((STXT(list;1;NBCAR(B5))=TEXTE(B5;"0"))*1));list)

Perso je ne vois pas trop l'intérêt de cette saisie semi-automatique.

A+

Edit : posté pendant que votre message arrivait. Bravo meldja, c'est mieux que ma solution !

 

Dernière édition: 17 Août 2008

Vote positif 0 Vote négatif

M

meldja

XLDnaute Impliqué

• 17 Août 2008

• #4

Re : list déroulante semi-automatique

Merci pour ta réponse job75,
Pour répondre à ton interrogation, la liste avec saisie semi-automatique me sera utile pour un fichier où j'ai plein de noms. Le fichier joint ne servait que de test. J'ai déjà adapté à mon fichier avec des listes assez longues.
Bonne journée

 

Vote positif 0 Vote négatif

M

Monique

Nous a quitté

Repose en paix

• 17 Août 2008

• #5

Re : list déroulante semi-automatique

Bonjour,

Dans cette formule :
=SI(B5<>"";DECALER(list;EQUIV(B5&"*";list;0)-1;;SOMME((STXT(list;1;NBCAR(B5))=TEXTE(B5;"0"))*1));list)

cette partie
SOMME((STXT(list;1;NBCAR(B5))=TEXTE(B5;"0"))*1)

peut être remplacée par
NB.SI(list;B5&"*")

Et ça donne
=SI(B5<>"";DECALER(list;EQUIV(B5&"*";list;0)-1;;NB.SI(list;B5&"*"));list)

 

Vote positif 0 Vote négatif

M

Monique

Nous a quitté

Repose en paix

• 17 Août 2008

• #6

Re : list déroulante semi-automatique

Re,

Suite...

La plage nommée "List", je crois qu'il vaut mieux la nommer par cette formule :

=DECALER(debut;;EQUIV(Feuil2!$B$3;groupe;0)-1;NBVAL(DECALER(Feuil1!$A:$A;;EQUIV(Feuil2!$B$3;groupe;0)-1))-1)

pour ne pas être limité à un peu moins de 50 noms comme avec la fonction Indirect()

 

Vote positif 0 Vote négatif

M

meldja

XLDnaute Impliqué

• 17 Août 2008

• #7

Re : list déroulante semi-automatique

Merci Monique,
T'es vraiment une "foundi" comme on dit ici (ça veut dire "Maître" dans le sens qui enseigne).
Bonne soirée

 

Vote positif 0 Vote négatif

M

meldja

XLDnaute Impliqué

• 17 Août 2008

• #8

Re : list déroulante semi-automatique

Re,
J'ai voulu tester ta formule et ça marche pas.
Il y avait une petite erreur :

=DECALER(debut;;EQUIV($B$3;groupe;0)-1;NBVAL(DECALER(Feuil1!$A:$A;;EQUIV($B$3;groupe;0)-1))-1)

La où j'ai mis du rouge, il y avait écrit "Feuil1" alors que la référence se trouve dans la feuille active (Feuil2)

Après avoir corrigé, ça marchait pour les 2 premiers groupes sélectionnés (G1 et G2) mais pas pour le troisième
Tu l'as testé dans le fichier que j'ai joint ? Si oui, envoie-le SVP.
Merci

 

Vote positif 0 Vote négatif

M

Monique

Nous a quitté

Repose en paix

• 17 Août 2008

• #9

Re : list déroulante semi-automatique

Re,

Le fichier

 

Pièces jointes

• ListSemiAutoMeldja.zip

  3.7 KB · Affichages: 81

Vote positif 0 Vote négatif

M

meldja

XLDnaute Impliqué

• 17 Août 2008

• #10

Re : list déroulante semi-automatique

Désolé Monique, j'ai été déconnecté et j'ai galéré pour me reconnecter (je suis en analogique avec un débit théorique de 45kbits/s... mais en réalité, je ne dépasse pas le 30kbits et ça rame pour se reconnecter et le reste, vu la saturation du réseau).
J'avais une fois de plus plané, ta formule est nickel.
Je viens de faire la même erreur sur un autre post. Je sature autant que notre réseau, je suis devant mon PC depuis le réveil (7h 30... j'ai fait une grasse mat !!) et il est bientôt 19 h chez nous. 12 heures de recherche en tout genre.
Il est temps que je passe à autre chose.
En tout merci de tes lumières et passe une bonne soirée.
Bye

 

Vote positif 0 Vote négatif