Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Lien hypertexte vers le fichier le plus récent d'un dossier

le chat perché

XLDnaute Nouveau
Bonjour à tous,

Je souhaite insérer un lien hypertexte renvoyant au fichier pdf le plus récent d'un dossier (soit par date de création dudit fichier, soit au pire en nommant les fichiers pdf par date de création). L'idée étant que l'ajout d'un nouveau document dans le dossier en question prenne automatiquement la place de l'ancien dans le fichier Excel via le lien hypertexte.

Est-ce envisageable?

Merci d'avance
 

gbinforme

XLDnaute Impliqué
Bonjour,
Comme l'ajout d'un nouveau document dans le dossier n'interfèrera aucunement avec Excel,
je pense que tu ne prends pas la bonne méthode.

Il serait plus judicieux de ne pas mettre le lien mais à la place une procédure qui t'ouvrira le fichier le plus récent lorsque tu voudras le consulter.
 

gbinforme

XLDnaute Impliqué
re
Tu mets l'information que tu veux dans la cellule, par exemple le répertoire ou nom du fichier à trouver, et la sélection de cette cellule va chercher le fichier le plus récent et l'ouvre comme ferait le lien.
 

job75

XLDnaute Barbatruc
Bonjour le chat perché, gbinforme,

Téléchargez le fichier et le dossier zippés joints sur le bureau.

Vous mettrez tous les fichiers à étudier dans le dossier "Fichiers".

La formule matricielle en D3: D4 utilise cette fonction VBA :
VB:
Function DernierFichier()
Application.Volatile
Dim chemin$, a(1 To 2, 1 To 1), fso As Object, dossier As Object, f As Object
chemin = ThisWorkbook.Path & "\Fichiers" 'à adapter
a(1, 1) = ""
Set fso = CreateObject("Scripting.FileSystemObject")
For Each f In fso.getfolder(chemin).Files
    If f.DateCreated > a(2, 1) Then
        a(1, 1) = f.Name
        a(2, 1) = f.DateCreated
    End If
Next
DernierFichier = a 'vecteur colonne
End Function
Elle est volatile, appuyez sur la touche F9 pour qu'elle se recalcule si l'on ajoute des fichiers.

A+
 

Pièces jointes

  • Test.zip
    20.9 KB · Affichages: 2

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…