Excel VBA中使用Range時(shí)晚顷，有一個(gè)Resize屬性樊诺，以Range單元格為基準(zhǔn)定位單元格區(qū)域。
1. 打開Visual Basic音同，添加模塊和過程，稱之為“單元格操作5”秃嗜。
Sub 單元格操作5()
End Sub
2. 以A1單元格為基準(zhǔn)权均，Resize的參數(shù)分別是行列的大小。
3. 添加Resize的參數(shù)锅锨，選中A1至D1四個(gè)單元格叽赊。
Sub 單元格操作5()
Range("A1").Resize(1, 4).Select
End Sub
4. 選中多行多列單元格區(qū)域。
Sub 單元格操作5()
Range("A1").Resize(5, 4).Select
End Sub
5. Resize應(yīng)用的實(shí)例：以合并單元格為例必搞，將兩個(gè)單元格合并（如A2和A3）必指。
6. 添加一個(gè)for循環(huán)：從A2單元格開始，隔2遞增恕洲。
Sub 單元格操作5()
Dim i As Integer
For i = 2 To 8 Step 2
Next
End Sub
7. 輸入合并單元格的代碼塔橡，合并的動(dòng)作為Merge梅割。
Sub 單元格操作5()
Dim i As Integer
For i = 2 To 8 Step 2
? ? Range("A" & i).Resize(2, 1).Merge
Next
End Sub
8. 執(zhí)行以上代碼后，即可將編號(hào)下面的單元格兩兩合并葛家。
以上示例只是用于演示户辞，實(shí)際應(yīng)用場(chǎng)景請(qǐng)根據(jù)自己的需要進(jìn)行相應(yīng)的設(shè)計(jì)或調(diào)整。
