Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    février 2007
    Messages
    83
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : février 2007
    Messages : 83
    Points : 61
    Points
    61

    Par défaut Creer par macro un lien hypertexte sur une cellule

    Bonjour,

    Je n'arrive pas par macro à affecter une valeur à une cellule et lui associer un lien hypertexte me permettant d'ouvrir le site concerné par la valeur contenu dans la cellule.

    ci-dessous le code sur lequel je bute.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
     	tabcel = feuille.getcellbyposition(1,lig) 
     	tabcel.string = LIEN_HYPERTEXTE(URL,valeur)
    Merci par anticipation pour votre aide.

    LibreOffice 6.0.7.3
    Ubuntu 18.04.2 LTS

    Cordialement

  2. #2
    Membre régulier
    Homme Profil pro
    Inscrit en
    septembre 2009
    Messages
    79
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Vendée (Pays de la Loire)

    Informations professionnelles :
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : septembre 2009
    Messages : 79
    Points : 103
    Points
    103

    Par défaut Creer par macro un lien hypertexte sur une cellule

    Bonjour,
    Réponse un peu tardive :
    Écrits plutôt comme cela : (en effet il faut utiliser FormulaLocal)

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    tabcel.FormulaLocal="=LIEN.HYPERTEXTE(""https://forum.openoffice.org/fr/forum/viewtopic.php?f=8&t=16634"";""Test"")"
    Attention au doublement des guillemets (début et fin de https et début et fin de test)

    Si ton lien se trouve dans une variable (URL), il faudra aussi veiller à doubler certains guillemets avec le code chr(34). Exemple si dessous.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Dim URL As String, sFormule As String 
    URL = "https://forum.openoffice.org/fr/forum/viewtopic.php?f=8&t=16634" 
    sFormule = "=LIEN.HYPERTEXTE(" & chr(34) & URL & chr(34) & ";" & chr(34) & "Test" & chr(34) & ")"
    tabcel.FormulaLocal = sFormule
    Cordialement
    Libre Office Version: 6.0.1.1 (x64)
    Windows 10

Discussions similaires

  1. [XL-2010] Macro copier des liens hypertexte sur une colonne
    Par zaza45 dans le forum Macros et VBA Excel
    Réponses: 14
    Dernier message: 04/06/2013, 15h30
  2. realiser un lien hypertext sur une donnee sortant d'une base mysql
    Par leclone dans le forum SQL Procédural
    Réponses: 4
    Dernier message: 27/12/2006, 15h44
  3. Réponses: 7
    Dernier message: 15/12/2006, 16h14
  4. [HTML] lien hypertext sur une ligne de tableau
    Par BigBarbare dans le forum Balisage (X)HTML et validation W3C
    Réponses: 2
    Dernier message: 04/05/2006, 14h43
  5. Un lien hypertexte sur une étiquette ?
    Par beegees dans le forum Access
    Réponses: 6
    Dernier message: 04/11/2005, 11h53

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo