> 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 participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
89,99 €Disque dur externe portable Seagate Expansion 4 To USB 3.0 à 89,99 €
Valable jusqu'au 27 Septembre

Boulanger fait une promotion sur le disque dur externe portable Seagate Expansion d'une capacité de 4 To qui passe à 89,99 € alors qu'on le trouve ailleurs à partir de 100 €. Ce disque dur externe portable au format 2,5 pouces dispose d'une interface USB 3.0 compatible USB 2.0. Une excellente affaire pour ce disque dur qui offre des débits de 115 Mo/s. Il n'est pas soudé et est donc démontable si vous souhaitez le réutiliser ailleurs (console, NAS, PC).


> Voir l'offre
19,68 €Micro clé USB 3.1 Sandisk Ultra Fit 128 Go à 19,68 €
Valable jusqu'au 27 Septembre

Amazon fait une promotion sur la micro clé USB Sandisk Ultra Fit d'une capacité de 128 Go qui passe à 19,68 €. La minuscule taille de cette clé USB va vous permettre de la laisser brancher en permanence sur votre portable, votre TV ou votre autoradio sans qu'elle dépasse de manière disgracieuse. Sa compatibilité USB 3.1 lui permet d'atteindre des débits jusqu'à 130 Mo/s. 


> Voir l'offre
39,99 €Boîtier PC Corsair Carbide Series 275R avec fenêtre à 39,99 €
Valable jusqu'au 27 Septembre

Cdiscount propose actuellement le boîtier PC moyen tour avec fenêtre Corsair Carbide Series 275R à 39,99 €. On le trouve ailleurs à partir de 70 €. Le Corsair Carbide 275R est compact et conçu pour créer des systèmes hautes performances à l'aspect minimaliste. il offre une capacité de refroidissement efficace (2 ventilateurs 120 mm fournis), tout en vous permettant de faire évoluer ses performances grâce aux autres emplacements disponibles.


> Voir l'offre

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