Microsoft 365 VBA fermer un fichier avec une condition

looky62 · 7 Novembre 2022

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?

sylvanu · 7 Novembre 2022

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

VB:

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.

TooFatBoy · 7 Novembre 2022

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 · 7 Novembre 2022

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

VB:

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.

Microsoft 365 VBA fermer un fichier avec une condition

looky62

XLDnaute Occasionnel

sylvanu

TooFatBoy

XLDnaute Barbatruc

sylvanu

XLDnaute Barbatruc

Discussions similaires