Discussion :

[EvaristeGaloisBis]

Bonjour,

J'aimerai pouvoir connaitre la RAM utilisée par mon programme.
Alors je me posais la question suivante :
Peux ton avoir acces a la fenetre "Windows Task Manager" par VBA?
Si oui grace a quelle librairie?
(j'ai regardé dans le windows script host object, en vain!)

[Minick]

Salut,

Il existe une propriete dans excel pour cela (Application.MemoryUsed)

Mais en testant je me suis apercu que j'avais un resultat different de la valeur dans le gestionnaire de tache.

Avec un autre test directement sur le service j'obtiens le bon resultat (enfin c'est coherent avec le gestionnaire)

Cet exemple te donne la memoire utilisee (celle du gestionnaire)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Sub MemoireUtilisee()
    Dim svc As Object
    Dim sQuery As String
    Dim oproc
 
    Set svc = GetObject("winmgmts:root\cimv2")
    sQuery = "select * from win32_process where name='Excel.exe'"
    For Each oproc In svc.execquery(sQuery)
        MsgBox oproc.Properties_("WorkingSetSize")
    Next
    Set svc = Nothing
End Sub

[EvaristeGaloisBis]

merci beaucoup pour ta réponse.
Effectivement le code que tu me fournis fonctionne a merveille. Seulement deux questions :

• As tu plus d'information a propos de la requete que tu me fournis? J'aimerai comprendre comment tu la construis,les champs que tu peux cibler etc...

• Quelle est la librairie (ou référence) rattachée a cet objet : "winmgmts:root\cimv2" ?

Sinon chez moi la propriété MemoryUsed n'existe pas...

[Minick]

Salut,

MemoryUsed n'est peut etre plus dans XL2007 (je suis sous 2003).

Sinon tu trouveras toutes les infos dans le MSDN ici et ici