各位: 想在word的某一頁中一個題注(圖1-1)的,文本資訊但是好像沒發找到,代碼如下,請幫忙看下那里有問題,謝謝!
cuPage = myWordDocument.GoTo(wdGoToPage, wdGoToAbsolute, pageindex) '定位到具體某一頁
myWordDocument.Bookmarks("\page").Range.Select() '選中頁
cuPage.Find.Execute(Style:="題注", Forward:=True)
With cuPage.Find
.Style = "題注"
If .Execute = False Then Exit Function
result.Caption = cuPage.Text
End With
轉載請註明出處,本文鏈接:https://www.uj5u.com/qita/135263.html
