Forme clignotante

bonjour a tous

et bonne vacances pour ceux qui ont la chance d'y etre

voici mon soucis

je voudrais que dans le fichier joint la forme en etoile soit visible a l'ouverture mais que quand je remplis la cse date (en G8)

cette forme disparaisse

c'est parce que je doit absolument mettre sur ce bon la DLUO (Date Limite d'Utilisation Optimale) et je voudrais qu'elle s'inscrive auto car c'est 70 jours

esperant avoir ete clair

amicalement a tous

Bonjour,

Dans la feuille bon de livraison essai avec ceci

Private Sub Worksheet_Change(ByVal Target As Range)
  If [G8] <> "" Then
    ActiveSheet.Shapes("Alerte").Visible = False
  Else
    ActiveSheet.Shapes("Alerte").Visible = True
  End If
End Sub

Edit, rajout du fichier

Ca semble fonctionner ceci dit, je ne suis pas l'expert du vba...

merci bcp

cela fonctionne parfaitement

pour quelqu'un qui n'est pas un expert chapeau bas

amicalement

Bonjour,

Petite question au pro vba

Si je souhaite afficher ou non à partir d'une checkbox dans la feuille excel

Sa donnerai quoi comme code ?

en fait j'ai trouvé

Private Sub CheckBox1_Click()
      If CheckBox1.Value = True Then
        ActiveSheet.Shapes("Alerte").Visible = True
      Else
        ActiveSheet.Shapes("Alerte").Visible = False
      End If
End Sub