while循环嵌套if语句vba只打印第一个“TRUE”值并停止

我正在尝试创build一个Do While循环,其中包含一个if语句。 根据If语句的TRUE / FALSE值,它可以进入另一个(子)Do While循环,或者只是循环回到第一个循环,然后重新开始。

我的问题是,一旦If语句返回一个“TRUE”值,macros执行结果,但然后停止第一覆盖Do While循环,我想继续。 (基本上,如果If语句中有一个TRUE值,它不会为x + 1生成另一个循环)

提前谢谢你的帮助

'x is row in input tab Dim x As Integer 'z is column in input tab Dim z As Integer x = 9 Do While x < 59 If Sheets("Input Tool (Auction Team)").Cells(x, "C") = "N" And Cells(x, "D") = "Yes" Then 'insert row and add values Sheets("Round Results (Auction Team)").Range("C13").EntireRow.Insert z = 5 Do While z < 19 Sheets("Input Tool (Auction Team)").Cells(x, z).Copy Sheets("Round Results (Auction Team)").Cells(13, z - 2).PasteSpecial Paste:=xlPasteValues Sheets("Round Results (Auction Team)").Cells(14, z - 2).Copy Sheets("Round Results (Auction Team)").Cells(13, z - 2).PasteSpecial Paste:=xlPasteFormats Sheets("Round Results (Auction Team)").Cells(14, 2).Copy Cells(13, 2) z = z + 1 Loop Else End If x = x + 1 Loop End Sub