返回列表下一主題上一主題發帖

[發問] 如何得知搜尋結果的數量?

PKKO

　暱稱: PKKO

高中生 Rank: 3 Rank: 3

帖子: 549
主題: 152
精華: 0
積分: 691
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2010
閱讀權限: 50
性別: 男
註冊時間: 2013-8-10
最後登錄: 2022-9-7

論壇榮譽勳章論壇贊助勳章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2014-12-19 10:37 | 顯示全部帖子

[發問] 如何得知搜尋結果的數量?

objSelection.WholeStory
            objSelection.Find.ClearFormatting
            objSelection.Find.Text = tt
            objSelection.Find.Replacement.Text = ""
            objSelection.Find.Forward = True
            objSelection.Find.Wrap = wdFindContinue
            objSelection.Find.Format = False
            objSelection.Find.MatchCase = False
            objSelection.Find.MatchWholeWord = False
            objSelection.Find.MatchByte = True
            objSelection.Find.CorrectHangulEndings = False
            objSelection.Find.MatchAllWordForms = False
            objSelection.Find.MatchSoundsLike = False
            objSelection.Find.MatchWildcards = False
            objSelection.Find.MatchFuzzy = False
            objSelection.Find.Execute
            objSelection.TypeText Text:=CStr(rr)
            objSelection.Find.Execute , , , , , , , , , , wdReplaceAll

以上之程式碼可以完成我搜尋的工作,並且取代成功
但要如何得知有"幾個"搜尋結果,將搜尋結果的數量變成一個變數名稱ex:findN
而我就可以執行其他動作
if findN =0 then XXXXX

麻煩各位大大了