alias_2003
XLDnaute Occasionnel
Bonjour à tous,
Grâce au code suivant, l'utilisateur choisit un N° de fichier à l'aide d'une inputbox.
Le code ci-dessous me permet de retrouver dans un dossier précis, les fichiers contenant ce numéro. J'aimerais que le seul le fichier modifié le plus récemment soit ouvert.
Pouvez-vous m'aider à adapter ce code ??
Merci beaucoup de votre aide,
Bonne journée
Grâce au code suivant, l'utilisateur choisit un N° de fichier à l'aide d'une inputbox.
Le code ci-dessous me permet de retrouver dans un dossier précis, les fichiers contenant ce numéro. J'aimerais que le seul le fichier modifié le plus récemment soit ouvert.
Pouvez-vous m'aider à adapter ce code ??
Code:
Private Sub Commandbutton1_Click()
Dim rep
rep = InputBox("Quel N°, "recherche")
Dim MyObj As Object, MySource As Object, file As Variant
file = Dir("C:\")
While (file <> "")
If InStr(file, rep) > 0 Then
MsgBox "found " & file
Exit Sub
End If
file = Dir
Wend
end subMerci beaucoup de votre aide,
Bonne journée
Dernière édition: