On suppose que les dates de la colonne A sont sous la forme jj/mm/aa:
On Error Resume Next [A:A].Find(What:Íate(Date), LookIn:=xlValues).Select If Err <> 0 Then MsgBox "Inconnu"
Si le format est différent, adapater:
[A:A].Find(What:=Format(Date, "dddd d mmmm yyyy"), LookIn:=xlValues).Select
JB
On 15 mar, 19:27, "Louis XV" wrote:
Bonjour à tous
Comment sélectionner la ligne qui contient la date du jour en VBA
Les dates sont dans la colonne A
Merci d'avance
Louis XV
Merci infiniment JB Louis "JB" a écrit dans le message de news:
Bonsoir,
On suppose que les dates de la colonne A sont sous la forme jj/mm/aa:
On Error Resume Next [A:A].Find(What:Íate(Date), LookIn:=xlValues).Select If Err <> 0 Then MsgBox "Inconnu"
Si le format est différent, adapater:
[A:A].Find(What:=Format(Date, "dddd d mmmm yyyy"), LookIn:=xlValues).Select
JB
On 15 mar, 19:27, "Louis XV" wrote:
Bonjour à tous
Comment sélectionner la ligne qui contient la date du jour en VBA
Les dates sont dans la colonne A
Merci d'avance
Merci infiniment JB
Louis
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1173985120.680396.184930@e65g2000hsc.googlegroups.com...
Bonsoir,
On suppose que les dates de la colonne A sont sous la forme jj/mm/aa:
On Error Resume Next
[A:A].Find(What:Íate(Date), LookIn:=xlValues).Select
If Err <> 0 Then MsgBox "Inconnu"
Si le format est différent, adapater:
[A:A].Find(What:=Format(Date, "dddd d mmmm yyyy"),
LookIn:=xlValues).Select
JB
On 15 mar, 19:27, "Louis XV" <loui...@lepape.fr> wrote:
Bonjour à tous
Comment sélectionner la ligne qui contient la date du jour en VBA