Discussion :

[rihab92]

Bonjour tout le monde,

SVP, Je cherche un code qui pourra m'aider à réaliser cette fonction

j'ai deux feuilles 1 et 2

la feuille 1 contient deux listes déroulantes qui sont la zone et le mois

A chaque fois on choisisit des ces deux listes un réultat s'affiche dans la feuille 1

Du coup; ce que je veux c'est de pouvoir copier ce résultat et l'afficher dans un tableau dans la feuille 2

ci joint la feuille 2

Merci d'avance

[Jean-Philippe André]

Salut,

tu veux copier/coller la valeur ou bien une simple formule =Feuille1!CelluleResultat ferait-elle l'affaire ?

[rihab92]

En fait, je ne veux pas un simple copier coller .

En fonction du mois et de la zone choisie dans feuille 1je dois choisir le bon emplacement de placer le résultat dans le tableau de la feuille 2.

Pour chaque choix de la zone dans liste déroulante 1
et pour chaque choix du mois dans la feuille 1

copier le réultat de la feuille 1 et le placer dans la case convenable ( qui convient à la zone et au mois choisi)

merci

[Jean-Philippe André]

D'accord,

il te faut simplement faire une double boucle pour tester la colonne (Mois) et la ligne (zone) qui correspondent a ton choix

Dans l'idée on aurait un code comme celui-ci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
'boucle sur les colonnes
For i = 2 To 13
    'boucle sur les lignes
    For j = 2 to 27
        if cells(1,i).value = TonChoixdeMois and cells(j,1).value = TonChoixdeZone Then
            cells(j,i).value = Tavaleur
        End if
    Next j
Next i

[rihab92]

ça a n'a pas marché

[Jean-Philippe André]

ça a n'a pas marché

Pas tres explicite comme reponse...
Quel est ton code ? L'as-tu adapter a tes donnees ?

J'ai laisse ma boule de cristal dans mon autre redingote, merci de faire des efforts pour que l'on puisse te donner les meilleures pistes de resolution...

[Invité]

Bonjour,
indépendamment de ton problème, je voie des erreur de division sur la ligne Moyen, ce qui est logique car ton tableau est vide.
ceci dit, quand tu viendra supprimer et/ou ajouter des valeurs dans ton tableau, tu cassera le lien au références des cellules!

je te suggère de tenir compte de la barre de titre (Janvier) et la ligne Moyenne dans ta formule

Code Formule Excel :

Sélectionner tout - Visualiser dans une fenêtre à part

 = MOYENNE(DECALER(B1;1;0):DECALER(B12;-1;0)) 'en supposant que le ligne moyenne est 12