sélection ligne fonction date

[JORDAN]

Bonjour le Forum,

J'essaye sans succès de sélectionner la ligne de la date du jour. Jé m'explique :

Colonne A de la feuille Remises, j'ai des dates du 01/01/2006 au 31/12/2006 et lorsque je viens sur cette feuille, sélection faite par :

j'aimerai que la cellule correspondant à la date du jour soit sélectionnée.

J'ai bien fait des essais mais sans succès

For i = 1 To 400
If Cells(1, 1) = DATELIGNE Then
Cells(1, 1).Select
End If
Next i

Comment dire à DATELIGNE que c'est aujourdhui sa valeur ?

Merci à vous tous
a+

 

[AV]

Re,

''..Question subsidiaire?
Comment faire la même chose dans une Listbox, j'ai des mises à jour à faire sur un tableau du 1 au 31 décembre et je souhaite que ma listbox en initialisant ce positionne sur la date du jour...''

Avec une plage nommée ''lesDates''

A mettre dans le module de l'UserF :

Private Sub UserForm_Initialize()
ListBox1.ListIndex = [match(today(),LesDates,0)] - 1
End Sub

AV [aaa]

 

[AV]

Re,

''...quand n'est-il pour avoir la même possibilité dans le Match ...''

Avec la date à chercher en E1, on peut aussi passer par la méthode ''Evaluate'' :

Cells([Match(E1, A:A, 0)], 1).Select

AV [aaa]

 

[JCGL]

Re à tous,

Parfait... AV et PierreJean

Comme d'habitude

Merci encore

 

[CB60]

re bonjour le Forum

Merci à vous pour cette culture débordante.

voici l'instruction que j'avais dans ma listbox:
ListBox1.RowSource = 'Database!' & Plage
je l'ai remplacé par celle ci:
ListBox1.ListIndex = 'Database!' & [match(today(),Dates,0)] - 1
Mais USF ne s'ouvre pas
Bruno

 

[AV]

Re,

''..ListBox1.RowSource = 'Database!' & Plage
je l'ai remplacé par celle ci:
ListBox1.ListIndex = 'Database!' & [match(today(),Dates,0)] - 1
Mais USF ne s'ouvre pas...''

Pourquoi te compliquer en initialisant la ListBox au lieu de mettre directement la plage de référence dans les propriétés (RowSource)?

Regarde l'exemple et adapte
AV [aaa] [file name=Listbox_Dates.zip size=9241]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Listbox_Dates.zip[/file]

 

[CB60]

Re Tous
Je regarde si je peux utiliser
Merci
Bruno

 

[CB60]

Re le Forum
AV j'ai réussi à mettre en place ton bout de code ( heureusement qu'il y avait le fichier joint!)
Merci
Bruno