Affectation d'une cellule à partir de conditions

[debu75]

Bonjour,
Je débute sur Macro VBA. Je suis un peu perdu. Je souhaiterai à partir de valeurs disposées dans des feuilles différentes et à l'aide de conditions, affecter une valeur à une cellule.

En gros ca serait du style :

Si A2 dans Feuil1 = 1 et B3 dans Feuil2= 4 alors cellule = 2.

Un truc de ce style.

Merci pour votre aide

[Daniel.C]

Bonsoir,

Tu peux écrire :

Code :

If [Feuil1!A2] = 1 And [Feuil2!B3] = 4 Then ActiveCell = 2

ou

Code :

1
2
3
 If Sheets("Feuil1").Range("A2") = 1 And Sheets("Feuil2").Range("B3") = 4 Then
        ActiveCell = 2
    End If

[debu75]

mais j'avoue je n'arrive toujours pas, déjà comment débuter soit en mettant une fonction ou une procédure et comment faire.

Je vous joins un fichier test.xls.

la valeur que je souhaite voir afficher c'est en fonction de la feuil1 et feuil2 alors le résultat sera dans la cellule de la feuille "resultat".

Merci pour votre aide.

[Daniel.C]

Depuis la fenêtre Excel, appuie sur les touches Alt et F11 pour ouvrir la fenêtre de l'éditeur VBA. Repère à gauche le projet qui porte le nom de ton classeur et clique dessus; clique sur le menu "Insertion" et sur "Module". Colle ensuite dans la partie droite la macro suivante (j'ai pris au hasard le nom de feuuilles du classeur que tu as fourni) :

Code :

1
2
3
Sub test()
If [Feuil1!A2] = 1 And [Feuil2!B3] = 4 Then ActiveCell = 2
End Sub

Renseigne les deux cellules testées et exécute la macro; si tu ne sais pas comment faire, reviens et fournis la version d'excel que tu utilises.

[debu75]

peut-on actualiser la valeur de cette cellule sans activer la macro?

[Daniel.C]

Non. Tu peux mettre dans la cellule :

Code :

=SI(ET(Feuil1!A2=1;Feuil2!B3=4);2;"")