Rapport de message :*
 

Re: Modifier un code VBA

Titre du sujet : Re: Modifier un code VBA
par Mytå le 25/11/2011 22:36:52

 Salut le forum

Je ne vois pas pourquoi tu t'obstines à mettre les codes dans des modules de classes.

Dans le module de la feuille11 (Patron)
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim Plage As Range
    Set Plage = Application.Intersect(Target, Range("Presence"))
    If Not Plage Is Nothing Then
        Cancel = True
        Plage.Value = IIf(Target(1).Value = "X", "", "X")
    End If
End Sub
Mytå