Discussion :

[clarisse]

Bonjour,

je voudrai savoir si c'est possible de spécifier que la cellule à laquelle refère un lien hypertexte soit sur la première ligne de la feuille, et non pas celle de la dernière ligne.

Merci.

[doringen]

Oui, il suffit de le préciser dans le lien hypertexte:

Code :

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

1
2
3
4
5
6
Sub Makro1()
 
    Sheets("Tabelle1").Select
    Range("A1").Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
        "Tabelle2!A1"
End Sub

[clarisse]

Merci pour la réponse mais je pense que je me suis mal exprimée pour ma question :

En fait j'ai un lien hypertexte sur une feuille, et quand je clique dessus j'arrive plus bas dans la feuille, et je voudrai que la cellule sur laquelle arrive ce lien hypertexte soit sur la première ligne de la feuille, et non pas la dernière (pour un simple confort d'utilisation, pour éviter d'avoir à utiliser la molette de la souris)

j'espère être plus clair.

[SilkyRoad]

bonjour

A partir d'Excel2000 tu peux utiliser l'évènement FollowHyperlink

Code :

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

1
2
3
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    Application.Goto Reference:=ActiveCell, Scroll:=True
End Sub

michel

[clarisse]

ok merci Michel cela marche !

tu es bien matinal dis-moi.

Sinon je ne sais pas pourquoi mais quand j'utilise du code du genre if target.parent.address = "$B$27" then ... elseif target.parent.address = "$C$27" then ... etc... certains liens marchent et d'autres non

j'ai remarqué que si le lien hypertexte est créé avant d'écrire le code, le code que l'on écris n'est jamais pris en compte
c'est bizarre si tu as une explication à m'apporter..

[SilkyRoad]

Bonsoir

Je ne réussis pas à reproduire ton problème (Excel2002)
Tes liens sont tous dans le même page?


michel

[clarisse]

oui pour des liens qui sont tous dans la même page, je fais des copier coller et je change juste l'adresse de la cellule, et ils ne marchent pas tous.. c'est incompréhensible.

Et en fait j'ai remarqué cela que ceux qui ne marchaient pas étaient ceux qui ont été crées avant que j'écrive le code c'est très bizarre.
il sy en a que je n'arrive jamais à faire marcher..
au boulot je travaille avec Excel 2003.