Discussion :

[iIncoming]

Bonjour,

Je me trouve sur ma feuille "Panneau de gestion" et je souhaite, en cliquant sur un bouton auquel j'associe la macro ci-dessous, me rendre sur une autre feuille nommée "UN NOM". Ce n'est ni plus ni moins qu'un lien via bouton.

Code :

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

1
2
3
4
5
Sub LinkNOM()
    Sheets("UN NOM").Range("A1").Select
    ActiveWindow.SmallScroll up:=ActiveCell.Row
    ActiveWindow.SmallScroll Down:=ActiveCell.Row - 1
End Sub

Lorsque je clique sur mon bouton, au lieu qu'EXCEL m'envoie vers elle, il m'affiche une erreur 1004 :

"La méthode Select de la classe Range a échoué".

Avez-vous une idée d'où pourrait venir mon problème ?

Merci,
iIncoming

[titou31000]

Bonjour,

Essaye quelque chose comme ça

Code :

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

1
2
3
Sheets("Feuil2").Activate
 
ActiveSheet.Range("A3").Select

[iIncoming]

Merci ça marche très bien avec votre solution !

[EngueEngue]

Sinon tu as aussi les liens hypertexte!

[iIncoming]

Sinon tu as aussi les liens hypertexte!

Sur un bouton ? Comment ça marche ?

[EngueEngue]

et bien tu insères un lien hypertexte dans la textbox du bouton

[iIncoming]

Ah... Oui j'aimerais bien mais comment ajouter ça par macro ?
Auriez-vous un lien vers un guide ? Ou un morceau de code qui illustre ça ?