Fermeture excel sous VB6 !!!!!

[Résolu]
Signaler
Messages postés
336
Date d'inscription
jeudi 21 août 2008
Statut
Membre
Dernière intervention
19 juillet 2015
-
Messages postés
336
Date d'inscription
jeudi 21 août 2008
Statut
Membre
Dernière intervention
19 juillet 2015
-
Bonjour,

je suis en cour de développer une application en VB6 :
je doit ouvrir une fichier protéger par mot de passe :

Set wbExcel = appExcel.Workbooks.Open("C:\BD.xls", Password:="XXXX")




écrire dans des case spécifique :

wsExcel.Cells(2, 1).Value = Text1.Text
wsExcel.Cells(2, 2).Value = Text2.Text
wsExcel.Cells(2, 3).Value = Text3.Text
wsExcel.Cells(2, 4).Value = Text4.Text



puis lorsque j'appuie sur valider il faut enregistrer les modifications :

wbExcel.save


mais la problème c'est qu'il y a un message de confirmation qui apparait alors que je veux enregistrer sans confirmation

pourrez vous SVP m'aider ??

5 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Salut,
Si j'ai bon souvenir, je dirais que tu dois utiliser ceci.

Application.DisplayAlerts = False



@+: Ju£i€n
Pensez: Réponse acceptée
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
re,
C'est un peu léger comme réponse....

Quel est le code que tu as copier coller? le résultat?

J'ai testé sur ma machine et je dois avouer que cela fait ce que tu souhaites...

Il est vrai qu'il faut peu être mettre appExcel.DisplayAlerts = False

Bref dans tout les cas il faut préciser le "mais le problème n'est pas résolu" .... nous ne sommes pas des bêtes... tu as un problème OK... mais aide nous à t'aider en disant le plus de choses possibles. A bon entendeur... salut.

mais bon... d'autre sol pleaaaaaaaaase !!!!!!!!

@+: Ju£i€n
Pensez: Réponse acceptée
Messages postés
336
Date d'inscription
jeudi 21 août 2008
Statut
Membre
Dernière intervention
19 juillet 2015

désolé jrivet

j'ai trouver la solution :

Application.DisplayAlerts = False
'wbExcel.SaveAs
appExcel.DisplayAlerts = False
Application.DisplayAlerts = False
wbExcel.Save
wbExcel.Close
appExcel.Quit

Unload Me
                        
                
Messages postés
336
Date d'inscription
jeudi 21 août 2008
Statut
Membre
Dernière intervention
19 juillet 2015

merci jrivet mais le problème n'est pas résolu

d'autre sol pleaaaaaaaaase !!!!!!!!
Messages postés
336
Date d'inscription
jeudi 21 août 2008
Statut
Membre
Dernière intervention
19 juillet 2015

y'a t'il de bouton ici pour marqué le sujet comme Résolu