Excel VBA在当前单元格之前插入单元格

Question

我试图找到在当前单元格之前插入单元格的正确方法。

我循环遍历一行中的多个单元格 - 当它找到正确的值时，我希望它向右移动。

我已经尝试过这段代码:(位置代码的值指向相对于起始活动单元格的偏移量）

Dim shiftrng as Range

For ctr = locatedPostCodeIndex To 4

    Set shiftrng = Range(cll.Offset(0, locatedPostCodeIndex)).Select
    shiftrng.Insert.xlShiftToRight

Next

我收到错误：Method range of object _global failed

在单元格之前插入单元格的正确方法是什么？

Answer 1

在将变量设置为范围对象时，不要添加.Select，并且不需要在Range(...)中包装单元格偏移目标。

Set shiftrng = cll.Offset(0, locatedPostCodeIndex)