Dans Base, j’ai une table contenant des URL (ex : João Gilberto — Wikipédia).
Je voudrais me connecter dans mon navigateur au site référencé soit via un clic (macro ?) soit via un bouton (macro ?).
Dans libre Office Base, quel est la correspondance pour le type de zone de Microsoft Accès : “Lien hypertexte” ?
Une amorce de solution serait la bienvenue.
Merci d’avance.
Utiliser la table “Personne Reference” ou le formulaire “Personne”
Bonjour,
Pas certain de comprendre tous les éléments de votre problématique. Il me faudrait plus d’éclaircissement sur votre demande. Joignez un exemple. Je pense que votre souci est simple. pour ouvrir une URL dans writer ou dans calc (base ou pas) il faut que cette dernière soit bleue. pour cela vous collez l’url dans votre base puis vous vous placez à la fin de cette url et faites un espace. L’url passe de noir à bleu. elle devient active. pour l’ouvrir il suffit d’appuyer sur la touche ctrl et avec la souris vous cliquez sur l’url.
si ma réponse vous convient cliquez sur Ѵ et “votez” en cliquant sur la flèche ^ si vous trouvez la réponse utile. je suis votre question si vous avez besoin de précisions.
Thierry
ouvrir une url.ods
Votre solution fonctionne très bien dans Witer ou Calc, mais ne fonctionne pas dans Base (gestionnaire de BD de libre office).
J’ai fait une copie de Calc dans Base : sans résultat l’url s’affiche sous forme de texte et perd son formatage.
J’ai joint à mon message original une copie de la base de données.
je regarde 
je vais essayer de créer une base. D’après ce que je crois il s’agit d’insérer une ligne avec un hyper lien comme ici.mais je crois comprendre après recherche qu’i n’y a pas de champs html dans base
une piste [Résolu] lier un fichier à un formulaire (Consulter le sujet) • Forum OpenOffice LibreOffice NeoOffice
il faut créer une zone de texte où coller l’url
La macro (très basic) suivante fonctionne parfaitement;
Il me faut maintenant récupérer l’adresse dans la base de données
SubstitutHperlien
sub Substitut Hyperlien
dim sv as object
dim Adresse as string
sv = createUnoService("com.sun.star.system.SystemShellExecute")
adresse = "https://fr.wikipedia.org/wiki/The_Andrews_Sisters"
sv.execute(Adresse, "",0)
End Submerci de cliquer et voter 
La macro aurait pu ressembler à quelque chose comme ceci :
sub Hyperlien_MouseUp(Sender as TObject, Button as TMouseButton, Shift as TshiftState, X as Integer, Y as integer)
dim sv as object
on error goto Hyperlien_MouseUp_Error
if button = mbRight then
sv = createUnoService("com.sun.star.system.SystemShellExecute")
sv.execute(sender.source.model.currentcalue, "",0)
end if
exit sub
Hyperlien_MouseUp_Error:
msgbox "Ce lien n'est pas valide"
end sub
mais si ça passe à la compilation, il y a une erreur au moment de l’exécution : nombre de paramètres incorrect.
On en est donc réduit à ceci :
sub Hyperlien_MouseUp(Sender as TObject)
dim sv as object
on error goto Hyperlien_MouseUp_Error
sv = createUnoService("com.sun.star.system.SystemShellExecute")
sv.execute(sender.source.model.currentcalue, "",0)
exit sub
Hyperlien_MouseUp_Error:
msgbox "Ce lien n'est pas valide"
end sub
Cette solution ne me satisfait pas pleinement ! Je comptais garder le clic gauche pour la sélection et utiliser le clic droit pour l’affichage du lien.
Je vais donc devoir trouver un gestionnaire de base de données qui sera plus sérieux que Libre Office Base; je suis en train de tester “Visual studio” de Microsoft