Microsoft 365 VBA fermer un fichier avec une condition

[looky62]

Hello la Team,*

Lors d'un traitement de Macro, Je souhaite fermer un fichier, s'il est ouvert

en utilisant ça fonctionne uniquement s'il est ouvert,
'Windows("Fichier à créer.csv").Close savechanges:=False

Par contre s'il n'est pas ouvert il plante!

Peut on mettre une condition sur ce formation If Else?

 

[TooFatBoy]

Bonjour,

Tu mets simplement un ON ERROR RESUME NEXT juste avant, et tu rétablis avec un ON ERROR GOTO 0 juste après.
Comme ça, ça plante toujours, mais tu ne le sais plus. 😉

 

[sylvanu]

Bonjour Looky,
Faites précéder cette ligne par un "On resume next ":

On Error Resume Next
Windows("Fichier à créer.csv").Close savechanges:=False

S'il détecte une erreur il saute la ligne sans générer d'erreur.