使用一些空格移动单元格集，使集合右对齐

Question

在Excel中，我有一个包含大量数据的大文档，我正在寻找移动单元格的最佳方法。

我有A，B，C和D列，我想将它们移到C，D， E和F。问题是现在它是左对齐的，所以有时D单元格中没有任何内容，因此它将那些应该在D单元格中的值放在C单元格中。解决这个问题的最佳方法是什么？

有关于我的意思的图片链接：

Answer 1

尝试一下：

Sub dural()
    Dim N As Long, L As Long
    N = Cells(Rows.Count, "A").End(xlUp).Row
    For L = 1 To N
        While Cells(L, "F") = ""
            Cells(L, 1).Insert (xlShiftToRight)
        Wend
    Next L
End Sub