select case - difficultés de mise en oeuvre

[johndoeww]

Bonjour à tous,

J'essaye de mettre en oeuvre une fonction select case en lieu et place d'une vulgaire formule de recherchev mais j'ai des petits soucis aussi je fais appel à vous.

A ................B................C
100............92
200............78
300............37

Dans un autre tableau :
A............B
92..........IDF
78..........IDF
37........CENTRE


Via le rechercheV en c1 s'affiche IDF.

Comment faire la même chose avec la fonction select.case, sur une plage de cellule du tableau 1 dont les dimensions varient à chauqe import de données ?

Merci à vous.

JD

 

[grodep]

Re : select case - difficultés de mise en oeuvre

je comprends pas sur quoi s'effectue ta recherche(quel critere?) en revanche, ce que je peux te conseiller si ta plage de cellule évolue souvent, c'est d'utiliser la fonction "DECALER" pour nommer ta plage de cellule, et effectuer ta recherche par select.case sur ta plage ainsi définie.
En effet, une liste nommée par le biais de la fonction decaler s'élargira ou se réduira d'elle meme avec cette fonction : exemple : maliste = decaler(feuil1!A1;;;nbval($A:$A)-1)

 

[johndoeww]

Re : select case - difficultés de mise en oeuvre

je comprends pas sur quoi s'effectue ta recherche(quel critere?) en revanche, ce que je peux te conseiller si ta plage de cellule évolue souvent, c'est d'utiliser la fonction "DECALER" pour nommer ta plage de cellule, et effectuer ta recherche par select.case sur ta plage ainsi définie.
En effet, une liste nommée par le biais de la fonction decaler s'élargira ou se réduira d'elle meme avec cette fonction : exemple : maliste = decaler(feuil1!A1;;;nbval($A:$A)-1)

Je souhaite faire une macro comme ci dessous :

si b2 = 92 alors c2 = idf
si b2 = 37 alors c2 = centre

pour b de 2 à n et c de 2 à n

 

[ConsultantJP]

Re : select case - difficultés de mise en oeuvre

Si tu veux pas que la formule soit visible, tu peux la faire en VBA avec un vlookup, tres simple dans ce cas !

 

[phlaurent55]

Re : select case - difficultés de mise en oeuvre

Bonjour à tous,

@ johndoeww,
pour pouvoir utiliser "Select Case", il te faut au préalable savoir le choix que tu vas faire dans les différents cas

si b2 = 92 alors c2 = idf
si b2 = 37 alors c2 = centre

qu'en est-il des autres cas ?
pourrais-tu préciser d'avantage

.

 

[johndoeww]

Re : select case - difficultés de mise en oeuvre

sauf erreur vlookup = recherchev


phlaurent55, voici le cas :

j'importe un nombre indéterminé de lignes qui se présentent comme ceci :

A ................B................C
100............92
200............78
300............37


Dans un autre tableau j'ai la liste de mes départements qui correspondent à une région :
A............B
92..........IDF
78..........IDF
37........CENTRE

Je souhaite ajouter à la suite de ma macro d'import l'alimentation de la colonne C du premier tableau en fonction du 2ème tableau.

 

[soenda]

Re : select case - difficultés de mise en oeuvre

Bonjour à tous, johndoeww

En supposant
- que tu importes tes données en feuil1
- que tes départements soient triés par ordre ascendant en feuil2

tu peux essayer

[C1].FormulaR1C1 = "=INDIRECT(""Feuil2![COLOR=blue][B]B[/B][/COLOR]""&RC[-1])"
Range("C1:C" & [B65536].End(xlUp).Row).FillDown

A plus

PS: Le n° de département = le n° de ligne