j'ai trouvé un début de solution mais elle affiche 1 msgbox par alerte, ça fait un peu spam quand plusieurs dates arrivent....
je ne sais pas comment l'adapter pour que ça fasse 1 msgbox pour l'ensemble des alertes.
et pour que le test ne se fasse pas seulement sur la feuille active mais sur l'ensemble des feuilles du classeurs (peu importe leurs nombre) sauf la première qui me sert de sommaire.
solution trouvé qu'il me reste à adapter:
Private Sub Workbook_Open()
'Pour les stocks
Dim alertestock As Range
For Each alertestock In ActiveSheet.Range("Alerte_stock")
Valeur = Cells(alertestock.Row, 1) 'affichage du texte dans la premiere colonne
If alertestock = "0" Then 'test du flag d'alerte
MsgBox "La référence " & Valeur & " doit être commandée.", vbCritical, "Quantité en stock insuffisante" 'message d'alerte
Else
End If
If alertestock = "1" Then 'test du flag d'alerte
MsgBox "La référence " & Valeur & " devra bientôt être commandée.", vbExclamation, "Stock presque insuffisant" 'message d'alerte
Else
End If
Next
'Pour les commandes
Dim alertecommande As Range
For Each alertecommande In ActiveSheet.Range("Alerte_commande")
Valeur = Cells(alertecommande.Row, 1) 'affichage du texte dans la premiere colonne
If alertecommande = Date Then 'test du flag d'alerte
MsgBox "La référence " & Valeur & " sera livrée aujourd'hui.", vbCritical, "Réception d'une commande" 'message d'alerte
Else
End If
If alertecommande = Date + 1 Then 'test du flag d'alerte
MsgBox "La référence " & Valeur & " sera livrée demain.", vbInformation, "Prochaine commande" 'message d'alerte
Else
End If
Next
End Sub