Programmation Alerte Excel

napster94700 Messages postés 82 Statut Membre -  
napster94700 Messages postés 82 Statut Membre -
Bonjour,
Ma mère aurait besoin de mettre une alarme a x date dans son tableau excel.
Mettons que dans son tableau qui comporte des dates dans le désordre soit comme sa :

20.11.2011
03.08.2009
01.10.09
06.03.2010

Elle voudrait que par exemple 8 jours avant il y est un signal ou une case colorée de cette date.
Je ne sais pas si c'est possible ?

Merci
Configuration: Windows XP PRO SP3
Firefox
ABIT IP 35 PRO
E8400
2GO RAM 
ALIM CORSAIR X650W
HD4870 ATI MSI
STOCKAGE 1 TO

4 réponses

  1. Dev13
     
    Salut,
    voila un code qui a l'ouverture du fichier excel il change la couleur de la case en rouge si la date est supérieur de 8 jours a la date du système, donc une alerte en couloriant les case date 8 jours avant:

    Private Sub Workbook_Open()

    Dim ligne As Integer

    ligne = 1

    While Not IsEmpty(Sheets("Feuil1").Cells(ligne, 1))

    If Sheets("Feuil1").Cells(ligne, 1).Value = Date + 8 Then

    Sheets("Feuil1").Cells(ligne, 1).Interior.Color = RGB(200, 160, 35)

    End If

    ligne = ligne + 1
    Wend

    End Sub

    A+
    0
  2. napster94700 Messages postés 82 Statut Membre 16
     
    Merci beaucoup mais sa je l'insere dans excel ou je rentre sa dans la case de formule ?
    Elle a Excel 1997
    0
  3. qmike Messages postés 1599 Date d'inscription   Statut Membre Dernière intervention   594
     
    bonjour
    Oui ou encore sans programme vba

    Une mise en forme conditionnelle

    Alerte 8 jours avant la date

    # Tapez la date d'échéance dans une cellule [Cellule D1 dans cet exemple]
    # Sélectionnez la colonne des dates à colorer [Colonne A:A dans cet exemple]
    # Sélectionnez le Menu Format Mise à jour conditionnelle...
    # Sélectionnez l'option La valeur de la cellule est dans le champ Condition 1
    # Tapez la formule suivante =(A1>=aujourdhuui()-8)
    # Cliquez sur le bouton Format...
    # Cliquez sur la couleur souhaitée
    # Cliquez deux fois sur le bouton OK

    Source : http://bvrve.club.fr/Astuces_Michel/2542excel.html
    0
  4. napster94700 Messages postés 82 Statut Membre 16
     
    Merci je vais essayer sa des que j'aurais son tableau :)
    Merci à toi ;)
    0