Ouverture d'un fichier avec un nom non-constant
Résolu
Singele
Messages postés
51
Date d'inscription
Statut
Membre
Dernière intervention
-
Singele Messages postés 51 Date d'inscription Statut Membre Dernière intervention -
Singele Messages postés 51 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je recherche un partie de code qui permettra d'ouvrir un fichier qui a un nom variable.
Dans mon cas le nom du fichier c'est "0912 ret au 1211.xls"
Je cherche à ouvrir le fichier qui commence par "0912" le reste n'a pas d'importance.
Je suis relativement novice en vba
Merci d'avance de votre aide.
Je recherche un partie de code qui permettra d'ouvrir un fichier qui a un nom variable.
Dans mon cas le nom du fichier c'est "0912 ret au 1211.xls"
Je cherche à ouvrir le fichier qui commence par "0912" le reste n'a pas d'importance.
Je suis relativement novice en vba
Merci d'avance de votre aide.
Sub Extraction()
If MsgBox("Etes-vous sûr de vouloir extraire les données", vbYesNo, "Demande de confirmation") = vbYes Then
Date_Lundi = Sheets("Ex_lundi").Range("B2")
MsgBox "La valeur est " & Date_Lundi & " "
'partie du code qui ne fonctionne pas
Fichier_Lundi = Dir("C:\Users\david\OneDrive\CHI-W\2019\Test Macro\("Date_Lundi")*.xls") If Fichier_Lundi <> "" Then
Workbooks.Open Filename:=Fichier_Lundi
Else
MsgBox "Fichier introuvable"
End If
End If
End Sub
A voir également:
- Ouverture d'un fichier avec un nom non-constant
- Comment réduire la taille d'un fichier - Guide
- Comment ouvrir un fichier epub ? - Guide
- Fichier bin - Guide
- Fichier rar - Guide
- Ouvrir un fichier .dat - Guide
Lorsque j'exécute le code j'ai cette erreur qui apparaît.
Que cela signifie?
Savez-vous pk j'ai cette erreur?
Car le fichier est bien à la bonne place
si excel ne trouve pas c'est qu'il y a forcément une erreur dans le nom ou le chemin.
eric
Donc.. normal qu'il ne le trouve pas.
Il faut :
Fichier_Lundi = Dir("C:\Users\david\OneDrive\CHI-W\2019\Test Macro\" & Date_Lundi &"*.xls") Fichier_Lundi = "C:\Users\david\OneDrive\CHI-W\2019\Test Macro\" & Fichier_LundiMerci beaucoup de votre aide