Fermer fichier Excel en cliquant sur image sans enregistrer

Bonjour à toutes et à tous,

j'ai un onglet excel qui me sert de menu le classeur s'appelle "borne logistique"

j'ai plusieurs logo qui me renvoit tous vers des fichiers excel

j'ai ajouté un lien hypertexte sur les images de mon menu

j'aurais souhaité soit fermer le fichier que je viens d'ouvrir après un certain temps ou en cliquant sur une image.

en fouillant un peu partout j'ai trouvé cela pour la fermeture après délai

Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:01:00"), "FermerClasseur"
End Sub

par contre cela me demande si je veux enregistrer les modifications et je ne veux surtout pas.

pour la fermeture sans enregistrer en cliquant sur une image je n'ai rien trouvé

pourriez vous m'aider svp

Bonjour

Code dans un Module

Sub Fermer()
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True
End Sub

Clic droit sur image

Affecter une Macro..

Cordialement

Bonjour,

Amadéus avec ce code, ça va lui fermer le classeur qui lui sert de menu !

Pour ne pas enregistrer, il suffit de mettre l’argument de la procédure Close à False

Quand on travaille sur plusieurs classeurs, il est fortement conseillé d’utiliser des variables objets Workbook de cette façon, on est sûr de savoir sur quel classeur on intervient. Tu déclares la variable Public et tu lui affecte le classeur que tu ouvres et sur le bouton de fermeture il te suffit d’avoir le code :

Cl.Close False

Où Cl est ici le nom de la variable

Et sur le bouton d’ouverture :

Set Cl = Workbooks.Open(le chemin et nom du fichier)