Création de liens hypertexte + exctraction du nom de fichier

[Manchev]

Bonjour à toutes et à tous,

J'ai déja eu l'occasion de parcourir votre site sans avoir à poser une questions mais cette fois je souhaiterai votre aide.

Je cherche à automatiser la création de liens hypertextes ayant comme nom une partie du nom du fichier.

Exemple :
J'ai plusieurs fichiers dans un dossier nommé selon le principe suivant :
Z:\xxxx\Mon_dossier\Type_Affaire_Entreprise.pdf

Je cherche à créer une macro qui me permettrait de :
1 - Choisir le dossier à scanné.
2 - Créer un lien hypertexte du fichier.
3 - Me renommer le lien hypertexte avec le nom de l'entreprise en colonne A.
4 - M'extraire le nom de l'affaire en colonne B.
5 - M'extraire le type en colonne C.

Je suis sous Excel 2003,Windows XP et débutant sous VBA

Merci d'avance.

Manchev

 

[tototiti2008]

Re : Création de liens hypertexte + exctraction du nom de fichier

Bonjour Manchev,

Bienvenue sur XLD

Une piste pour le début de ta demande par là :

https://www.excel-downloads.com/threads/recherche-fichiers-sur-disque.142158/

 

[Manchev]

Re : Création de liens hypertexte + exctraction du nom de fichier

Bonjour et merci pour la réponse tototiti2008...

J'ai récupérer le fichier du post suivant :
https://www.excel-downloads.com/threads/recherche-fichiers-sur-disque.142158/

(Le dernier fichier du fil plante excel)

En effet il correspond presque à ma demande.

Je souhaiterais en plus du fichier "de base" :
- Ne pas copier/coller le chemin du dossier mais avoir une fenêtre me permettant de parcourir mon disque.
- Extraire seulement la partie "entreprise" du fichier type "\Type_Affaire_Entreprise.pdf" en supprimant l'extension (.pdf)

Merci en tout cas, ça m'a déjà beaucoup aidé...

Manchev