Creation lien hypertext à la volée

Le
NGTB
Bonjour,

Je suis en train de peiner sur la création d'une macro batch qui
concatène la valeur de plusieurs cellules contigues. Jusque là pas de
problème.
La chaine finale obtenue est supposée être une URL internet. Je ne
connais pas le code qui me permettrait de caster la chaine à ce
format.
Quelqu'un pourrait-il me dépanner, je vous prie ?
Merci
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel
Le #4815971
Bonjour.
Regarde :
activeworkbook.FollowHyperlink Ta_Chaine
Cordialement.
Daniel
"NGTB"
Bonjour,

Je suis en train de peiner sur la création d'une macro batch qui
concatène la valeur de plusieurs cellules contigues. Jusque là pas de
problème.
La chaine finale obtenue est supposée être une URL internet. Je ne
connais pas le code qui me permettrait de caster la chaine à ce
format.
Quelqu'un pourrait-il me dépanner, je vous prie ?
Merci


NGTB
Le #4815961
On Sun, 29 Jul 2007 17:35:43 +0200, "Daniel" wrote:

(Je viens de lire que la réponse est attendue ici, Désolé pour mes
précédents posts....)

Merci, je vais tester cela de suite.

J-C

Bonjour.
Regarde :
activeworkbook.FollowHyperlink Ta_Chaine
Cordialement.
Daniel
"NGTB"
Bonjour,

Je suis en train de peiner sur la création d'une macro batch qui
concatène la valeur de plusieurs cellules contigues. Jusque là pas de
problème.
La chaine finale obtenue est supposée être une URL internet. Je ne
connais pas le code qui me permettrait de caster la chaine à ce
format.
Quelqu'un pourrait-il me dépanner, je vous prie ?
Merci





NGTB
Le #4815951
On Sun, 29 Jul 2007 17:51:30 +0200, NGTB wrote:

Après copier coller du code dans ma macro, j'ai constaté que
l'effet obtenu est une ouverture d'une fenêtre de mon navigateur sur
l'adresse indiquée. Je retiens l'idée pour une autre fois : ce n'est
pas en effet ce que je souhaite obtenir.

Supposons la valeurs respective des cellules suivantes :

A1 : " http://perso.orange.fr/"
A2 : "cdjc/"
A3 : "kids/"
A4 : "index.html"

la cellule A5 dont la valeur est la concatenation des cellules A1:A5
(dans l'ordre) doit donc afficher
"http://perso.orange.fr/cdjc/kids/index.html". La page n'a pas a être
chargé dans un navigateur quelconque ; il s'agit de constituer un
catalogue d'environ 400-500 documents disponibles sur le net.

Merci de votre attention

J-C
NGTB
Le #4815941
Mea Culpa....

Depuis le temps que je n'ai pas aligné deux lignes de code, j'en ai
oublié les subtilités des collections d'objets (etc...) du VBA, ainsi
que ce qui peut constituer une méthode de recherche annexe (création
par l'exemple de nouvelle macro).

En passant par :
"ActiveSheet.Hyperlinks.Add Anchor:¬tiveCell.Offset(0, 6), Address: Adresse_Fichier, TextToDisplay:= Adresse_Fichier,
j'arrive à constituer le catalogue que je souhaite.
Merci de votre attention et mille excuses pour pour mon intervention
prématurée.

J-C
JB
Le #4815871
Bonsoir,

Il y a également la fonction LienHyperTexte() qui permet de générer
des hyperliens sans VBA:

http://boisgontierjacques.free.fr/fichiers/hyperlien/HyperLienSi.xls
http://boisgontierjacques.free.fr/fichiers/jb-OngletsHyperLiens.xls
http://boisgontierjacques.free.fr/fichiers/hyperlien/HyperLienOngletSuivant .xls
http://boisgontierjacques.free.fr/fichiers/hyperlien/SommaireDynamique.xls


JB
On 29 juil, 18:37, NGTB
Mea Culpa....

Depuis le temps que je n'ai pas aligné deux lignes de code, j'en ai
oublié les subtilités des collections d'objets (etc...) du VBA, ainsi
que ce qui peut constituer une méthode de recherche annexe (création
par l'exemple de nouvelle macro).

En passant par :
"ActiveSheet.Hyperlinks.Add Anchor:¬tiveCell.Offset(0, 6), Address: =
Adresse_Fichier, TextToDisplay:= Adresse_Fichier,
j'arrive à constituer le catalogue que je souhaite.
Merci de votre attention et mille excuses pour pour mon intervention
prématurée.

J-C


NGTB
Le #4815731
Bonsoir,
Tout à fait, mais les liens sont en fait la concaténation de sous
chaines dont le nombre et la teneur évolueront dans le temps en
fonction des infos que je pourrai remonter.

En consequence de quoi, la macro me semble plus économique en temps a
investir dans la generation de ces liens.

Merci de votre aide.



On Sun, 29 Jul 2007 11:36:28 -0700, JB wrote:

Bonsoir,

Il y a également la fonction LienHyperTexte() qui permet de générer
des hyperliens sans VBA:

http://boisgontierjacques.free.fr/fichiers/hyperlien/HyperLienSi.xls
http://boisgontierjacques.free.fr/fichiers/jb-OngletsHyperLiens.xls
http://boisgontierjacques.free.fr/fichiers/hyperlien/HyperLienOngletSuivant.xls
http://boisgontierjacques.free.fr/fichiers/hyperlien/SommaireDynamique.xls


JB


Clochard
Le #4815671
SalutNGTB,

Sans vouloir m'imposer et ne sachant pas si j'ai le droit de répondre à ta
question...
Je me permet de te faire part de ce que j'ai trouvé en fonction de ce que
j'ai compris dans ta question qui était:
"Supposons la valeurs respective des cellules suivantes :
A1 : " http://perso.orange.fr/"
A2 : "cdjc/"
A3 : "kids/"
A4 : "index.html"

la cellule A5 dont la valeur est la concatenation des cellules A1:A4
(dans l'ordre) doit donc afficher
"http://perso.orange.fr/cdjc/kids/index.html".

Avec ça... chez-moi ça fonctione très bien

¡&SI(A1="";"";" "&A2&A3&4)

J'espère t'aider...
--
Clochard
Aimerais bien savoir....
Merci!



On Sun, 29 Jul 2007 17:51:30 +0200, NGTB wrote:

Après copier coller du code dans ma macro, j'ai constaté que
l'effet obtenu est une ouverture d'une fenêtre de mon navigateur sur
l'adresse indiquée. Je retiens l'idée pour une autre fois : ce n'est
pas en effet ce que je souhaite obtenir.

Supposons la valeurs respective des cellules suivantes :

A1 : " http://perso.orange.fr/"
A2 : "cdjc/"
A3 : "kids/"
A4 : "index.html"

la cellule A5 dont la valeur est la concatenation des cellules A1:A5
(dans l'ordre) doit donc afficher
"http://perso.orange.fr/cdjc/kids/index.html". La page n'a pas a être
chargé dans un navigateur quelconque ; il s'agit de constituer un
catalogue d'environ 400-500 documents disponibles sur le net.

Merci de votre attention

J-C





Philippe.R
Le #4815661
Bonjour Clochard,
Bien sur que ta contribution est bienvenue ; ici, chacun est libre
d'apporter ses lumières.
C'est du partage que nait la richesse.
Amicalement
--
Philippe.R
"Clochard" news:
SalutNGTB,

Sans vouloir m'imposer et ne sachant pas si j'ai le droit de répondre à ta
question...
Je me permet de te faire part de ce que j'ai trouvé en fonction de ce que
j'ai compris dans ta question qui était:
"Supposons la valeurs respective des cellules suivantes :
A1 : " http://perso.orange.fr/"
A2 : "cdjc/"
A3 : "kids/"
A4 : "index.html"

la cellule A5 dont la valeur est la concatenation des cellules A1:A4
(dans l'ordre) doit donc afficher
"http://perso.orange.fr/cdjc/kids/index.html".

Avec ça... chez-moi ça fonctione très bien

¡&SI(A1="";"";" "&A2&A3&4)

J'espère t'aider...
--
Clochard
Aimerais bien savoir....
Merci!



On Sun, 29 Jul 2007 17:51:30 +0200, NGTB wrote:

Après copier coller du code dans ma macro, j'ai constaté que
l'effet obtenu est une ouverture d'une fenêtre de mon navigateur sur
l'adresse indiquée. Je retiens l'idée pour une autre fois : ce n'est
pas en effet ce que je souhaite obtenir.

Supposons la valeurs respective des cellules suivantes :

A1 : " http://perso.orange.fr/"
A2 : "cdjc/"
A3 : "kids/"
A4 : "index.html"

la cellule A5 dont la valeur est la concatenation des cellules A1:A5
(dans l'ordre) doit donc afficher
"http://perso.orange.fr/cdjc/kids/index.html". La page n'a pas a être
chargé dans un navigateur quelconque ; il s'agit de constituer un
catalogue d'environ 400-500 documents disponibles sur le net.

Merci de votre attention

J-C







Clochard
Le #4815511
Salut... plutôt comme ça....

¡&SI(A1="";"";""&A2&A3&A4)


--
Clochard
Aimerais bien savoir....
Merci!



SalutNGTB,

Sans vouloir m'imposer et ne sachant pas si j'ai le droit de répondre à ta
question...
Je me permet de te faire part de ce que j'ai trouvé en fonction de ce que
j'ai compris dans ta question qui était:
"Supposons la valeurs respective des cellules suivantes :
A1 : " http://perso.orange.fr/"
A2 : "cdjc/"
A3 : "kids/"
A4 : "index.html"

la cellule A5 dont la valeur est la concatenation des cellules A1:A4
(dans l'ordre) doit donc afficher
"http://perso.orange.fr/cdjc/kids/index.html".

Avec ça... chez-moi ça fonctione très bien

¡&SI(A1="";"";" "&A2&A3&4)

J'espère t'aider...
--
Clochard
Aimerais bien savoir....
Merci!



On Sun, 29 Jul 2007 17:51:30 +0200, NGTB wrote:

Après copier coller du code dans ma macro, j'ai constaté que
l'effet obtenu est une ouverture d'une fenêtre de mon navigateur sur
l'adresse indiquée. Je retiens l'idée pour une autre fois : ce n'est
pas en effet ce que je souhaite obtenir.

Supposons la valeurs respective des cellules suivantes :

A1 : " http://perso.orange.fr/"
A2 : "cdjc/"
A3 : "kids/"
A4 : "index.html"

la cellule A5 dont la valeur est la concatenation des cellules A1:A5
(dans l'ordre) doit donc afficher
"http://perso.orange.fr/cdjc/kids/index.html". La page n'a pas a être
chargé dans un navigateur quelconque ; il s'agit de constituer un
catalogue d'environ 400-500 documents disponibles sur le net.

Merci de votre attention

J-C







NGTB
Le #4641921
On Mon, 30 Jul 2007 04:04:02 -0700, Clochard wrote:

Salut... plutôt comme ça....

¡&SI(A1="";"";""&A2&A3&A4)



La concaténation simple était la technique simple que j'avais retenue
à l'origine. Mais je n'obtenais pas ce que je désirais (un lien
hypertexte) mais une chaîne simple. Et ce n'est qu'en cliquant sur la
case qui la contenait que j'ai pu observer -parfois- le changement de
nature.
Je voulais obtenir ces liens dès leur construction et en même temps
apprendre comment les construire pour -éventuellement- réutiliser ce
qui m'a été indiqué.
D'où ma question ici

Publicité
Poster une réponse
Anonyme