Fonction VBA a expliquer

j'ai une fonction dans un programme que j'ai récupérer mais je ne comprend pas trop , quelqu'un peut m'expliquer svp?

Public Function GetExcelInstances() As Collection
Dim guid&(0 To 3), acc As Object, hwnd, hwnd2, hwnd3
guid(0) = &H20400
guid(1) = &H0
guid(2) = &HC0
guid(3) = &H46000000
Set GetExcelInstances = New Collection
Do
hwnd = FindWindowExA(0, hwnd, "XLMAIN", vbNullString)
If hwnd = 0 Then Exit Do
hwnd2 = FindWindowExA(hwnd, 0, "XLDESK", vbNullString)
hwnd3 = FindWindowExA(hwnd2, 0, "EXCEL7", vbNullString)
If AccessibleObjectFromWindow(hwnd3, &HFFFFFFF0, guid(0), acc) = 0 Then
GetExcelInstances.Add acc.Application
End If
Loop
End Function

Bonjour,

Cette fonction permet a priori de récupérer toutes les applications Excel s'exécutant en mémoire. Son intérêt me parait assez limité car dans l'immense majorité des cas une seule application Excel s'exécute en mémoire. Seules des applications VBA relativement complexes utilisent simultanément plusieurs instances d'Excel.

Bonjour Thev,

Merci beaucoup

Rechercher des sujets similaires à "fonction vba expliquer"