misteryann
XLDnaute Occasionnel
Bonjour le forum et bonne année à toutes et tous.
j'ai un code me permettant de créer un (des) dossiers.
Mais j'ai une erreur du genre "if sans then" alors que "then" est présent.
Le code est inspiré de celui-ci:
Sub DossierCreeSiExistePas()
Dim GestionFichier As New Scripting.FileSystemObject
If GestionFichier.FolderExists("F:\Atelier\Australie") = False Then
GestionFichier.CreateFolder "F:\Atelier\Australie"
End If
Set GestionFichier = Nothing
End Sub
(Microsoft Scripting runtime est "actif")
merci pour votre aide
Cordialement
j'ai un code me permettant de créer un (des) dossiers.
Mais j'ai une erreur du genre "if sans then" alors que "then" est présent.
Le code est inspiré de celui-ci:
Sub DossierCreeSiExistePas()
Dim GestionFichier As New Scripting.FileSystemObject
If GestionFichier.FolderExists("F:\Atelier\Australie") = False Then
GestionFichier.CreateFolder "F:\Atelier\Australie"
End If
Set GestionFichier = Nothing
End Sub
(Microsoft Scripting runtime est "actif")
merci pour votre aide
Cordialement