Bonjour
Je souhaite avec des boutons de commande, (pas de formulaire afin de pouvoir changer la couleur des boutons) sélectionner une cellule se trouvant sur une autre feuille en fonction d'une date sur la feuille d'origine.
J'ai réussi avec quelques recherche a créer la première partie du code, qui m'interpelle un peu du fait que je soit dans l'obligation de répéter 2 fois le nom de la feuille de destination pour que ça fonctionne, si ça peut être réduit tans mieux mais enfin ça marche.
Private Sub CommandButton1_Click()
Worksheets("Données").Activate
Worksheets("Données").Range("D15").Activate
End Sub
Maintenant, je ne parvient pas à sélectionner la cellule en fonction de la date, en F7 de la "feuil1" et dans la colonne A de "données".
Ci-joint un fichier pour exemple.
Merci d'avance de votre aide.
Joël
Je souhaite avec des boutons de commande, (pas de formulaire afin de pouvoir changer la couleur des boutons) sélectionner une cellule se trouvant sur une autre feuille en fonction d'une date sur la feuille d'origine.
J'ai réussi avec quelques recherche a créer la première partie du code, qui m'interpelle un peu du fait que je soit dans l'obligation de répéter 2 fois le nom de la feuille de destination pour que ça fonctionne, si ça peut être réduit tans mieux mais enfin ça marche.
Private Sub CommandButton1_Click()
Worksheets("Données").Activate
Worksheets("Données").Range("D15").Activate
End Sub
Maintenant, je ne parvient pas à sélectionner la cellule en fonction de la date, en F7 de la "feuil1" et dans la colonne A de "données".
Ci-joint un fichier pour exemple.
Merci d'avance de votre aide.
Joël