OVH Cloud OVH Cloud

existence d'un doc

4 réponses
Avatar
RGI
Bonjour à toutes et à tous

est-il possible de tester par une macro l'existence d'un document dans C:

Merci

4 réponses

Avatar
Geo

Bonjour à toutes et à tous

est-il possible de tester par une macro l'existence d'un document dans C:

Merci


Oui, avec la commande dir.
Ou essayer un fileOpen avec une gestion des erreurs.

--
A+

Avatar
RGI
Merci pour la réponse

je me suis débrouillé avec :
Sub recherchefichiers()
Dim fichiersuivant As String
Dim Tousfichiers As String

Tousfichiers = ""
fichiersuivant = Dir("C:*.doc", 0)

While fichiersuivant <> ""
Tousfichiers = Tousfichiers & Chr(13) & fichiersuivant
fichiersuivant = Dir
Wend

If Tousfichiers <> "" Then
MsgBox Tousfichiers
End If

End Sub

Salutations

RGI



Bonjour à toutes et à tous

est-il possible de tester par une macro l'existence d'un document
dans C:

Merci


Oui, avec la commande dir.
Ou essayer un fileOpen avec une gestion des erreurs.




Avatar
Geo

Merci pour la réponse

je me suis débrouillé avec :
[...]

Parfait.
A l'énoncé, j'avais plutôt compris que vous connaissiez le nom et
vouliez savoir s'il existait, d'où ma deuxième solution qui n'avait
aucun intérêt dans votre cas.

--
A+

Avatar
RGI
ce n'est pas grave

merci d'avoir répondu

RGI


Merci pour la réponse

je me suis débrouillé avec :
[...]

Parfait.
A l'énoncé, j'avais plutôt compris que vous connaissiez le nom et
vouliez savoir s'il existait, d'où ma deuxième solution qui n'avait
aucun intérêt dans votre cas.