Si SOMME=0

Résolu
Bonjour,
Je fais la somme de 3 colonnes avec l'enregistreur ce qui donne :
ActiveCell.FormulaR1C1 = "=SUM(C[-10]:C[-8])"
Ce que je voudrais maintenant, c'est que si la somme est égale à 0
ça affiche : Msgbox "Rien à imprimer pour l'état demandé" Exit Sub
En vous remerciant

2 réponses

  1. Bonjour

    A tester
    Sub test()
    ActiveCell.FormulaR1C1 = "=SUM(C[-10]:C[-8])"
    If ActiveCell.Value = 0 Then MsgBox "Rien à imprimer pour l'état demandé": Exit Sub
    End Sub
    1. Bonjour M-12
      Je te remercie pour ta gentillesse à me répondre, c'est parfait
      Bon dimanche