Je suis actuellement en train de developper un systeme=20
d'information pour l'entreprise dans laquelle je travaille.
Voil=E0 je rencontre un s=E9rieux pb.
Lorsque je cr=E9=E9 sous excel 2000 un lien hypertext et que=20
je clique sur ce lien (par exemple un fichier word).=20
Lorsque je ferme le le destinataire du lien au lieu de=20
revenir sur mon document excel, je me retrouve sur le=20
bureau et le document excel =E0 =E9t=E9 minimis=E9 ce qui m'oblige=20
=E0 le r=E9agrandir.
Si je fais cette m=EAme op=E9ration en cliquant droit sur le=20
lien et en pr=E9cisant ouvrir dans une nouvelle fen=EAtre,=20
cela fonctionne, lorsque je ferme le lien destinataire, je=20
me retrouve bien sur mon document excel. Alors j'aimerais=20
savoir comment faire pour que l'utilisateur de mon=20
application puisse obtenir ce r=E9sultat en cliquant gauche=20
normalement.
Je serais tr=E8s heureux de pouvoir avoir la r=E9ponse =E0 cette=20
question.
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
PMO
Bonjour,
Une astuce qui n'a pour défauts que son inélégance et le fait de passer par du VBA mais qui résoud votre problème (du moins ça fonctionne chez moi et je n'ai pas trouvé mieux).
DEMARCHE A SUIVRE: 1) Créer dans le VBE un UserForm (le nommer UserForm1) et y insérer le code suivant
********** Private Sub UserForm_Activate() Me.Hide Application.WindowState = xlNormal End Sub **********
2) Dans le ThisWorkbook du VBE insérer le code suivant
********** Private Sub Workbook_SheetFollowHyperlink _ (ByVal Sh As Object, _ ByVal Target As Hyperlink) Application.ScreenUpdating = False UserForm1.Show End Sub **********
EXPLICATIONS Chaque fois que vous cliquez sur un hyperlien la procédure évènementielle "Private Sub Workbook_SheetFollowHyperlink" se déclenche. On se retrouve dans le document visé (un document Word par exemple) mais la macro susnommée n'est pas terminée. Le fait de fermer le document visé redonne la main à la macro qui active le UserForm1. Cela déclenche la procédure évènementielle "Private Sub UserForm_Activate" qui cache le UserForm1 et réaffiche normalement la fenêtre Excel.
Si vous ne trouvez pas mieux, ça a le mérite de fonctionner.
A plus.
PMO Patrick Morange
-----Message d'origine----- Bonjour !
Je suis actuellement en train de developper un systeme d'information pour l'entreprise dans laquelle je travaille.
Voilà je rencontre un sérieux pb.
Lorsque je créé sous excel 2000 un lien hypertext et que je clique sur ce lien (par exemple un fichier word). Lorsque je ferme le le destinataire du lien au lieu de revenir sur mon document excel, je me retrouve sur le bureau et le document excel à été minimisé ce qui m'oblige
à le réagrandir.
Si je fais cette même opération en cliquant droit sur le lien et en précisant ouvrir dans une nouvelle fenêtre, cela fonctionne, lorsque je ferme le lien destinataire, je
me retrouve bien sur mon document excel. Alors j'aimerais
savoir comment faire pour que l'utilisateur de mon application puisse obtenir ce résultat en cliquant gauche
normalement.
Je serais très heureux de pouvoir avoir la réponse à cette
question.
Merci d'avance.
..
.
Bonjour,
Une astuce qui n'a pour défauts que son inélégance
et le fait de passer par du VBA mais qui résoud votre
problème (du moins ça fonctionne chez moi et je n'ai
pas trouvé mieux).
DEMARCHE A SUIVRE:
1) Créer dans le VBE un UserForm (le nommer UserForm1)
et y insérer le code suivant
**********
Private Sub UserForm_Activate()
Me.Hide
Application.WindowState = xlNormal
End Sub
**********
2) Dans le ThisWorkbook du VBE insérer le code suivant
**********
Private Sub Workbook_SheetFollowHyperlink _
(ByVal Sh As Object, _
ByVal Target As Hyperlink)
Application.ScreenUpdating = False
UserForm1.Show
End Sub
**********
EXPLICATIONS
Chaque fois que vous cliquez sur un hyperlien la procédure
évènementielle "Private Sub Workbook_SheetFollowHyperlink"
se déclenche.
On se retrouve dans le document visé (un document Word par
exemple) mais la macro susnommée n'est pas terminée.
Le fait de fermer le document visé redonne la main à la
macro qui active le UserForm1.
Cela déclenche la procédure évènementielle
"Private Sub UserForm_Activate" qui cache le UserForm1
et réaffiche normalement la fenêtre Excel.
Si vous ne trouvez pas mieux, ça a le mérite de
fonctionner.
A plus.
PMO
Patrick Morange
-----Message d'origine-----
Bonjour !
Je suis actuellement en train de developper un systeme
d'information pour l'entreprise dans laquelle je
travaille.
Voilà je rencontre un sérieux pb.
Lorsque je créé sous excel 2000 un lien hypertext et que
je clique sur ce lien (par exemple un fichier word).
Lorsque je ferme le le destinataire du lien au lieu de
revenir sur mon document excel, je me retrouve sur le
bureau et le document excel à été minimisé ce qui
m'oblige
à le réagrandir.
Si je fais cette même opération en cliquant droit sur le
lien et en précisant ouvrir dans une nouvelle fenêtre,
cela fonctionne, lorsque je ferme le lien destinataire,
je
me retrouve bien sur mon document excel. Alors
j'aimerais
savoir comment faire pour que l'utilisateur de mon
application puisse obtenir ce résultat en cliquant
gauche
normalement.
Je serais très heureux de pouvoir avoir la réponse à
cette
Une astuce qui n'a pour défauts que son inélégance et le fait de passer par du VBA mais qui résoud votre problème (du moins ça fonctionne chez moi et je n'ai pas trouvé mieux).
DEMARCHE A SUIVRE: 1) Créer dans le VBE un UserForm (le nommer UserForm1) et y insérer le code suivant
********** Private Sub UserForm_Activate() Me.Hide Application.WindowState = xlNormal End Sub **********
2) Dans le ThisWorkbook du VBE insérer le code suivant
********** Private Sub Workbook_SheetFollowHyperlink _ (ByVal Sh As Object, _ ByVal Target As Hyperlink) Application.ScreenUpdating = False UserForm1.Show End Sub **********
EXPLICATIONS Chaque fois que vous cliquez sur un hyperlien la procédure évènementielle "Private Sub Workbook_SheetFollowHyperlink" se déclenche. On se retrouve dans le document visé (un document Word par exemple) mais la macro susnommée n'est pas terminée. Le fait de fermer le document visé redonne la main à la macro qui active le UserForm1. Cela déclenche la procédure évènementielle "Private Sub UserForm_Activate" qui cache le UserForm1 et réaffiche normalement la fenêtre Excel.
Si vous ne trouvez pas mieux, ça a le mérite de fonctionner.
A plus.
PMO Patrick Morange
-----Message d'origine----- Bonjour !
Je suis actuellement en train de developper un systeme d'information pour l'entreprise dans laquelle je travaille.
Voilà je rencontre un sérieux pb.
Lorsque je créé sous excel 2000 un lien hypertext et que je clique sur ce lien (par exemple un fichier word). Lorsque je ferme le le destinataire du lien au lieu de revenir sur mon document excel, je me retrouve sur le bureau et le document excel à été minimisé ce qui m'oblige
à le réagrandir.
Si je fais cette même opération en cliquant droit sur le lien et en précisant ouvrir dans une nouvelle fenêtre, cela fonctionne, lorsque je ferme le lien destinataire, je
me retrouve bien sur mon document excel. Alors j'aimerais
savoir comment faire pour que l'utilisateur de mon application puisse obtenir ce résultat en cliquant gauche
normalement.
Je serais très heureux de pouvoir avoir la réponse à cette