fermeture d un fichier .

[drisou]

bonjour le forum, j ai une question que je voudrais bien échanger contre une réponse .lol.
voila je voudrais savoir comment fermer un fichier automatiquement des l ouverture d un autre fichier. merci pour vos reponses

 

[Dan]

Bonjour,

Dans le 2ième fichier mets cette macro en VBA dans 'Thisworkbook':

Private Sub Workbook_Open()
Workbooks('nom fichier à fermer').Close
End Sub

Nom du fichier suivi de l'extension .xls

 

[drisou]

bonsoir tout le monde , merci dan ta methode fonctionne bien quand le fichier a fermer est ouvert , mais il peut m arriver dans certains cas ou ce fichier est deja fermé et que je dois ouvrir le fichier qui contient la macro et la a l ouveture j ai un message d erreur je suppose que c est parce que le fichier est deja fermé, alors comment faire pour que la macro soit actif uniquement quand le fichier a fermer est ouvert. et ignorer quand le fichier est deja fermé.
merci

 

[Dan]

Bonjour Drisou,

Change ta macro par celle-ci dessous :

Private Sub Workbook_Open()
On Error resume next
Workbooks('nom fichier à fermer').Close
End Sub

Bonne journée

 

[drisou]

bonjour dan , le forum.
merci beaucoup dan, c est bon . bonne journée