Fermer fichier PDF si ouvert avant impression

J’ai un petit soucis. J’ai la possiblité de créer un fichier PDF nommé, mais si celui-ci existe déjà et s’il est ouvert, j’ai un message d’erreur.
Voici mes ligne VBA qui fonctionnent parfaitement bien si le fichier est fermé, dans ce cas il est écrasé, ou il est créer s’il n’existe pas.
sFilename = ThisWorkbook.Name
sFilename = « Garde " & Range(« 01!Y15 ») & ( » « ) & Range(« 01!C85 ») & ( » « ) & Range(« 01!E83 ») & ( ».pdf")

ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=sRep & sFilename, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=True

Est-il possible d’insérer un ligne VBA avant impression pour vérifier si ce fichier est ouvert et le fermer le cas échéant ?

Merci à vous

Vous pouvez mettre la valeur en False si vous n’voulez l’ouvrir après avoir créer le fichier en PDF.

OpenAfterPublish:=True

Cordialement

Ce sujet a été automatiquement fermé après 30 jours. Aucune réponse n’est permise dorénavant.