为什么我的VBA代码在运行时会跳过行，而在我逐步执行时却不会跳过行？==

Question

下面是我编写的代码。我试图建立一个Excel模型，从现有的PowerPoint模板创建一个PowerPoint。当前，我只是在尝试确保它可以通过一次并填写必要的信息，但是最终，当给定多个输入时，我最终希望它循环并创建更长的PowerPoint。在添加该代码之前，我需要先完成这段代码。当我按F8逐步执行代码时，if是否可以正常工作并按应有的执行。但是，当我按“运行”时，它会跳过部分并将excel文件中的信息发布到错误的位置。有什么方法可以使其更有效地运行，从而使其不再跳过，以便以后可以使它运行更复杂的代码？

谢谢！

For Loop Properties
InitExpression    @Counter = 0
EvalExpression    @Counter < 5
AssignExpression  @Counter = @Counter + 1

Answer 1

如果要使宏更可靠，则需要先检查复制和选择是否完成，然后再用ExecuteMso粘贴数据。对于剪贴板，您需要先将其清除，然后尝试.copy直到剪贴板填满。然后，形状选择是相同的：尝试select，直到它被真正选择为止。对于这两种情况，都可以使用while循环（当然，请远离无限循环;-））。为了简便起见，您可以将其放在单独的函数中。