我想将灰色单元格复制到行，但只复制最后一列灰色单元格。
最佳答案
不需要嵌套循环
Sub Test()
Dim r As Integer, c As Integer
r = 3
For c = 3 To 21 Step 3
Cells(r, 1) = Cells(1, c)
r = r + 1
Next c
End Sub
关于excel - 对于下一个循环(初学者)，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/53019966/