Parcours d'instances d'excel - CreateBindCtx

Version imprimable

30/08/2012, 16h43
torix31-fr

Parcours d'instances d'excel - CreateBindCtx

Bonjour,

J'utilise Visual Studio Express 2010 pour faire une petite appli windowsForm (Visual Basic).
Dans cette appli j'ai besoin de parcourir toutes les instances des processus Excel en cours.

J'ai trouvé pas mal d'info sur le sujet, mais ça utilise la fonction "CreateBindCtx".

Cette fonction est inconnue de mon projet Visual Studio et je n'arrive pas à y faire référence (je ne sais pas comment faire le Dllimport ou bien comment ajouter la référence).

Pouvez vous m'aider ?

Merci d'avance.

Bonjour,

Regarde si ceci te convient :

Code:

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
 
    Private Sub Button1_Click(ByVal sender As System.Object, _
                              ByVal e As System.EventArgs) Handles Button1.Click
 
        MsgBox(NBProcessExcel)
 
    End Sub
 
    Private Function NBProcessExcel() As Integer
 
        Dim Wmi As Object
        Dim Process As Object
        Dim NB As Integer
 
        Wmi = GetObject("winmgmts:root\cimv2")
 
        For Each Process In Wmi.ExecQuery("select * from win32_process")
 
            If UCase(Process.Name) = "EXCEL.EXE" Then NB = NB + 1
 
        Next
 
        NBProcessExcel = NB
 
    End Function

Hervé.

31/08/2012, 19h06
torix31-fr

Bonsoir,

Merci pour ta réponse.

J'ai trouvé sur un autre site la façon d'utiliser CreateBindCtx.
Il faut faire une déclaration préalable du genre :

Code:

Private Declare Function CreateBindCtx Lib "ole32.dll" (ByVal reserved As Int32, ByRef ppbc As ComTypes.IBindCtx) As Integer

C'était ce qu'il manquait dans mon code car je ne connaissait pas cette syntaxe.

Maintenant, j'ai plusieurs solutions pour parcourir les instances, en incluant la tienne.

Je vais voir quelle est la plus simple à mettre en oeuvre, l'objectif étant de récupérer un objet excel.application afin d'accéder au contenu des workbooks.

Merci encore,

t
02/09/2012, 18h13
torix31-fr

Bonsoir,

J'ai finalement choisi la solution de parcourir les instances Excel en utilisant les monikers (parcours de la ROT, identification des monikers et lien vers les instances).

J'arrive assez facilement à trouver toutes les instances. Cependant cette solution n'est pas "intuitivement évidente". Je ne comprends pas tout dans le détail mais ça fonctionne plutôt bien.

@ très bientôt,

t