Aerte Excel

Bonjour a vous!^^

Je voudrai créer une alerte (un message à l'ouverture d'excel) lorsqu'une date = aujourd'hui - 1,

J'ai 3 colonnes: les dates en B2:B366

les évenements en C2:C366

et le nombre de caractères dans la colonne C en D2:D366.

l'objectif est d'avoir un message s'il y a un texte inscrit dans colonne C (donc valeur de D>0) à la date d’aujourd’hui-1.

(je ne sais pas si c claire....^^) je vous mets le code que j'ai "bricolé", il m'indique erreur 13 erreur de type si vous pouviez m'aider à repérer mon erreur vous me sauveriez!!

Sub macro1()
    Dim datt As Date
    datt = Range("B2:B366")
    If datt = Date - 1 Then
    Dim evenement As String, nb As Integer
        evenement = Cells(datt, 3)
        nb = Cells(datt, 4)
            If nbcar > 0 Then
                MsgBox " " & datt & " " & evenement
            Else
                MsgBox "Rien pour demain"
            End If
    End If
End Sub

Bonjour gou,

Sauver, c'est un bien grand mot pour quelques lignes de VBA !

Si j'ai bien compris ton code, tu cherches à indiquer par un message si un évènement est prévu pour le lendemain.

Tu peux essayer comme cela.

Sub macro1()
Dim Cel As Range
Dim Evenement As String, Nb As Integer
    For Each Cel In Range("B2:B366")
        If Cel = Date + 1 Then
            Evenement = Cel.Offset(0, 1)
            Nb = Cel.Offset(0, 2)
            If Nb > 0 Then
                MsgBox " " & Cel & " " & Evenement
            Else
                MsgBox "Rien pour demain"
            End If
        End If
    Next Cel
End Sub

A+

Bonjour frangy,

merci pour ta réponse! j'ai essayé ton code, je n'ai plus l'erreur 13 mais rien ne se passe....

j'ai copié ton code dans général et excuter dois je faire autre chose?

ps: j'ai commencé les cours sur vba y a deux jours...^^

Regarde l'exemple et dis-moi si tu bloques sur un point.

A+

merci pour l'exemple,

mais toujours rien! en fait dans la colonne évènements les cellules sont en fonction d'une autre feuille.

dans la feuille 1 on trouve un agenda, si une des cellules de l'agenda est remplie, la même entrée apparait dans la colonne "evenement" de la feuille 2 ( avec la fonction si) correspondant à la date bien sur. est ce pour ça que le code ne marche pas?

merci encore!^^

Comme ça, j'ai du mal à visualiser. Avec un exemple, ça serait sûrement plus facile.

A+

EDIT : je viens de voir ton exemple.

J'ai du mal à faire le rapprochement avec l'énoncé de départ qui concernait 3 colonnes (B, C et D) avec des dates en colonne B.

Je te réponds dès que possible.

A+

Bon, je m'étais focalisé sur la feuille "Tableau" alors que le tableau est en feuille 2 (il est grand temps que je me couche).

Pour que ça fonctionne correctement, il faut préciser sur quelle feuille s'applique l'instruction.

A+

Merci merci et encore merci!

tu m'as donné la solution et en prime j'ai compris (ce qui n’était pas gagné!^^)!

Bonne nuit! ^^