Macro évènementielle

[gourdin]

Bonjour

Un peu d'aide sur une macro.

Un peu compliqué à expliquer.

Le mieux est de voir le fichier joint

Merci

 

[kjin]

Re : Macro évènementielle

bonsoir,
Dans le module de la feuille

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If UCase(Target) <> "OUI" Then Exit Sub
Cancel = True
Range("B5") = Cells(7, Target.Column)

End Sub

J'ai privilégié le double-click mais il suffit d'adapter
A+
kjin

 

[ERIC S]

Re : Macro évènementielle

Bonjour à vous

avec selection_change

a tester

 

[gourdin]

Re : Macro évènementielle

Merci à vous deux

C'est parfait