Savoir si Excel est ouvert, et avec quels classeurs
1 réponse
Jean Marc Rougny
Bonjour =E0 tous,
Je d=E9veloppe une application en access 97, tournant sur=20
des machines Windows 95 et Windows 2000. J'ai besoin de=20
savoir si Excel est ouvert et avec quels documents. Je=20
n'ai pas trouv=E9 de doc sur les Api de Windows permettant=20
de faire =E7a.
D'avance merci
Jean Marc
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond
Bonjour
Pour savoir si excel est ouvert:
Dim acApp As Access.Application Const ERR_APP_NOTRUNNING As Long = 429 On Error Resume Next Set acApp = GetObject(, "Access.Application") If Err = ERR_APP_NOTRUNNING Then Set acApp = New Access.Application With acApp ' Code ici. End With If Not acApp.UserControl Then acApp.Quit End If Set acApp = Nothing
qui permet d'ouvrir une session si aucune session n'existe.
pour les documents tu testes les indes de feuilles, des idées sur http://access.seneque.free.fr/excel.htm -- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Jean Marc Rougny" a écrit dans le message de news:065201c39a01$28412a70$ Bonjour à tous,
Je développe une application en access 97, tournant sur des machines Windows 95 et Windows 2000. J'ai besoin de savoir si Excel est ouvert et avec quels documents. Je n'ai pas trouvé de doc sur les Api de Windows permettant de faire ça. D'avance merci Jean Marc
Bonjour
Pour savoir si excel est ouvert:
Dim acApp As Access.Application
Const ERR_APP_NOTRUNNING As Long = 429
On Error Resume Next
Set acApp = GetObject(, "Access.Application")
If Err = ERR_APP_NOTRUNNING Then Set acApp = New Access.Application
With acApp
' Code ici.
End With
If Not acApp.UserControl Then
acApp.Quit
End If
Set acApp = Nothing
qui permet d'ouvrir une session si aucune session n'existe.
pour les documents tu testes les indes de feuilles,
des idées sur http://access.seneque.free.fr/excel.htm
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"Jean Marc Rougny" <jm.rougny@plumeinfo.com> a écrit dans le message de
news:065201c39a01$28412a70$a601280a@phx.gbl...
Bonjour à tous,
Je développe une application en access 97, tournant sur
des machines Windows 95 et Windows 2000. J'ai besoin de
savoir si Excel est ouvert et avec quels documents. Je
n'ai pas trouvé de doc sur les Api de Windows permettant
de faire ça.
D'avance merci
Jean Marc
Dim acApp As Access.Application Const ERR_APP_NOTRUNNING As Long = 429 On Error Resume Next Set acApp = GetObject(, "Access.Application") If Err = ERR_APP_NOTRUNNING Then Set acApp = New Access.Application With acApp ' Code ici. End With If Not acApp.UserControl Then acApp.Quit End If Set acApp = Nothing
qui permet d'ouvrir une session si aucune session n'existe.
pour les documents tu testes les indes de feuilles, des idées sur http://access.seneque.free.fr/excel.htm -- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Jean Marc Rougny" a écrit dans le message de news:065201c39a01$28412a70$ Bonjour à tous,
Je développe une application en access 97, tournant sur des machines Windows 95 et Windows 2000. J'ai besoin de savoir si Excel est ouvert et avec quels documents. Je n'ai pas trouvé de doc sur les Api de Windows permettant de faire ça. D'avance merci Jean Marc
