Excelmacros – 插入与macros的列正在奇怪的方式转移其他列？

我已经试过这两个相对单元格引用和绝对引用。 我试图录制一个macros，并写在VBA中。 我不明白为什么在过去做过类似的事情时，这不适合我。 它只是应该采取原始数据和格式，这包括插入两个新列的人添加注释。

下面我已经包含了一个macros的片段。 我知道问题不在于macros的其余部分，因为即使我单独使用它作为macros，问题也会发生。

Rows("1:1").Select Rows("1:1").Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove Selection.ClearFormats Columns("B:B").Select Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove Range("B3").Select ActiveCell.FormulaR1C1 = "Date" Range("F3").Select ActiveCell.FormulaR1C1 = "Notes" 

Answer 1

这应该可能帮助，我希望

 Private Sub thisorthat() Sheets(6).Columns("B").EntireColumn.Insert End Sub