2010-08-21 18 views
0

J'utilise VBA dans Excel 2010 pour créer un simple programme de rappel d'anniversaire. J'ai une colonne de dates (Colonne D). Comment puis-je vérifier si une cellule est dans la semaine d'aujourd'hui?Comment vérifier si la date d'une cellule Excel est dans une semaine?

Je ne suis pas sûr de ce que la syntaxe VBA pour l'instruction conditionnelle serait:

For i = 2 To MAX_ROW 
    cell = ActiveSheet.Cells(i, 4) 
    If (Date(cell) - Date(Now()) <= 7) Then 
     MsgBox(ActiveSheet.Cells(i, 1) 
    End If 
Next 

Répondre

1

Si les cellules contiennent les anniversaires réels, vous aurez besoin de changer l'année pour l'année en cours, disent:

If DateSerial(Year(Date), Month(Cell), Day(Cell)) - Date <= 7 Then 
+0

merci! c'est exactement ce dont j'avais besoin; j'ai juste besoin de le lier> = 0 aussi, et ça marche parfaitement – echoblaze