Perte de contact avec EXCEL à la fermeture d'un fichier

Bonjour,

Dans un fichier excel F1 sur une feuille f1, l'utilisateur active un bouton qui crée un fichier excel F2 avec les lignes suivantes dans ThisWorkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Close savechanges:=False
End Sub

Quand l'utilisateur quitte le fichier F2 par "X" en haut à droite, le fichier se ferme sans poser de question et l'utilisateur se retrouve dans le fichier excel F1 sur une feuille f1.

Problème : le système semble avoir perdu le lien avec excel car lorsque l'utilisateur fait un click dans la feuille f1, le système renvoie le message "Microsoft Excel a cessé de fonctionner".
Par contre si avant de faire un click sur la feuille f1, l'utilisateur réduit excel "-" en haut à gauche et réaffiche, le lien est retrouvé.

D'avance, Merci de m'aider à résoudre ce blocage.

Dans la macro que tu insères dans le nouveau fichier Excel, tu veux fermer le fichier que tu viens de créer alors même que tu viens de demander à Excel de le faire. Je peux comprendre qu'Excel ne sait plus quoi faire.
Il essaie de fermer un fichier qui n'existe déjà plus.
Je vois bien que tu ne cherches qu'à éviter la fenêtre qui te demande si tu veux sauvegarder le fichier mais je ne sais pas comment tu peux le faire.

Merci Pierre pour cette réponse mais elle ne correspond pas exactement à ce que je souhaite faire.

Est-ce que tu as pu douwnloader le fichier F1.xlsm qui est attaché à mon post ?
Je te propose de suivre pas à pas ce qui suit.

Tu ouvres le fichier F1.xlsm (tu es dans la worksheet "Test") Ne pas oublier d' 'Activer les macros'.

Tu actives le bouton "M" qui crée et te positionne dans un fichier (worksheet "MSN").
Tu peux voir les lignes de code citées ci dessus dans ThisWorkbook de ce nouveau fichier.

Tu fermes ce nouveau fichier par "X" en haut à gauche. Tout va bien. Il n'y a pas de prompt pour la sauvegarde du fichier.

Tu te retrouves donc dans F1.xlsm sur la feuille "Test". Tu fais un click n'importe où dans la feuille "Test" et là patatras ... le système t'envoie le message "Microsoft excel a cessé de fonctionner".

Le contenu du test semble inutile puisque les fichiers sont vides mais c'est cette mécanique que je voudrais mettre en place avec les vraies données que je traite dans le cadre de mon travail.

J'espère que c'est plus clair et Merci d'avance pour ton aide.

Aragon,
Oui, j'ai pu téléchargé ton fichier et constater le problème. Cependant, la proposition de Marc fonctionne très bien en faisant croire à Excel que le fichier a été sauvegardé. Donc Excel ne demande pas si tu veux la sauver encore.
Voici la modification à faire pour que cela fonctionne tel que proposé par Marc.
Voir la ligne qui assigne la valeur à code(3).

Please Login or Register  to view this content.

Bonne chance