Fonction si + et
Résolu
gildautal
Messages postés
16
Date d'inscription
Statut
Membre
Dernière intervention
-
gildautal Messages postés 16 Date d'inscription Statut Membre Dernière intervention -
gildautal Messages postés 16 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
j'ai cela et ca ne tourne pas
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$I$11" and Target.Value = "A" Then Call mamacro
End Sub
'si je selectionne la case I11 et si j'insere un "A" puis enter je déclenche une macro
de plus je dois avoir la meme condition sur plusieurs cellules différentes du style I11,I14,I20,I35 avec lesquelles si j'insere un A, je déclenche mamacro
merci pour votre aide
j'ai cela et ca ne tourne pas
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$I$11" and Target.Value = "A" Then Call mamacro
End Sub
'si je selectionne la case I11 et si j'insere un "A" puis enter je déclenche une macro
de plus je dois avoir la meme condition sur plusieurs cellules différentes du style I11,I14,I20,I35 avec lesquelles si j'insere un A, je déclenche mamacro
merci pour votre aide
A voir également:
- Fonction si + et
- Fonction si et - Guide
- Fonction miroir - Guide
- Fonction moyenne excel - Guide
- Fonction remplacer sur word - Guide
- Fonction somme excel - Guide
2 réponses
Bonjour,
Pourquoi dis-tu "ca ne tourne pas" ?
Sinon pour plusieurs cellules tu as
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Union([I11],[I14] ,[I20])) Is Nothing Then Exit Sub
If Target.Value = "A" Then Call mamacro
End Sub
ou bien sélectionner toutes tes cellules à tester, nommer la plage et remplacer par range("ma_plage")
eric
Pourquoi dis-tu "ca ne tourne pas" ?
Sinon pour plusieurs cellules tu as
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Union([I11],[I14] ,[I20])) Is Nothing Then Exit Sub
If Target.Value = "A" Then Call mamacro
End Sub
ou bien sélectionner toutes tes cellules à tester, nommer la plage et remplacer par range("ma_plage")
eric
