OVH Cloud OVH Cloud

macro effacement quand click

2 réponses
Avatar
bonjour =E0 tous,
si je change le contenu de F2, je souhaite que =E7a efface=20
le contenu de I20 mais ma nullit=E9 s'y oppose

Private Sub Worksheet_SheetChange(ByVal Target As Range)
End Sub
If Target.Address =3D "$F$2" Then
Range("I20").FormulaR1C1 =3D ""
Range("F4").Select
End If

je ne prends pas worksheet selectionchange car je=20
l'utilise deja sur cette page=20
quelqu'un voit-il le bug?
MERCI ENCORE

2 réponses

Avatar
J-Dan
salut no name,

Private Sub Worksheet_Change (et non
Worksheet_sheetChange) et End sub a la fin de la macro.
Sinon ca marche.

bon courage


-----Message d'origine-----
bonjour à tous,
si je change le contenu de F2, je souhaite que ça
efface

le contenu de I20 mais ma nullité s'y oppose

Private Sub Worksheet_SheetChange(ByVal Target As Range)
End Sub
If Target.Address = "$F$2" Then
Range("I20").FormulaR1C1 = ""
Range("F4").Select
End If

je ne prends pas worksheet selectionchange car je
l'utilise deja sur cette page
quelqu'un voit-il le bug?
MERCI ENCORE
.



Avatar
gilles \(no name\)
merci J DAN je crois que je progresse à pas de géant!
-----Message d'origine-----
salut no name,

Private Sub Worksheet_Change (et non
Worksheet_sheetChange) et End sub a la fin de la macro.
Sinon ca marche.

bon courage


-----Message d'origine-----
bonjour à tous,
si je change le contenu de F2, je souhaite que ça
efface

le contenu de I20 mais ma nullité s'y oppose

Private Sub Worksheet_SheetChange(ByVal Target As Range)
End Sub
If Target.Address = "$F$2" Then
Range("I20").FormulaR1C1 = ""
Range("F4").Select
End If

je ne prends pas worksheet selectionchange car je
l'utilise deja sur cette page
quelqu'un voit-il le bug?
MERCI ENCORE
.

.