如何通过 vba 将簇/范围从水平循环到垂直循环

Question

我是新手，想在 Microsoft Excel 中实现一个循环。基本上，就是将簇/范围从水平排列到垂直排列。我尝试过转置函数，但无法使代码工作，而且似乎大多数示例都在排列单元格。希望有人能启发我。谢谢 (B2:C4)、(D2:E4)、(F2:G4) 重新排列 (B2:C4)、(B5:C7)、(B8:C10)

Answer 1

你可以使用这样的方法：

Sub move_cells()
    With ActiveSheet
        .Range("d2:e4").Cut .Range("b5")
        .Range("f2:g5").Cut .Range("b8")
    End With
End Sub