J’aimerais, à l’aide d’une macro qu’on me demande d’entrer une date pour
ensuite rechercher cette date dans la collone "L" entre les cellules L10 et
L 2770 sur cette même feuille.
Merci de bien vouloir m’écrire le code, je suis débutante
d = InputBox("Date? jj/mm/aa") If d <> "" Then On Error Resume Next [L10:L2770].Find(What:Íate(d), LookIn:=xlValues).Select If Err <> 0 Then MsgBox "Inconnu" End If
http://cjoint.com/?ksvkeRfmoi
Cordialement JB
Bonjour,
J'aimerais, à l'aide d'une macro qu'on me demande d'entrer une date pour ensuite rechercher cette date dans la collone "L" entre les cellules L1 0 et L 2770 sur cette même feuille.
Merci de bien vouloir m'écrire le code, je suis débutante
Caro.
Bonsoir,
Si les dates sont saisies sous la forme jj/mm/aa:
d = InputBox("Date? jj/mm/aa")
If d <> "" Then
On Error Resume Next
[L10:L2770].Find(What:=CDate(d), LookIn:=xlValues).Select
If Err <> 0 Then MsgBox "Inconnu"
End If
http://cjoint.com/?ksvkeRfmoi
Cordialement JB
Bonjour,
J'aimerais, à l'aide d'une macro qu'on me demande d'entrer une date pour
ensuite rechercher cette date dans la collone "L" entre les cellules L1 0 et
L 2770 sur cette même feuille.
Merci de bien vouloir m'écrire le code, je suis débutante
d = InputBox("Date? jj/mm/aa") If d <> "" Then On Error Resume Next [L10:L2770].Find(What:Íate(d), LookIn:=xlValues).Select If Err <> 0 Then MsgBox "Inconnu" End If
http://cjoint.com/?ksvkeRfmoi
Cordialement JB
Bonjour,
J'aimerais, à l'aide d'une macro qu'on me demande d'entrer une date pour ensuite rechercher cette date dans la collone "L" entre les cellules L1 0 et L 2770 sur cette même feuille.
Merci de bien vouloir m'écrire le code, je suis débutante
Caro.
Caro
Ça marche, super.
Merci beaucoup.
"JB" wrote:
Bonsoir,
Si les dates sont saisies sous la forme jj/mm/aa:
d = InputBox("Date? jj/mm/aa") If d <> "" Then On Error Resume Next [L10:L2770].Find(What:Íate(d), LookIn:=xlValues).Select If Err <> 0 Then MsgBox "Inconnu" End If
http://cjoint.com/?ksvkeRfmoi
Cordialement JB
Bonjour,
J'aimerais, à l'aide d'une macro qu'on me demande d'entrer une date pour ensuite rechercher cette date dans la collone "L" entre les cellules L10 et L 2770 sur cette même feuille.
Merci de bien vouloir m'écrire le code, je suis débutante
Caro.
Ça marche, super.
Merci beaucoup.
"JB" wrote:
Bonsoir,
Si les dates sont saisies sous la forme jj/mm/aa:
d = InputBox("Date? jj/mm/aa")
If d <> "" Then
On Error Resume Next
[L10:L2770].Find(What:Íate(d), LookIn:=xlValues).Select
If Err <> 0 Then MsgBox "Inconnu"
End If
http://cjoint.com/?ksvkeRfmoi
Cordialement JB
Bonjour,
J'aimerais, à l'aide d'une macro qu'on me demande d'entrer une date pour
ensuite rechercher cette date dans la collone "L" entre les cellules L10 et
L 2770 sur cette même feuille.
Merci de bien vouloir m'écrire le code, je suis débutante
d = InputBox("Date? jj/mm/aa") If d <> "" Then On Error Resume Next [L10:L2770].Find(What:Íate(d), LookIn:=xlValues).Select If Err <> 0 Then MsgBox "Inconnu" End If
http://cjoint.com/?ksvkeRfmoi
Cordialement JB
Bonjour,
J'aimerais, à l'aide d'une macro qu'on me demande d'entrer une date pour ensuite rechercher cette date dans la collone "L" entre les cellules L10 et L 2770 sur cette même feuille.
Merci de bien vouloir m'écrire le code, je suis débutante
