Discussion :

[andlio]

bonjour tout le monde !

Il me semble que ce problème a déjà été traité sur ce forum, mais je n'arrive pas à le retrouver... alors désolé si je me répète

Je développe une appli qui pilote excel. Elle ouvre un fichier, met à jour des données, ferme et sauvegarde le fichier.

Mon problème c'est qu'elle me demande une confirmation pour la sauvegarde. Est-il possible de supprimer cette confirmation ?

Merci.

Lionel.

[lacsap49]

Le code suivant fait via des boutons les opérations suivantes :

ouverture excel
fermeture excel
nouveau classeur
ouvrir fichier
sauvegarde fichier
etc...

lorsque l'on sauvegarde, il ne demande pas de confirmation à la fermeture d'excel !

par contre, pour info, malgré la fermeture, Excel persiste en ram voir :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
 
Public Class FormExcel
 
    Dim excelApp As Object
    Dim excelCla As Object
    Dim excelFeuille As Object
    Dim excelPlage As Object
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        excelApp = CreateObject("excel.application")
        excelApp.visible = True
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        excelCla = excelApp.workbooks.add()
    End Sub
 
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        excelApp.quit()
    End Sub
 
    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        excelCla = excelApp.workbooks.open(TextBox1.Text)
    End Sub
 
    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        excelFeuille = excelCla.sheets("feuil1")
        Dim c As Single = excelFeuille.cells.item(2, 2).value
        excelFeuille.cells.item(2, 2).value = c / 2
    End Sub
 
    Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        excelCla.save()
    End Sub
 
    Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
        Me.Close()
    End Sub

Voila je n'ai pas été très loin avec Excel

[andlio]

Dans l'article, il est dit que l'instance d'excel en mémoire sera détruite automatiquement à la fermeture de l'appli.
Mon appli n'ouvre qu'une seule fois excel, modifie, puis ferme. Ce problème ne devrait donc pas me concerner non ?

[lacsap49]

exact.