Dans une feuille, je voudrais qu'une macro s'exécute lorsque la cellule E1
est modifiée. J'ai donc le code suivant :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$E$1" Then
End If
Range("D790").Select
Selection.AutoFilter Field:=4, Criteria1:="*" & [E1] & "*",
Operator:=xlAnd
End Sub
Ce code marche bien, mais le problème est que la macro s'exécute lorsque
n'importe quelle cellule de la feuille est modifiée, et pas que la cellule
E1. Je ne vois pas ce que je dois changer. Quelqu'un peut m'aider ??
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
jps
bonjour mets ton End If juste avant ton End Sub jps
"aife1" a écrit dans le message de news: %
Bonjour à tous !
Dans une feuille, je voudrais qu'une macro s'exécute lorsque la cellule E1 est modifiée. J'ai donc le code suivant :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$E$1" Then End If Range("D790").Select Selection.AutoFilter Field:=4, Criteria1:="*" & [E1] & "*", Operator:=xlAnd End Sub
Ce code marche bien, mais le problème est que la macro s'exécute lorsque n'importe quelle cellule de la feuille est modifiée, et pas que la cellule E1. Je ne vois pas ce que je dois changer. Quelqu'un peut m'aider ??
Merci d'avance beaucoup.
bonjour
mets ton End If juste avant ton End Sub
jps
"aife1" <aife1@wanadoo.fr> a écrit dans le message de news:
%23fUlu3TyHHA.3916@TK2MSFTNGP02.phx.gbl...
Bonjour à tous !
Dans une feuille, je voudrais qu'une macro s'exécute lorsque la cellule E1
est modifiée. J'ai donc le code suivant :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$E$1" Then
End If
Range("D790").Select
Selection.AutoFilter Field:=4, Criteria1:="*" & [E1] & "*",
Operator:=xlAnd
End Sub
Ce code marche bien, mais le problème est que la macro s'exécute lorsque
n'importe quelle cellule de la feuille est modifiée, et pas que la cellule
E1. Je ne vois pas ce que je dois changer. Quelqu'un peut m'aider ??
bonjour mets ton End If juste avant ton End Sub jps
"aife1" a écrit dans le message de news: %
Bonjour à tous !
Dans une feuille, je voudrais qu'une macro s'exécute lorsque la cellule E1 est modifiée. J'ai donc le code suivant :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$E$1" Then End If Range("D790").Select Selection.AutoFilter Field:=4, Criteria1:="*" & [E1] & "*", Operator:=xlAnd End Sub
Ce code marche bien, mais le problème est que la macro s'exécute lorsque n'importe quelle cellule de la feuille est modifiée, et pas que la cellule E1. Je ne vois pas ce que je dois changer. Quelqu'un peut m'aider ??
Merci d'avance beaucoup.
aife1
Bonjour JPS !!
Merci bcp, ça marche impec !!
Bonne journée !
"jps" a écrit dans le message de news:
bonjour mets ton End If juste avant ton End Sub jps
"aife1" a écrit dans le message de news: %
Bonjour à tous !
Dans une feuille, je voudrais qu'une macro s'exécute lorsque la cellule E1 est modifiée. J'ai donc le code suivant :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$E$1" Then End If Range("D790").Select Selection.AutoFilter Field:=4, Criteria1:="*" & [E1] & "*", Operator:=xlAnd End Sub
Ce code marche bien, mais le problème est que la macro s'exécute lorsque n'importe quelle cellule de la feuille est modifiée, et pas que la cellule E1. Je ne vois pas ce que je dois changer. Quelqu'un peut m'aider ??
Merci d'avance beaucoup.
Bonjour JPS !!
Merci bcp, ça marche impec !!
Bonne journée !
"jps" <vaderetrosp@mas> a écrit dans le message de news:
OQpuK6TyHHA.1204@TK2MSFTNGP03.phx.gbl...
bonjour
mets ton End If juste avant ton End Sub
jps
"aife1" <aife1@wanadoo.fr> a écrit dans le message de news:
%23fUlu3TyHHA.3916@TK2MSFTNGP02.phx.gbl...
Bonjour à tous !
Dans une feuille, je voudrais qu'une macro s'exécute lorsque la cellule
E1 est modifiée. J'ai donc le code suivant :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$E$1" Then
End If
Range("D790").Select
Selection.AutoFilter Field:=4, Criteria1:="*" & [E1] & "*",
Operator:=xlAnd
End Sub
Ce code marche bien, mais le problème est que la macro s'exécute lorsque
n'importe quelle cellule de la feuille est modifiée, et pas que la
cellule E1. Je ne vois pas ce que je dois changer. Quelqu'un peut m'aider
??
bonjour mets ton End If juste avant ton End Sub jps
"aife1" a écrit dans le message de news: %
Bonjour à tous !
Dans une feuille, je voudrais qu'une macro s'exécute lorsque la cellule E1 est modifiée. J'ai donc le code suivant :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$E$1" Then End If Range("D790").Select Selection.AutoFilter Field:=4, Criteria1:="*" & [E1] & "*", Operator:=xlAnd End Sub
Ce code marche bien, mais le problème est que la macro s'exécute lorsque n'importe quelle cellule de la feuille est modifiée, et pas que la cellule E1. Je ne vois pas ce que je dois changer. Quelqu'un peut m'aider ??