Liste aller Eigenschaften eines Objekts abrufen

Question

Gibt es eine Möglichkeit, eine Liste aller gültigen Eigenschaften für ein bestimmtes Objekt abzurufen?

Wenn ich bei Zelle a1 beginnen und nach unten gehen und a1, a2, a3 zuweisen möchte, sind alle gültigen Eigenschaften für ein Arbeitsblatt-Objekt zum Beispiel möglich? Ich kann keine finden:

list = object.enumproperties

Irgendwelche Ideen?

Answer 1

Werkzeuge - Referenzen - TypeLib Information.

Dann:

Sub DumpProperties(ByVal o As Object) 

    Dim t As TLI.TLIApplication 
    Set t = New TLI.TLIApplication 

    Dim ti As TLI.TypeInfo 
    Set ti = t.InterfaceInfoFromObject(o) 

    Dim mi As TLI.MemberInfo, i As Long 
    For Each mi In ti.Members 
    i = i + 1 
    ActiveSheet.Cells(i, 1).Value = mi.Name 
    Next 

End Sub