'Traduire' cette conditition

[Domi]

Bonjour,

Comment traduire ceci :
Si je clique sur la cellule C2, s'affiche un '3' dans cette même cellule et contenu cellule F3 = contenu cellule B2 ?

--------------------
Merci d'avance

 

[PascalXLD]

Bonjour

essaies

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range('C2')) Is Nothing Then
    Range('C2') = 3
    Range('F3') = Range('B2')
End If
End Sub

Bon WE

 

[Domi]

Hum... ce qui m'arrangerai serait de passer par une formule de type :

=SI(C2=clic alors C2='3' et F3=B2)

sans passer par une macro, est-ce possible
Si tu vous une autre façon, je suis aussi preneur 😉

 

[PascalXLD]

Re

Non pour tout ce qui touche aux événements click etc il faut passer par une macro événementielle

Bon WE

 

[Dom]

Bon, va pour ta macro.
Dans ce cas comment l'utiliser, dois-je spécifier quelque chose pour la case C2 ?
Je te demande ca car quand je clique dessus, il se passe rien.

Merci pour ton aide

 

[DADI]

Bonjour Pascal76, Domi, le Forum,

Cette macro m'intéresserait mais je suis complètement ignorant sur la manière de la copier.

Merci de m'apporter un peu d'aide - Bon WE

 

[PascalXLD]

RE

Il faut ouvrir VBE (ALT F11) et copier le code de la macro non dans un module mais dans le code de la feuille sur lequel tu veux que le code s'execute

 

[Domi]

Trop fort Pascal76.

Encore merci

 

[DADI]

Bonjour Pascal76, Domi, le Forum,

Cette macro m'intéresserait mais je suis complètement ignorant sur la manière de la copier.

Merci de m'apporter un peu d'aide - Bon WE

 

[PascalXLD]

tu as essayé ce que j'ai dit dans mon post précédent ??