如何创建 Excel VBA 循环以在单元格 A5、B4、C3、D2、E1 中打印文本（“x”）

Question

该图像显示了我正在尝试打印的内容，不确定如何通过循环来实现。

这就是我一直试图解决的问题，我做错了什么？

Sub x()
    Dim i As Long
    Dim y As Long
    For i = 1 To 5
        For y = 5 To 1 Step -1
            Cells(y, i).Value = "x"
        Next y
    Next i
End Sub

Answer 1

这是您可以使用循环执行此操作的一种方法：

Sub x()
    Dim i As Long
    For i = 1 To 5
        Cells(6 - i, i).Value = "x"
    Next i
End Sub