hilpers


  hilpers > microsoft.* > microsoft.excel

 #1  
09/01/2018, 16h07
AlainL
Bonjour, ( et Bonne Année !)

J'ai un tableau de 500 lignes environ sur 3 colonnes principales.
Col A : noms en latin
Col B : noms en français
Col C : noms des fichiers.htm à appeler

Allium ericetorum Thore / Ail des bruyères / allium_ericetorum.htm

Allium ursinum L. / Ail des ours / allium_ursinum.htm

Comment transformer chaque nom de A et de B en lien hypertexte qui
appellerait le fichier correspondant ?

( L'ensemble du tableau modifié sera inséré dans une page htm.)

Merci à l'avance.

alainL

 #2  
09/01/2018, 16h52
Michd
Bonjour,

Où sont situés ces fichiers? L'adresse du répertoire.
Les fichiers appelés ont quelle extension de fichier?
Le nom du fichier appelé par le lien hypertexte porte-t-il le même nom que
pour chacune des cellules de la colonne A et B ou il n'y a qu'un seul
fichier pour la cellule A2 et la cellule B2 soit un fichier pour chacune des
lignes. Si ces fichiers sont des fichiers Excel, veux-tu que ce dernier soit
ouvert sur une feuille particulière à une adresse particulière de la
feuille?

La donne de ton problème est incomplète!

MichD
 #3  
09/01/2018, 16h54
JièL
Hello,

Un exemple sur la feuille2
[..]
 #4  
09/01/2018, 18h03
AlainL
Le 09/01/2018 à 15:54, JièL a écrit :
> Hello,
> Un exemple sur la feuille2
> [..]

Merci. La présentation correspond à ce que je souhaite mais je suis
forcé de conserver les deux feuilles si la 2 fonctionne avec des
références à la 1.
Peut-on obtenir une F2 indépendante ?
alainL
 #5  
09/01/2018, 18h36
AlainL
Le 09/01/2018 à 15:52, Michd a écrit :
[..]
> La donne de ton problème est incomplète!
> MichD
>Le but du jeu : obtenir, en partant de ce tableau, deux listes de liens:


En cliquant sur A1,A2,A3.. on ouvre la page dont le nom est C1,C2,C3.
en cliquant sur B1,B2.. on ouvre la page dont le nom est C1,C2..

Une page "noms latins.htm" et une page "noms francais.htm" présenteront
les listes. Elles seront dans le même répertoire que les pages appelées.
........:-)

 #6  
09/01/2018, 19h21
Michd
En D1, tu entres cette formule pour les liens hypertextes référant à la
colonne A
=LIEN_HYPERTEXTE(A1&".htm";A1&".htm")
Tu recopies cette formule sur toute la colonne où tu as des données.

Tu fais la même chose avec la colonne B
En E1, saisis la formule : =LIEN_HYPERTEXTE(B1&".htm";B1&".htm")

Au besoin, tu peux masquer les colonnes inutiles!

MichD
 #7  
09/01/2018, 19h37
Michd
En passant, dans cette formule : =LIEN_HYPERTEXTE(A1&".htm";A1&".htm") , tu
peux omettre l'extension du fichier ".htm" dans la deuxième partie de la
formule, c'est ce qui s'affiche dans la cellule. Ainsi la formule devient :
=LIEN_HYPERTEXTE(A1&".htm";A1)

MichD
 #8  
09/01/2018, 21h57
Jacquouille
Bonsoir

J'ai à peu près le même fichier.
La feuil1 est appelée AA Liste (pour être toujours première lors du tri).
Les autres viennent ensuite.
Dans AAListe, chaque cel de la col A est liée à une feuille du même nom.
Donc, dans ton cas, je ne comprends pas la nécessité d'une Feuil2.
De plus, tu risques d'avoir 500 feuilles ....

Bravo pour l'ail des ours, c'est délicieux. -))

Jacques
" Le vin est au repas ce que le parfum est à la femme."
..
"AlainL" a écrit dans le message de groupe de discussion :
p32ia4$1o63$1...

Bonjour, ( et Bonne Année !)

J'ai un tableau de 500 lignes environ sur 3 colonnes principales.
Col A : noms en latin
Col B : noms en français
Col C : noms des fichiers.htm à appeler

Allium ericetorum Thore / Ail des bruyères / allium_ericetorum.htm

Allium ursinum L. / Ail des ours / allium_ursinum.htm

Comment transformer chaque nom de A et de B en lien hypertexte qui
appellerait le fichier correspondant ?

( L'ensemble du tableau modifié sera inséré dans une page htm.)

Merci à l'avance.

alainL

 #9  
11/01/2018, 11h13
AlainL
Le 09/01/2018 à 18:37, Michd a écrit :
> En passant, dans cette formule : =LIEN_HYPERTEXTE(A1&".htm";A1&".htm") ,
> tu peux omettre l'extension du fichier ".htm" dans la deuxième partie de
> la formule, c'est ce qui s'affiche dans la cellule. Ainsi la formule
> devient : =LIEN_HYPERTEXTE(A1&".htm";A1)
> MichD


Merci. Ca marche... dans le fichier d'origine. Mais si je recopie
uniquement les listes obtenues dans un nouveau fichier (et sans doute
dans une page html) j'ai évidemment les erreurs #REF !

Finalement, il suffirait de créer l'adresse absolue de la page à atteindre :

=LIEN_HYPERTEXTE("http://autourdalos.fr/EssaisHerbier/"&D1;A1)
Mais comment faire pour que D1 et A1 soient remplacés par leur valeur ?

alainL
 #10  
11/01/2018, 11h47
JièL
Le 11/01/2018 à 10:13, AlainL a écrit :
> =LIEN_HYPERTEXTE("http://autourdalos.fr/EssaisHerbier/"&D1;A1)
> Mais comment faire pour que D1 et A1 soient remplacés par leur valeur ?


Question bête : pourquoi ne pas enregistrer en HTML la feuille obtenue ?

Onglet Fichier, Enregistrer sous, Parcourir, en bas dans la liste Type
choisir "Page Web"...
 #11  
11/01/2018, 14h44
Michd
Il ne faut pas répondre aux questions qui te sont adressées en réponse à ta
question! C'est une perte de temps...

Tu copies cette procédure dans un module standard et tu renseignes les 2
variables selon ton environnement.
J'ai supposé que ta liste débutait en ligne 2, la ligne 1 étant réservée
pour les étiquettes de colonnes sinon tu adaptes cette ligne de code de la
procédure : Set Rg = .Range("A2:B" & DerLig)

'--------------------------------------------------------
Sub Créer_Lien_Hypertexte()

Dim DerLig As Long, Chemin As String
Dim Rg As Range, C As Range
Dim Sh As Worksheet, File As String

'********* Variables à définir ************

'Chemin où sont les fichiers
Chemin = "http://autourdalos.fr/EssaisHerbier/"

'Nom de la feuille de calcul à adapter
Set Sh = Worksheets("Feuil1")

'*******************************************

With Sh
'La dernière de la plage A:B
DerLig = .Range("A:B").Find("*", LookIn:=xlValues, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
'je suppose que les adresses débutent en ligne2, la ligne 1
'servant d'étiquettes de colonne.
Set Rg = .Range("A2:B" & DerLig)

'Une boucle sur chacune des cellules des colonnes A et B
For Each C In Rg
If C <> "" Then
File = Chemin & Range("C" & C.Row).Value & ".htm"
C.Hyperlinks.Delete
C.Hyperlinks.Add Anchor:=C, Address:=File, _
SubAddress:="", ScreenTip:=File, _
TextToDisplay:=C.Value
End If
Next
End With

End Sub
'--------------------------------------------------------

MichD

"AlainL" a écrit dans le message de groupe de discussion :
p379r1$ss0$1...

Le 09/01/2018 à 18:37, Michd a écrit :
> En passant, dans cette formule : =LIEN_HYPERTEXTE(A1&".htm";A1&".htm") ,
> tu peux omettre l'extension du fichier ".htm" dans la deuxième partie de
> la formule, c'est ce qui s'affiche dans la cellule. Ainsi la formule
> devient : =LIEN_HYPERTEXTE(A1&".htm";A1)
> MichD


Merci. Ca marche... dans le fichier d'origine. Mais si je recopie
uniquement les listes obtenues dans un nouveau fichier (et sans doute
dans une page html) j'ai évidemment les erreurs #REF !

Finalement, il suffirait de créer l'adresse absolue de la page à atteindre :

=LIEN_HYPERTEXTE("http://autourdalos.fr/EssaisHerbier/"&D1;A1)
Mais comment faire pour que D1 et A1 soient remplacés par leur valeur ?

alainL
 #12  
11/01/2018, 14h47
AlainL
Le 11/01/2018 à 10:47, JièL a écrit :
> Le 11/01/2018 à 10:13, AlainL a écrit :
>> =LIEN_HYPERTEXTE("http://autourdalos.fr/EssaisHerbier/"&D1;A1)
>> Mais comment faire pour que D1 et A1 soient remplacés par leur valeur ?

> Question bête : pourquoi ne pas enregistrer en HTML la feuille obtenue ?
> Onglet Fichier, Enregistrer sous, Parcourir, en bas dans la liste Type
> choisir "Page Web"...

Merci. Pour l'avoir fait déjà, je crois que ça crée un code impossible à
gérer pour un amateur ! Cette feuille doit contenir, outre les éléments
de la liste (regroupés par familles), d'autres éléments tels que
présentation, explications, copyrights...
 #13  
11/01/2018, 18h55
Jacquouille
> Il ne faut pas répondre aux questions qui te sont adressées en réponse à
> ta question! C'est une perte de temps...


- Le dialogue n'a jamais tué personne et fait parfois avancer les choses
......
je ne comprends donc pas cette phrase.

Jacques
" Le vin est au repas ce que le parfum est à la femme."
..

Discussions similaires
lien hypertexte impossible à créer

CREER UN LIEN HYPERTEXTE?

Macro pour créer lien hypertexte

lien hypertexte : creer un document


Fuseau horaire GMT +2. Il est actuellement 14h59. | Privacy Policy