Date

[Am Alive]

Bonjour à tous
j'ai deux questions et j'espère trouver une réponse
1ère: Comment saisie dans une cellule une date
du 01/05/2006 au 31/05/2006
2eme: code en VBA
Si la date saisie dans la cellule est du 01/05/2006 = la date de l'ordinateur Then
MsgBox('.......')
Merci d'avance

 

[Dan]

Bonjour,

1. tu tapes la date concernée et tu mets le format souhaité par menu / format / cellule puis dans nombre/catégorie tu sélectionnes 'personnalisé' puis tu mets le format jj/mm/aa.

2. VBA :

Sub control()
Dim c As Range
For Each c In Range('A1:A100')
If c.Value = Date Then
MsgBox '...'
End If
Next c
End Sub

Si pb n'hésite pas

 

[Am alive]

ReBonjour
Merci Dan pour votre réponse,j'ai exécuter le Macro,mais le MsgBox n'apparaitre pas
Merci d'avance

 

[Dan]

Bonsoir,

Bon vérifie ces 2 conditions ;

1. La date doit se trouver dans la colonne A entre A1 et A100
2. Ton message doit se placer à la place des petits points que j'ai mis. Donc entre les guillemets.