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
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
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 .
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
.
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 .
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 .
.
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
.
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 .