Discussion :

[lelou54]

Bonjour

voilà j'ai créer un bouton qui me permet d'aller sur une feuille que j'ai définis, ce bouton fonctionne très bien mais je n'arrive pas à faire que ce bouton me fasse aller sur la feuille choisi à un endroit précis
Je vous donne un exemple pour etre un peu plus explicite:

j'ai créer un bouton sur ma feuil1 pour me faire aller sur la feuil2 (celui-ci fonctionne bien )
Par contre je n'arrive pas à le programmer pour qu'il aille sur la feuil2 sur la cellule C46 par exemple

Merci de vos réponse

[ullan]

Bonjour,

Pourquoi vouloir réinventer ce que Excel a prévu de façon native ?

En nommant Feuil2!C46 (menu Insertion - Nom - Définir), ce nom est disponible sur toutes les feuilles dans la petite fenêtre à l'extrême gauche de la barre de formule (qui affiche aussi la référence de la cellule active).
En cliquant sur la petite flèche à la droite de cette fenêtre, une liste déroulante s'ouvre dans laquelle il suffit de cliquer sur le nom retenu pour se déplacer sur la cellule concernée.

[Nad-Dan]

Bonjour

Ajoute à ton code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range ("C46").Select

Amicalement
Nad

[lelou54]

Bonjour,

j'ai essayé de rajouter ta ligne de commande mais ça ne fonctionne pas
il me met une erreur
J'ai tapé le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CommandButton1_Click()
Sheets("Feuil2").Activate.Range("C46").Select
End Sub

il y a t'il une erreur??
Merci de vos réponse

[Invité]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub CommandButton1_Click()
Sheets("Feuil2").Activate
Range("C46").Select
End Sub

[lelou54]

Bonjour,

j'ai essayé de taper la ligne de commande que tu m'as donnée, et cela me donne une erreur 1004, je ne comprends pas!!!!!!

Voilà la ligne de code que j'ai tapée:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub CommandButton1_Click()
Sheets("Feuil2").Activate
Range("C46").Select
End Sub