VBA list of names of OLEobjects

[P.Holko]

Hi,
How can I obtain a list of all Active X formants in a worksheet?
Is there a alternative to .Name property among OLEObjects?
regards, PH

 

[P.Holko]

Nevermind, I don't know why the procedure below didn't work earlier:

Sub OLElist()
Dim oLe As OLEObject
    For Each oLe In ActiveSheet.OLEObjects
        MsgBox oLe.Name
    Next
End Sub