Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

le-croco

XLDnaute Nouveau
Bonjour a tous merci pour tous vos messages. dsl de ne pas être réactif mais je ne maitrise pas bien le code VBA.
Comme demandé voici mon tableau test.
 

Pièces jointes

  • tableau test macro.xlsm
    26.1 KB · Affichages: 3

Discussions similaires

  • Résolu(e)
XL 2021 macro
Réponses
9
Affichages
480
Réponses
1
Affichages
249
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…