Création d'une macro de recherche

Résolu
Hamlet3 Messages postés 5 Date d'inscription dimanche 23 septembre 2007 Statut Membre Dernière intervention 7 février 2012 - 6 févr. 2012 à 12:01
Hamlet3 Messages postés 5 Date d'inscription dimanche 23 septembre 2007 Statut Membre Dernière intervention 7 février 2012 - 7 févr. 2012 à 16:13
Bonjour,
Je viens vous solliciter pour la création d'une macro sur un fichier excel.
J'ai un planning dont les dates sont dans la première colonne.
La macro me permettrai d'aller directement à la date du jour (type Aujourd'hui).
Pourriez-vous me guider, s'il vous plait.

Merci,



Être ou ne pas ...Hamlet3, utilisateur occasionnel, ... Débutant.

4 réponses

ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 234
6 févr. 2012 à 12:35
As-tu ouvert (comme je te l'ai demandé dans ton autre discussion de ce jour) ton aide VBA sur la méthode Find ? (Range.Find, méthode) ?
As-tu lu ?*
Montre-nous le code tenté après cette sage lecture (si encore difficulté !)


____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
3
ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 234
7 févr. 2012 à 06:27
Très bien, Hamlet3,
Te voilà en route vers l'indépendance


____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
3
Hamlet3 Messages postés 5 Date d'inscription dimanche 23 septembre 2007 Statut Membre Dernière intervention 7 février 2012
7 févr. 2012 à 02:27
Bonjour et merci pour votre aide,
Suite à votre conseil sur la méthode Find et après avoir déchiffrer tant bien que mal et fait plusieurs essais, voila ce que j'en ai ressorti.

Cells.Find(What:=DateValue(Now), LookAt:=xlWhole).Activate

Maintenant, je n'ai plus qu'à placer ça dans le workbook_open pour la lancer à l'ouverture de mon fichier.

Merci ucfoutu,


Être ou ne pas DÉBUTANT ... Hamlet3
0
Hamlet3 Messages postés 5 Date d'inscription dimanche 23 septembre 2007 Statut Membre Dernière intervention 7 février 2012
7 févr. 2012 à 16:13
Bonjour,

Merci encore pour votre implication et bravo pour le site!!!



Etre ou ne pas ...Hamlet3
0