Comment vérifier si un fichier existe dans un dossier spécifique?
Supposons que vous ayez un dossier contenant plusieurs fichiers et que vous souhaitiez maintenant identifier si un fichier spécifique existe dans ce dossier à partir d'Excel. Cet article, je vais vous présenter une méthode rapide pour vous permettre de vérifier si un fichier existe dans un dossier spécifique en détail via Excel.
Vérifiez si un fichier existe dans un dossier spécifique avec le code VBA
Vérifiez si un fichier existe dans un dossier spécifique avec le code VBA
Pour vérifier si un fichier existe dans un dossier spécifique ou non dans la feuille de calcul Excel, vous pouvez appliquer le code VBA suivant, procédez comme suit:
1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2Cliquez sur insérer > Moduleet collez le code suivant dans la fenêtre Module.
Code VBA: vérifiez si un fichier existe dans un dossier spécifique:
Sub Test_File_Exist_With_Dir()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim FilePath As String
FilePath = ""
On Error Resume Next
FilePath = Dir("C:\Users\DT168\Desktop\Test folder\Book2.xlsx")
On Error GoTo 0
If FilePath = "" Then
MsgBox "File doesn't exist", vbInformation, "Kutools for Excel"
Else
MsgBox "File exist", vbInformation, "Kutools for Excel"
End If
Application.ScreenUpdating = False
End Sub
Remarque: Dans le code ci-dessus, vous devez modifier le chemin et le nom du fichier C: \ Users \ DT168 \ Desktop \ Test folder \ Book2.xlsx " à votre besoin.
3. Après avoir collé le code, veuillez appuyer sur F5 clé pour exécuter ce code:
(1.) Si le fichier existe, vous obtiendrez la capture d'écran suivante:
(2.) Si le fichier n'existe pas, vous recevrez l'avertissement suivant:
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!