Macro recherche de fichiers dans un dossier et creation d hyperlink

Bonsoir,

ci-joint un fichier avec differentes macro. Une me pose probleme: rep_xl

Cette macro recherche dans un dossier donné tous les fichiers qu il contient et cree un hyperlink vers ces fichiers. Je n ai pas programme cette macro!

En tout cas elle est top mais je n arrive pas a la modifier.

Je souhaiterai qu elle insere les hyperlink soit:

- a partir de la cellule B39
- (soit encore mieux) dans une zone de texte separée, mais dans sur la meme feuille

Je souhaiterai egalement qu elle arrete de foutre en l air toute la mise en page la feuille (visualisation des contours des cellules, abscisses et ordonnees..)

Quelqu un peut m aider?

Bonjour,

voici une modification que j'ai réalisé dans la macro rep_xl qui te permet de ne pas avoir les hyperlinks sur le nom des fichiers

Code:

---

1 2 3 4 5 6 7 8 9

'fichiers num = 0 Do While fich(Cells(lin, col))(num) <> "END" Rows(lin + 1).Insert Shift:=xlDown Cells(lin + 1, col + 1) = fich(Cells(lin, col))(num) ActiveSheet.Hyperlinks.Add Cells(lin + 1, col), "Ouvrir" num = num + 1 Loop If num + num1 <> 0 Then Range(Cells(lin, col), Cells(lin, col + 3)).Interior.ColorIndex = 36

---

dit moi si sa te convients,

je ne comprend pas ce que tu veux dire par

Citation:

---

Je souhaiterai egalement qu elle arrete de foutre en l air toute la mise en page la feuille (visualisation des contours des cellules, abscisses et ordonnees..)

---

car je ne vois pas ce qui bouge dans la mise en forme

Désolé de repondre si tardivement...

La macro fonctionne, est c est beaucoup plus propre comme ca ! Malheureusement, l hyperlink est crée mais ne fonctionne plus... Une idée?