Microsoft 365 pb formule vba

le-croco

XLDnaute Nouveau
Bonjour je souhaite déclencher une macro en fonction de la valeur d'une cellule (nombre de jour restant) qui change en fonctionne de date dans d'autre cellules.
Mon code VBA fonctionne quand je rentre dans la dite cellule et que je valide avec la touche entrée, mais ne fonctionne pas quand je laisse les choses ce faire seul.
Ma formule ne détecte pas le changement de la valeur de la cellule qui ce fait par un formule.
Qqn peut il m aider ?

mon code:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Cells.Count > 1 Then Exit Sub
If IsNumeric(Target) And Target.Address = "$A$1" Then
Select Case Target.Value
Case 1 To 30: Macro1
Case Is < 1: Macro2
End Select
End If
End Sub
 
Solution
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
   If Intersect(Me.[A1].Precedents, Target) Is Nothing Then Exit Sub
   Select Case Me.[A1].Value
      Case 1 To 30: Macro1
      Case Is < 1: Macro2
      End Select
   End Sub

Discussions similaires

  • Résolu(e)
XL 2021 macro
Réponses
9
Affichages
466
Réponses
1
Affichages
247

Statistiques des forums

Discussions
312 215
Messages
2 086 329
Membres
103 182
dernier inscrit
moutassim.amine