29 juin 2008
Lien hypertexte dans Userform
Avant de partir (bientôt) en vacances, voici une démonstration en VBA de l'utilisation de lien hypertexte à l'intérieur même d'un Userform ou USF (fenêtre de saisie ou de consultation).
L'objectif étant de pouvoir lier facilement des documents complémentaires de format quelconque (Word, Pdf, Images, ...) à une "fiche" d'une base de données sous Excel, pour pouvoir les ouvrir d'un simple clic depuis l'USF.
La démo proposée ici utilise le classique FollowHyperlink pour accéder au fichier lié, mais "l'originalité" de la méthode réside principalement dans la création et la mise à jour du lien directement à partir de l'USF.
Téléchargement de USF_Hypertexte.zip
Téléchargement de USF_Hypertexte_V2.zip
L'utilisation du fichier est très classique : un bouton pour la création d'une nouvelle fiche, un double-clic sur la ligne d'un enregistrement pour la consultation/modification, un double-clic sur un intitulé de l'USF pour "aller chercher" un document à lier, un simple clic sur un lien hypertexte dans la feuille et/ou dans l'USF pour ouvrir le document lié.
Un axe d'amélioration pourrait être la gestion dynamique du nombre de liens possibles par fiche, l'actuelle démo limitant ici le nombre à 3, avec un affichage quelque peu "figé". Mais il faut dire que pour l'utilisation qui a motivé ce développement, ce nombre de 3 est parfaitement adapté. Peut être une idée pour un développe
ment futur ... ?
Bon téléchargement et je compte sur vos commentaires!! ;)
:) tatiak
Edit du 30 juin : Version 2 de la démo : le nom du fichier lié se substitue à l'indication "générique" dans l'USF.
Commentaires
Poster un commentaire
Rétroliens
URL pour faire un rétrolien vers ce message :
http://www.canalblog.com/cf/fe/tb/?bid=244825&pid=9750816
Liens vers des weblogs qui référencent ce message :