> Tous les forums > Forum Bureautique
 Excel:Transformer du texte en lien vers un fichierSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
icewall
  Posté le 28/12/2007 @ 22:51 
Aller en bas de la page 
Petit astucien

Pour commencer j'ai utilisé une commande DIR pour afficher la liste de mes fichiers .pdf dans une seule colonne en Excel

J’ouvre le bloc note et je tape ça :

@echo off

dir/b/o:d>>0AnnoncesEntreprises.xls

@echo off

Ensuite

Enregistrer sous...

001list.bat

Dans le dossier avec tous les PDF

(c'était juste une petite info pour ceux qui ne le savent pas)

Puis j'ai voulu rajouter des liens qui pointent vers ces fichiers

Je me suis arrangé pour ajouter le chemin vers le fichier avant le nom du fichier en pensant que ça allait créer un lien hypertexte automatiquement

../../../Program%20Files/iMacros/Download2/OPERATEURSERVICECLIENTSCALLCENTENTERHFFLEURUS_20071224-235116.pdf

...

La liste est longue

Et là c'est le drame

Quand je fais Ctrl + K (insérer un lien hypertexte)

Texte à afficher : ../../../Program%20Files/iMacros/Download2/OPERATEURSERVICECLIENTSCALLCENTENTERHFFLEURUS_20071224-235116.pdf

Adresse :

Rien

Résultat, aucun lien ne fonctionne si je ne copie pas le texte à afficher dans adresse !!!

Je suis bien parti pour faire plus de 400 fois la même action (il y a plus de 400 lignes dans mon tableau) :

  • Ctrl + K
  • Triple clic gauche dans texte à afficher
  • Ctrl + C
  • Ctrl + V
  • Enter
  • Enter

(je suis paresseux de nature c'est pour ça que je connais tous les raccourcis)

Avez vous une solution pour m'éviter de répéter 400 fois tout ça ?



Modifié par icewall le 28/12/2007 22:59
Publicité
galopin01
 Posté le 29/12/2007 à 05:23 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

bonjour,
une petite macro ?

Sub test()
For Each o In Selection
chemin = "
C:\Documents and Settings\galopin\Mes documents\Mes images\"
'(
remplacer MonCheminDeDossierAMoi par TonCheminDeDossierAToi sans oublier le \ final)
z = o.Value
ActiveSheet.Hyperlinks.Add Anchor:=o, Address:=chemin & z, TextToDisplay:=z
Next
End Sub

Il est nécessaire de copier cette macro dans un module STANDART (Module1...). Le cas échéant voir à ce sujet les explications de "La cuisine selon galopin"

Sélectionner toutes les cellules qui contiennent un nom de fichier avant de lancer la macro

A+



Modifié par galopin01 le 29/12/2007 05:27
icewall
 Posté le 20/02/2008 à 11:53 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
Merci pour ton aide Galopin !!!
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Sujets relatifs
Transformer un fichier html en fichier texte
lien hypertexte de excel vers messagerie
exportation fichier access vers excel
transformer fichier excel en PDF
Lien hypertexte vers fichier en lecture seule
Exporter un fichier Word vers un tableau Excel
Fusion fichier Word vers tableau excel (vers 2007)
Transférer donnée excel vers un autre fichier exce
lien hypertexte excel vers image
transformer un texte sous jpeg en fichier word
Plus de sujets relatifs à Excel:Transformer du texte en lien vers un fichier
 > Tous les forums > Forum Bureautique