Word VBA:批量刪除多個(gè)分段頁面
一、難點(diǎn)分析
1.數(shù)組的應(yīng)用
比如,輸入多個(gè)區(qū)間【1,5-10,21-28】,如何循環(huán)這些區(qū)間。
這里主要是:
(1)將用戶輸入的需要?jiǎng)h除的區(qū)間通過split函數(shù)用逗號(,)進(jìn)行分割后存儲(chǔ)在一個(gè)數(shù)組arr中;
(2)從arr的最大下標(biāo)(最后一個(gè))循環(huán)到arr的最小下標(biāo)(第一個(gè)),每次循環(huán)的結(jié)果通過split函數(shù)用“-”分隔,存入數(shù)組brr中;
(3)i從brr(1)的值循環(huán)到brr(0)的值,刪除i對應(yīng)的頁面。
注意:這里需要判斷一下,如果arr中的元素本身沒有“-”,即分割出的brr中有一個(gè)元素brr(0),此時(shí)需要讓brr(1)也等于brr(0)。否則,brr(1)不存在,會(huì)報(bào)錯(cuò)。
2.操作順序
刪除盡量從后面向往前面操作,以免出現(xiàn)不必要的錯(cuò)誤
二、示例代碼
三、操作圖示
1.復(fù)制代碼-運(yùn)行

2.輸入要?jiǎng)h除的頁碼范圍
根據(jù)提示輸入要?jiǎng)h除的頁碼范圍,要求:
請輸入需要各部分刪除的頁碼范圍(頁碼從小到大,且每部分不能重疊),每部分首尾用【-】連接,各部分之間用逗號分隔,如: "1-5,10-20,95-100";
中間的此號、逗號都用半角符號(英文標(biāo)點(diǎn))。

3.操作完成
可以看到,剛剛用戶填寫的【67-78,80-81】頁已經(jīng)正確刪除。

標(biāo)簽: