Manipulation de excel, sortie sans sauvegarde [Résolu]

Messages postés
32
Date d'inscription
mercredi 5 décembre 2007
Statut
Membre
Dernière intervention
18 mai 2012
- - Dernière réponse : phoenix591
Messages postés
32
Date d'inscription
mercredi 5 décembre 2007
Statut
Membre
Dernière intervention
18 mai 2012
- 18 août 2008 à 19:37
Bonjour à tous,
Je suis devant un petit problème, dans une application je me sers  d'excel pour réaliser des recherche dans une base de données d'image et l'afficher.
Le soft VB6 permet lui de récupérer des informations d'un automate en liaison série en mode JBUS.
Mon probléme est le suivant lorsque je quitte l'application VB6 je ferme également excel mais ayant modifié le fichier, excel me propose de sauvegarder, je voudrais que ce message ne s'affiche plus puisque le fichier excel ne doit jamais être sauvegardé.
Ci dessous la procédure de sortie:
Private Sub Form_UnLoad(Cancel As Integer) 'exécuter à la fermeture de l'écran
    wbExcel.Close 'Fermeture du classeur Excel
    appExcel.Quit 'Fermeture de l'application Excel
    Set wsExcel = Nothing
    Set wbExcel = Nothing
    Set appExcel = Nothing
'    Excel.Application.Quit
    End
End Sub

Merci pour vos conseils;
Afficher la suite 

2 réponses

Meilleure réponse
Messages postés
13298
Date d'inscription
lundi 13 décembre 2004
Statut
Modérateur
Dernière intervention
3 février 2018
29
3
Merci
salut,

appExcel.DisplayAlerts = False

(mais met le juste après l'ouverture de ton fichier)
++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp  

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 200 internautes nous ont dit merci ce mois-ci

Commenter la réponse de PCPT
Messages postés
32
Date d'inscription
mercredi 5 décembre 2007
Statut
Membre
Dernière intervention
18 mai 2012
0
Merci
Merci PCPT pour ta réponse rapide, précise et qui répond exactement à ma demande.

Salut.
Commenter la réponse de phoenix591