objSel.Tables.Item(1)을 사용하여 테이블 변수를 설정할 수 없는 이유는 무엇입니까?

Question

선택한 테이블, 행, 열 및 셀을 반복하려고 합니다.
그러나 for 루프의 변수에 Table 개체를 올바르게 설정할 수 없습니다. 유형이 맞는지 확인하기 위해
요소를 검사했습니다.TypeName(objSel.Tables.Item(1)이다테이블 유형입니다. 그런데 "유형 불일치" 오류가 계속 발생합니다.

아래에서 코드와 오류를 볼 수 있습니다.

두 번째 시도:

Answer 1

Word.Table을 Outlook.Table에 저장하려고 했기 때문에 문제가 발생한 것 같습니다.

이전(작동하지 않음):

Dim aTbl As Table
Dim i As Integer
For i = 1 To objSel.Tables.Count()
    Debug.Print (TypeName(objSel.Tables.Item(i)))
    Set aTbl = objSel.Tables.Item(i)
    Debug.Print (TypeName(aTbl))
Next

(작업 후):

Dim aTbl As Word.Table
Dim i As Integer
For i = 1 To objSel.Tables.Count()
    Debug.Print (TypeName(objSel.Tables.Item(i)))
    Set aTbl = objSel.Tables.Item(i)
    Debug.Print (TypeName(aTbl))
Next