Extraire la valeur d'un lien hyper texte :(

par **corniere** » 16 Jan 2008, 12:56

Bonjour à tous,

J'ai donc un fichier dans lequel j'ai des colonnes comprenant des liens vers le web et d'autre vers des mailto :
Je souhaiterai ajouter ne colonne avec une formule ou je ne sais pas quoi qui me permettrai de voir dans la colonne A le nom du lien et dans la colonne B la valeur du lien.

Voilà

Merci de votre aide

par **souri84** » 16 Jan 2008, 13:07

qu'est-ce que tu appelles "la valeur du lien" ?

par **Nad-Dan** » 16 Jan 2008, 13:59

Bonjour,

Ce serait mieux que tu places un exemple avec ce que tu souhaites.
A moins que ceci --> =LIEN_HYPERTEXTE(O2 & P2;"MAIL TO" & O2 & P2) à mettre en A2 par exemple

A te lire

Dan

par **corniere** » 16 Jan 2008, 15:57

Alors...

Exemple
Dand A1 j'ai paul dupont
dans cette cellule il y a un lien mailto:paul.dupond@toto.com
Moi ce que je veux c'est toujours en A1 paul dupond et en B1 mailto:paul.dupond@toto.com

J'epère que vous avez compris

par **Nad-Dan** » 16 Jan 2008, 17:05

re,

La formule dans mon post précédent fonctionne si tu la transformes comme ceci :
en B1 --> =LIEN_HYPERTEXTE(A1;"MAIL TO " & A1)

Amicalement

Dan

par **corniere** » 17 Jan 2008, 10:29

Non je viens de tester ce que tu m'as ditn mais ce n'est pas ça

Donc voici un fichier exemple c'est encore le mieux...

http://www.excel-pratique.com/~files/doc/TviXutest.xls

Merci

par **Nad-Dan** » 17 Jan 2008, 13:12

re,

Là tu me dis quelque chose de différent par rapport à ton post précédent.
Avec ton fichier je comprends mieux.

Cela est réalisable avec cette macro que j'ai placée dans ton fichier. Clique sur le bouton pour obtenir les liens et aussi la cellule dans laquelle se trouve ce lien.

http://www.excel-pratique.com/~files/doc/MKokxtest.xls

Amicalement

Dan

par **corniere** » 17 Jan 2008, 13:28

Super,

Merci beaucoup

J'ai lu ton script, mais je ne sais pas trop quoi toucher pour éventuellement les cases à lire ou à remplir.

Encore merci

par **Nad-Dan** » 17 Jan 2008, 13:46

Re,

Tu peux modifier ceci :
Cells(i, 2) = Lien
Cells(i, 3) = val.Address

Le 2 et le 3 définissent les colonnes dans lesquelles on place les infos.

La valeur i, correspond au numéro de ligne. Dans le code on part de la ligne 2.

Si pb n'héiste pas

Amicalement
Dan

Extraire la valeur d'un lien hyper texte :(

Extraire la valeur d'un lien hyper texte :(

Utilisateurs en ligne