Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel VBA liens hypertexte qui cadre en début de page

VBA liens hypertexte qui cadre en début de page

14 réponses
Avatar
twinley
Bonjour à tous,

Dans une feuille je crée des liens hypertexte en début de page ce qui crée
un index des lignes ou je peux accéder rapidement.
Par exemple un lien hypertexte situé en A3 me renvoi à la ligne 50 pour lire
ce qui se trouve à partir de la ligne 50 et en dessous.

Or le lien hypertexte cadre la ligne 50 en bas de page, ce qui oblige à
faire un scroll.

Je ne vois pas par quel bout prendre le Pb. Existe t-il une option ?

Comment forcer le lien hypertexte à cadrer la ligne 50 en haut de page ?

Merci pour votre aide

--
à+twinley
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
JièL Goubert
Bonjoir(c) twinley

Le 19/10/2004 15:15 vous avez écrit ceci :
Bonjour à tous,

Comment forcer le lien hypertexte à cadrer la ligne 50 en haut de page ?


Je ne sais pas si ça va t'aider, mais si tu prend un zone plus grande il est
obligé de l'afficher en haut.

Merci pour votre aide


--
La FAQ Outlook est la : http://faq.outlook.free.fr
JièL / Jean-Louis GOUBERT
Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application
http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm

Avatar
isabelle
bonjour twinley,

copie cette macro sur la page code de la feuille.

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Bonjour à tous,

Dans une feuille je crée des liens hypertexte en début de page ce qui crée
un index des lignes ou je peux accéder rapidement.
Par exemple un lien hypertexte situé en A3 me renvoi à la ligne 50 pour lire
ce qui se trouve à partir de la ligne 50 et en dessous.

Or le lien hypertexte cadre la ligne 50 en bas de page, ce qui oblige à
faire un scroll.

Je ne vois pas par quel bout prendre le Pb. Existe t-il une option ?

Comment forcer le lien hypertexte à cadrer la ligne 50 en haut de page ?

Merci pour votre aide

--
à+twinley


Avatar
twinley
Merci pour ta réponse JièL

Les liens sont créés par macro.
Le lien pointe et encadre une seule ligne qui est l'entête d'un texte de
longueur variable dessous.
Le nombre de lignes est différent à chaque fois, et pour utiliser ton astuce
il faut que je crée une adresse avec un offset de 34. Mais alors c'est les
liens du haut de page qui disparaîtront.
Ou alors encadrer le texte associé à ce lien puis désélectionner. Mais je
perd la simplicité de création des hypertextes.

Si il n'y a pas de paramètres optionnels, c'est plus simple et moins élégant
de faire un scroll.
Mais je vais rebuter sur le Pb, car là je m'entraînais pour une autre
applic.

C'est déjà bien de savoir que cette limitation existe. Si personne n'a de
solution... bien sûr.

--
à+twinley
"JièL Goubert" a écrit dans le
message de news:%
Bonjoir(c) twinley

Le 19/10/2004 15:15 vous avez écrit ceci :
Bonjour à tous,

Comment forcer le lien hypertexte à cadrer la ligne 50 en haut de page ?


Je ne sais pas si ça va t'aider, mais si tu prend un zone plus grande il
est

obligé de l'afficher en haut.

Merci pour votre aide


--
La FAQ Outlook est la : http://faq.outlook.free.fr
JièL / Jean-Louis GOUBERT
Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application
http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm



Avatar
twinley
Génial!!!!!!!!!!!

Ça marche super.

Ce qui est moins génial c'est que j'ai 60 feuilles pour l'instant. Je vais
me mettre en quête d'une macro qui écrit une macro dans un module feuille.

Comme j'ai 650 liens, je t'envoi 650 mercis...

--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie cette macro sur la page code de la feuille.

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Bonjour à tous,

Dans une feuille je crée des liens hypertexte en début de page ce qui
crée


un index des lignes ou je peux accéder rapidement.
Par exemple un lien hypertexte situé en A3 me renvoi à la ligne 50 pour
lire


ce qui se trouve à partir de la ligne 50 et en dessous.

Or le lien hypertexte cadre la ligne 50 en bas de page, ce qui oblige à
faire un scroll.

Je ne vois pas par quel bout prendre le Pb. Existe t-il une option ?

Comment forcer le lien hypertexte à cadrer la ligne 50 en haut de page ?

Merci pour votre aide

--
à+twinley




Avatar
isabelle
bonjour twinley,

copie celle ci à la place, mais cette fois ci sur la page code de ThisWorkbook

Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Génial!!!!!!!!!!!

Ça marche super.

Ce qui est moins génial c'est que j'ai 60 feuilles pour l'instant. Je vais
me mettre en quête d'une macro qui écrit une macro dans un module feuille.

Comme j'ai 650 liens, je t'envoi 650 mercis...

--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie cette macro sur la page code de la feuille.

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Bonjour à tous,

Dans une feuille je crée des liens hypertexte en début de page ce qui
crée


un index des lignes ou je peux accéder rapidement.
Par exemple un lien hypertexte situé en A3 me renvoi à la ligne 50 pour
lire


ce qui se trouve à partir de la ligne 50 et en dessous.

Or le lien hypertexte cadre la ligne 50 en bas de page, ce qui oblige à
faire un scroll.

Je ne vois pas par quel bout prendre le Pb. Existe t-il une option ?

Comment forcer le lien hypertexte à cadrer la ligne 50 en haut de page ?

Merci pour votre aide

--
à+twinley






Avatar
twinley
Arrrgh Isabelle, j'en peux plus...

C'est la perfection rêvée.

Je double la dose de merci.
--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie celle ci à la place, mais cette fois ci sur la page code de
ThisWorkbook


Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target
As Hyperlink)

Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Génial!!!!!!!!!!!

Ça marche super.

Ce qui est moins génial c'est que j'ai 60 feuilles pour l'instant. Je
vais


me mettre en quête d'une macro qui écrit une macro dans un module
feuille.



Comme j'ai 650 liens, je t'envoi 650 mercis...

--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie cette macro sur la page code de la feuille.

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Bonjour à tous,

Dans une feuille je crée des liens hypertexte en début de page ce
qui




crée
un index des lignes ou je peux accéder rapidement.
Par exemple un lien hypertexte situé en A3 me renvoi à la ligne 50
pour




lire
ce qui se trouve à partir de la ligne 50 et en dessous.

Or le lien hypertexte cadre la ligne 50 en bas de page, ce qui
oblige à




faire un scroll.

Je ne vois pas par quel bout prendre le Pb. Existe t-il une option ?

Comment forcer le lien hypertexte à cadrer la ligne 50 en haut de
page ?





Merci pour votre aide

--
à+twinley








Avatar
isabelle
ce fut avec plaisir twinley,
isabelle


Arrrgh Isabelle, j'en peux plus...

C'est la perfection rêvée.

Je double la dose de merci.
--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie celle ci à la place, mais cette fois ci sur la page code de
ThisWorkbook


Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target
As Hyperlink)

Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Génial!!!!!!!!!!!

Ça marche super.

Ce qui est moins génial c'est que j'ai 60 feuilles pour l'instant. Je
vais


me mettre en quête d'une macro qui écrit une macro dans un module
feuille.



Comme j'ai 650 liens, je t'envoi 650 mercis...

--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie cette macro sur la page code de la feuille.

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Bonjour à tous,

Dans une feuille je crée des liens hypertexte en début de page ce
qui




crée
un index des lignes ou je peux accéder rapidement.
Par exemple un lien hypertexte situé en A3 me renvoi à la ligne 50
pour




lire
ce qui se trouve à partir de la ligne 50 et en dessous.

Or le lien hypertexte cadre la ligne 50 en bas de page, ce qui
oblige à




faire un scroll.

Je ne vois pas par quel bout prendre le Pb. Existe t-il une option ?

Comment forcer le lien hypertexte à cadrer la ligne 50 en haut de
page ?





Merci pour votre aide

--
à+twinley










Avatar
jps
n'en fais quand même pas trop, twinley : tu sais, comme moi, que les anges
sont asexués...
jps

"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:
Arrrgh Isabelle, j'en peux plus...

C'est la perfection rêvée.

Je double la dose de merci.
--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie celle ci à la place, mais cette fois ci sur la page code de
ThisWorkbook


Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal
Target


As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Génial!!!!!!!!!!!

Ça marche super.

Ce qui est moins génial c'est que j'ai 60 feuilles pour l'instant. Je
vais


me mettre en quête d'une macro qui écrit une macro dans un module
feuille.



Comme j'ai 650 liens, je t'envoi 650 mercis...

--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie cette macro sur la page code de la feuille.

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Bonjour à tous,

Dans une feuille je crée des liens hypertexte en début de page ce
qui




crée
un index des lignes ou je peux accéder rapidement.
Par exemple un lien hypertexte situé en A3 me renvoi à la ligne 50
pour




lire
ce qui se trouve à partir de la ligne 50 et en dessous.

Or le lien hypertexte cadre la ligne 50 en bas de page, ce qui
oblige à




faire un scroll.

Je ne vois pas par quel bout prendre le Pb. Existe t-il une option
?






Comment forcer le lien hypertexte à cadrer la ligne 50 en haut de
page ?





Merci pour votre aide

--
à+twinley












Avatar
twinley
Salut jps,

Je me force pas et de toute façon je suis pas un ange...Dès que je vois un
jupon, je plonge.

--
à+twinley
"jps" a écrit dans le message de
news:
n'en fais quand même pas trop, twinley : tu sais, comme moi, que les anges
sont asexués...
jps

"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:
Arrrgh Isabelle, j'en peux plus...

C'est la perfection rêvée.

Je double la dose de merci.
--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie celle ci à la place, mais cette fois ci sur la page code de
ThisWorkbook


Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal
Target


As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Génial!!!!!!!!!!!

Ça marche super.

Ce qui est moins génial c'est que j'ai 60 feuilles pour l'instant.
Je




vais
me mettre en quête d'une macro qui écrit une macro dans un module
feuille.



Comme j'ai 650 liens, je t'envoi 650 mercis...

--
à+twinley
"isabelle" a écrit dans le message de
news:
bonjour twinley,

copie cette macro sur la page code de la feuille.

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Application.Goto Reference:¬tiveCell, scroll:=True
End Sub

isabelle


Bonjour à tous,

Dans une feuille je crée des liens hypertexte en début de page
ce






qui
crée
un index des lignes ou je peux accéder rapidement.
Par exemple un lien hypertexte situé en A3 me renvoi à la ligne
50






pour
lire
ce qui se trouve à partir de la ligne 50 et en dessous.

Or le lien hypertexte cadre la ligne 50 en bas de page, ce qui
oblige à




faire un scroll.

Je ne vois pas par quel bout prendre le Pb. Existe t-il une
option






?

Comment forcer le lien hypertexte à cadrer la ligne 50 en haut
de






page ?

Merci pour votre aide

--
à+twinley
















Avatar
Modeste
-----Message d'origine-----
comme moi, que les anges sont asexués...
jps
je ne te crois pas Jean-paul !!!

hermaphrodite... je ne l'aurai pas cru non plus !!!!

;o)))

1 2