发布网友 发布时间:2024-10-21 19:59
我来回答
共1个回答
热心网友 时间:2024-11-19 15:32
具体见图演示
Sub abc() Dim i As Integer For i = 1 To 5 Step 2 Sheet1.Range("a" & i & ":b" & i).Interior.ColorIndex = 13 NextEnd Sub