Discussion :

[Australia]

Bonsoir,

Je souhaite supprimer une feuille excel depuis access mais je ne veux pas la demande de confirmation d'excel, voici le code, je ne comprends pas ce qui lui va pas

Code :

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

1
2
3
4
5
6
7
Set xlapp = CreateObject("Excel.Application")
        Set xlbook = xlapp.Workbooks.Open(mon fichier)
        Set xlsheet = xlbook.Worksheets("ma feuille")
 
        xlapp.ScreenUpdating = False ' pour empêcher le message d'excel mais ca marche pas ..
        xlsheet.Delete
        xlapp.ScreenUpdating = True

Merci d'avance

[boubignole]

Salut

Ton code marche bien chez moi, je n'ai pas de message d'avertissement.
je suis sous office 2003...

[Australia]

suis sous office 2000,
tu penses que c'est un bug ?

[Dolphy35]

suis sous office 2000,
tu penses que c'est un bug ?

Je suis sous 2002 et j'ai testé ce code il fonctionne à merveille.

: :

[Frank]

Code :

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

1
2
3
xlapp.displayAlerts= false
'suppression de la feuille
xlapp.displayAlerts= true

[Australia]

comprends pas pourquoi mais ca marche,

à toi Franck