XL 2010 Vérifier l'existence d'un fichier dans un dossier

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

toto47

XLDnaute Nouveau
Bonjour,

Je souhaite vérifier si l'information (un fichier) existe dans un dossier

Sachant que:
-le nom de mon fichier est dans une cellule
-la source (adresse de type C:\Users\tclazer\Desktop\Dossier sur le Bureau) de mon dossier est dans une autre cellule

Je souhaite aussi après la vérification si le fichier existe" ne rien faire" et si le fichier n'existe pas "l'afficher dans une cellule".

Merci d'avance pour votre aide
 
Bonjour Toto,
Un exemple en PJ. J'ai mis deux solutions, une par macro, une par fonction. Tout dépend de votre contexte.
( j'écris Fichier existe pour vérifier que la macro marche. Mettre ="" si on ne veut pas de réponse quand le fichier existe )
 

Pièces jointes

Dernière édition:
Bonjour,
J'ai résolu mon problème,

Sub RechercheFichiers()

'variable
Dim Dossier_cherché$, Fichier_cherché$



Range("B8").Activate
Do Until ActiveCell = ""
Dossier_cherché = ActiveCell
Fichier_cherché = ActiveCell.Offset(0, 1)
If (Dir(Dossier_cherché & "\" & Fichier_cherché) = "") Then
ActiveCell.Offset(0, 4).FormulaR1C1 = "N'existe pas"
Else
ActiveCell.Offset(0, 4).FormulaR1C1 = ""
End If
ActiveCell.Offset(1, 0).Activate
Loop
End Sub
 
Notre forum d’entraide est 100 % gratuit et le restera.
Aucune formation payante, aucun fichier à acheter, rien à vendre. Mais comme tout site, nous devons couvrir nos frais pour continuer à vous accompagner.
Soutenez-nous en souscrivant à un compte membre : c’est rapide, vous choisissez simplement votre niveau de soutien et le tour est joué.

Je soutiens la communauté et j’accède à mon compte membre

Discussions similaires

Réponses
5
Affichages
674
Retour