Bonsoir
J'ai créé cette procédure qui filtre car dans les cellules, j'ai parfois
plusieurs mots
ex : Remise + divers + remboursement
cette proc me filtre que les cellules dans lesquelles il y a au moins le mot
"Remise"
Mais le pb est que parfois j'ai "Remise suplémentaire" dans la cellule et
cela filtre aussi.
Comment faire afin que cette proc me filtre que s'il y a au moins "Remise"
seul et non "Remise suplémentaire"
Merci beaucoup
Michel
'Remise
If OptionButton1 Then
ActiveSheet.Unprotect Password:="toto"
Application.ScreenUpdating = False
Range("A2:R50000").Select
Selection.AutoFilter Field:=11, Criteria1:="*Remise*"
Range("A1").Select
ActiveSheet.Protect Password:="toto"
Application.ScreenUpdating = True
End If
Bonsoir J'ai créé cette procédure qui filtre car dans les cellules, j'ai parfois plusieurs mots ex : Remise + divers + remboursement cette proc me filtre que les cellules dans lesquelles il y a au moins le mot "Remise" Mais le pb est que parfois j'ai "Remise suplémentaire" dans la cellule et cela filtre aussi. Comment faire afin que cette proc me filtre que s'il y a au moins "Remise" seul et non "Remise suplémentaire" Merci beaucoup Michel
'Remise If OptionButton1 Then ActiveSheet.Unprotect Password:="toto" Application.ScreenUpdating = False Range("A2:R50000").Select Selection.AutoFilter Field:, Criteria1:="*Remise*" Range("A1").Select ActiveSheet.Protect Password:="toto" Application.ScreenUpdating = True End If
Bonsoir
J'ai créé cette procédure qui filtre car dans les cellules, j'ai parfois
plusieurs mots
ex : Remise + divers + remboursement
cette proc me filtre que les cellules dans lesquelles il y a au moins le mot
"Remise"
Mais le pb est que parfois j'ai "Remise suplémentaire" dans la cellule et
cela filtre aussi.
Comment faire afin que cette proc me filtre que s'il y a au moins "Remise"
seul et non "Remise suplémentaire"
Merci beaucoup
Michel
'Remise
If OptionButton1 Then
ActiveSheet.Unprotect Password:="toto"
Application.ScreenUpdating = False
Range("A2:R50000").Select
Selection.AutoFilter Field:, Criteria1:="*Remise*"
Range("A1").Select
ActiveSheet.Protect Password:="toto"
Application.ScreenUpdating = True
End If
Bonsoir J'ai créé cette procédure qui filtre car dans les cellules, j'ai parfois plusieurs mots ex : Remise + divers + remboursement cette proc me filtre que les cellules dans lesquelles il y a au moins le mot "Remise" Mais le pb est que parfois j'ai "Remise suplémentaire" dans la cellule et cela filtre aussi. Comment faire afin que cette proc me filtre que s'il y a au moins "Remise" seul et non "Remise suplémentaire" Merci beaucoup Michel
'Remise If OptionButton1 Then ActiveSheet.Unprotect Password:="toto" Application.ScreenUpdating = False Range("A2:R50000").Select Selection.AutoFilter Field:, Criteria1:="*Remise*" Range("A1").Select ActiveSheet.Protect Password:="toto" Application.ScreenUpdating = True End If
Michel.Girard
Mille merci Isabelle, you're amazing ! Désolé, je ne pourrais tester que demain au boulot. To be continued Michel
Bonsoir J'ai créé cette procédure qui filtre car dans les cellules, j'ai parfois plusieurs mots ex : Remise + divers + remboursement cette proc me filtre que les cellules dans lesquelles il y a au moins le mot "Remise" Mais le pb est que parfois j'ai "Remise suplémentaire" dans la cellule et cela filtre aussi. Comment faire afin que cette proc me filtre que s'il y a au moins "Remise" seul et non "Remise suplémentaire" Merci beaucoup Michel
'Remise If OptionButton1 Then ActiveSheet.Unprotect Password:="toto" Application.ScreenUpdating = False Range("A2:R50000").Select Selection.AutoFilter Field:, Criteria1:="*Remise*" Range("A1").Select ActiveSheet.Protect Password:="toto" Application.ScreenUpdating = True End If
Mille merci Isabelle, you're amazing !
Désolé, je ne pourrais tester que demain au boulot.
To be continued
Michel
"isabelle" <hoHoho@hohoHo> a écrit dans le message de news:
O2IUIdFGFHA.444@TK2MSFTNGP15.phx.gbl...
Bonsoir
J'ai créé cette procédure qui filtre car dans les cellules, j'ai parfois
plusieurs mots
ex : Remise + divers + remboursement
cette proc me filtre que les cellules dans lesquelles il y a au moins le
mot "Remise"
Mais le pb est que parfois j'ai "Remise suplémentaire" dans la cellule et
cela filtre aussi.
Comment faire afin que cette proc me filtre que s'il y a au moins
"Remise" seul et non "Remise suplémentaire"
Merci beaucoup
Michel
'Remise
If OptionButton1 Then
ActiveSheet.Unprotect Password:="toto"
Application.ScreenUpdating = False
Range("A2:R50000").Select
Selection.AutoFilter Field:, Criteria1:="*Remise*"
Range("A1").Select
ActiveSheet.Protect Password:="toto"
Application.ScreenUpdating = True
End If
Bonsoir J'ai créé cette procédure qui filtre car dans les cellules, j'ai parfois plusieurs mots ex : Remise + divers + remboursement cette proc me filtre que les cellules dans lesquelles il y a au moins le mot "Remise" Mais le pb est que parfois j'ai "Remise suplémentaire" dans la cellule et cela filtre aussi. Comment faire afin que cette proc me filtre que s'il y a au moins "Remise" seul et non "Remise suplémentaire" Merci beaucoup Michel
'Remise If OptionButton1 Then ActiveSheet.Unprotect Password:="toto" Application.ScreenUpdating = False Range("A2:R50000").Select Selection.AutoFilter Field:, Criteria1:="*Remise*" Range("A1").Select ActiveSheet.Protect Password:="toto" Application.ScreenUpdating = True End If
