Word vba 에서 현재 표 의 번 호 를 가 져 옵 니 다.
3100 단어 wordvba표 번호VBAOffice+WPS
Sub ()
With Selection
If .Information(wdWithInTable) = True Then
If .Cells.Count = 1 Then
StrAddr = "T" & Selection.Tables(1).Range.Start & "R" & .Cells(1).RowIndex & "C" & .Cells(1).ColumnIndex
Else
StrAddr = "No Table Or More Tables "
End If
Else
MsgBox " ", vbOKOnly + vbCritical, " "
Exit Sub
End If
End With
Dim tempTable As Table
Dim i As Integer
i = 1
For Each tempTable In ActiveDocument.Tables
tempTable.ID = i
i = i + 1
Next
MsgBox " " & Selection.Tables(1).ID & " ", vbOKOnly + vbInformation, " "
End Sub
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
Java-Word 문서에서 머리글 및 바닥글을 추가하거나 제거하는 방법Spire.Doc for Java를 사용하면 Java 애플리케이션의 Word 문서에서 머리글과 바닥글을 추가, 삽입, 삭제 또는 제거할 수 있습니다. 이 기사에서는 다음 두 부분에서 Word 문서의 머리글과 바닥글을...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.
좋은 웹페이지 즐겨찾기
