Liens vers cellules

[Harvey]

Bonsoir tout le monde,

J'ai une feuille qui se décompose en deux parties :
une partie statique servant de menu et une autre où figurent trois tableaux. Dans la partie statique, il y a trois boutons, chaque bouton renvoie vers un tableau...
Mon problème est le suivant, quand je clique sur chacun des boutons tout se passe normalement, chaque bouton pointe vers la bonne cellule, excepté si je passe du bouton 3 ("rouge" dans l'exemple) au bouton 2 ("vert" dans l'exemple). La cellule "atteinte" semble être celle située au dessus de la cellule "visée" ?

Merci pour vos réponses.

 

[Guillaumega]

Re : Liens vers cellules

pas moi, je suis trop nul...

 

[Harvey]

Re : Liens vers cellules

lol, merci pour ton aide en tous cas...

 

[Harvey]

Re : Liens vers cellules

Je renvoie le fichier au cas où... et j'en profite pour reformuler ma demande : je souhaiterais empêcher l'utilisation de l'ascenseur dans la partie non-statique (bas) de la feuille ?

Merci d'avance pour vos réponses.

 

[Mytå]

Re : Liens vers cellules

Salut le Forum

Harvey essai en jouant avec le scroll area si cela te conviens

Private Sub CommandButton1_Click()
Reset_Home
Application.GoTo Reference:=ActiveSheet.Range("A11"), Scroll:=True
ScrollArea = "A12:A36"
End Sub
Private Sub CommandButton2_Click()
Reset_Home
Application.GoTo Reference:=ActiveSheet.Range("A39"), Scroll:=True
ScrollArea = "A40:A64"
End Sub
Private Sub CommandButton3_Click()
Reset_Home
Application.GoTo Reference:=ActiveSheet.Range("A67"), Scroll:=True
ScrollArea = "A68:A92"
End Sub
Sub Reset_Home()
ScrollArea = ""
Application.GoTo Reference:=ActiveSheet.Range("A1")
End Sub

Mytå

 

[Harvey]

Re : Liens vers cellules

Salut Mytå,

Impec... Un grand grand merci pour ton aide.

Bonne fin de journée.