Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Utiliser FileExist

Utiliser FileExist

3 réponses
Avatar
Papy Jean
Bonjour !

Je voudrais utiliser en VBA l'instruction FileExist

J'ai écrit:

Dim FSO As Object
Set FSO = CreateObject("Scripting.Filesystemobject")
If FSO.fileexist(MonFichier) = False Then
....

J'ai coché Microsoft Scripting Runtime

Mais ça bug sur le test (erreur d'exécution 438)
J'ai donc dû mal faire qqchose, mais quoi ??

Remarque: pourquoi FileExist ne se met pas avec majuscules ??
Merci d'avance
Salutations
Papy Jean
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Clément Marcotte
Bonjour,

J'ai comme la vague impression que tu serais plus chanceux avec
FileExistS ;-)

"Papy Jean" a écrit dans le message de
news:c96en0$na6$
Bonjour !

Je voudrais utiliser en VBA l'instruction FileExist

J'ai écrit:

Dim FSO As Object
Set FSO = CreateObject("Scripting.Filesystemobject")
If FSO.fileexist(MonFichier) = False Then
....

J'ai coché Microsoft Scripting Runtime

Mais ça bug sur le test (erreur d'exécution 438)
J'ai donc dû mal faire qqchose, mais quoi ??

Remarque: pourquoi FileExist ne se met pas avec majuscules ??
Merci d'avance
Salutations
Papy Jean





Avatar
Papy Jean
Bonjour !
Merci, ça marche !
J'm'ai d'abord dit <en v'nant vieux on ne voit plus clair ..>

Puis j'ai controlé dans la doc avec F1
Il y a bien écrit sans le S (Version 2002)
Et aucune des 2 écritures ne force les majuscules

Salutations

"Clément Marcotte" a écrit dans le message
de news:
Bonjour,

J'ai comme la vague impression que tu serais plus chanceux avec
FileExistS ;-)

"Papy Jean" a écrit dans le message de
news:c96en0$na6$
Bonjour !

Je voudrais utiliser en VBA l'instruction FileExist

J'ai écrit:

Dim FSO As Object
Set FSO = CreateObject("Scripting.Filesystemobject")
If FSO.fileexist(MonFichier) = False Then
....

J'ai coché Microsoft Scripting Runtime

Mais ça bug sur le test (erreur d'exécution 438)
J'ai donc dû mal faire qqchose, mais quoi ??

Remarque: pourquoi FileExist ne se met pas avec majuscules ??
Merci d'avance
Salutations
Papy Jean








Avatar
Alain CROS
Bonjour

fileexist n'existe pas -- > c'est fileexists.

Tu n'a pas besoin de cocher Microsoft Scripting Runtime puisque FSO est déclaré As Object.

Avec la référence :

Dim FSO As New Scripting.FileSystemObject
If Not FSO.FileExists(MonFichier) Then

Alain CROS


"Papy Jean" a écrit dans le message de news: c96en0$na6$
Bonjour !

Je voudrais utiliser en VBA l'instruction FileExist

J'ai écrit:

Dim FSO As Object
Set FSO = CreateObject("Scripting.Filesystemobject")
If FSO.fileexist(MonFichier) = False Then
....

J'ai coché Microsoft Scripting Runtime

Mais ça bug sur le test (erreur d'exécution 438)
J'ai donc dû mal faire qqchose, mais quoi ??

Remarque: pourquoi FileExist ne se met pas avec majuscules ??
Merci d'avance
Salutations
Papy Jean