개체에 대한 모든 속성 목록 가져오기

개체에 대한 모든 속성 목록 가져오기

지정된 개체에 대한 모든 유효한 속성 목록을 가져올 수 있는 방법이 있습니까?

만약 제가 셀 a1에서 시작하고, 아래로 내려가서 예를 들어 워크시트 객체에 대한 모든 유효한 속성을 할당하고 싶다면, 그것이 가능한 것일까요?찾을 수 없습니다.

list = object.enumproperties

아이디어 있어요?

도구 - 참조 -TypeLib Information.

그러면:

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

언급URL : https://stackoverflow.com/questions/19783180/get-list-of-all-properties-for-an-object