VBA 裡面的 Range 不能合併，所以只能曲線救國。這有一段文字，有紅底，有綠底，如何將所有紅底選中呢？選中某幾個紅底字，然後點建立樣式。名字隨便起，但是你要記住這個名字，點選修改。把樣式型別改成字元，點選確定收工。噹噹噹當，VBA 閃亮登場，程式碼很容易看懂，遍歷所有字元，如果背景是紅色 wdRed 的，就把這個字元的樣式設定成“背景紅色”。

　　1、word裡有①，②，③，④4個顏色相近的藍色，現在主要任務就是將四個藍色變成①這一個藍色。 　　2、選中①顏色的字型，右鍵在“A”的右邊有一個下箭頭，點選，彈出下拉列框，點選取色器。 　　3、滑動箭頭取出①的的藍色，可以看到，大框裡有一個小框顯示取出的顏色，在小框的右邊出現：RGB:36,91,141 　　4、選中第二行的字型，右鍵在“A”的右邊有一個下箭頭，點選，彈出下拉列框，點選“其他字型顏色” 　　5、在彈出的對話窗口裡，選擇“自定義”，看到“顏色樣式RGB”設定下面的顏色"紅色R:36","綠色G:91","藍色B:141"，點選"確定"按鈕就可以了。 　　6、第一次取色後發現色差有點大，又取了一次色RGB:28，126，178，色差要小一點，所以如果取色後色差大，可以多試幾次。大家可以看見，取得色如果被使用後，"A"下就會“最近實用的顏色”，所以取出色差最小的顏色，下面就可以將字型設定成最近使用的顏色，就不需要再填RGB值了。 　　7、將所有行的字型設定成①顏色的藍色效果圖。