Excel 循环及；如果不适用于第二条指令

我是Excel VBA的新手，我正在做的是为我们的一个ERP加载程序。所以我的问题是…我有一个excel工作表，我们称之为原始工作表，另一个，我们称之为虚拟工作表

我想做的是让宏检查原点范围内的某个单元格（af18）是否符合条件。如果为真，则将A18从原始图纸复制到虚拟图纸。然后在下一列中插入{tab}。如果AF19（下一个单元格）符合条件，则将a19复制到dummy的下一个空白列中，然后再次插入{tab}

当前代码生成以下内容：

1,2,3…\{tab}

但我希望它是这样的：

1，\{tab}，2，\{tab}…

在下一次迭代中，您将覆盖刚刚编写的

“\{TAB}”

。每次迭代时，

descolstart

必须递增

2

，因为每次迭代消耗两列

descolstart = descolstart + 2  ' <------------ +2, not +1

---

descolstart=descolstart+2'非常感谢。：）这正是我所缺少的。“感谢您的反馈！声誉低于15的人所投的票会被记录下来，但不会改变公开显示的帖子分数。“我想我还不允许这样做。：（悲伤。@LiezlMaigue:注意；）@SiddharthRout lol，谢谢，你能接受答案吗？：PWish我能：）
destination.cells(1, descolstart).PasteSpecial Paste:=xlPasteValues
destination.cells(1, descolstart + 1).Value = "\{TAB}"
descolstart = descolstart + 1

descolstart = descolstart + 2  ' <------------ +2, not +1