【问题标题】:I would like to replicate this nested for loop I have in c in an excel vba我想在excel vba中复制我在c中的这个嵌套for循环
【发布时间】:2019-07-22 21:11:36
【问题描述】:

注意:我知道这种解释令人困惑,但是当您查看我发布的代码时,它会更有意义。欢迎提出任何修改建议。

我正在尝试在 excel vba 中重新创建我在 c 中创建的嵌套 for 循环。我需要 excel 中的嵌套 for 循环以与 c 中的嵌套 for 循环相同的方式运行。

到目前为止,我已经尝试在 excel 中创建一个嵌套 for 循环,其格式与 c 中的嵌套 for 循环相同(当然同时更改了语法)。目前我的 excel 嵌套 for 循环输出与我的 c 嵌套 for 循环输出不匹配。

这是我的 c 代码

#include <stdio.h>

int main()
{
   for (int i=1; i<=2; i++)
   {
    for (int j=1; j<=4; j++)
    {
       printf("%d, %d\n",i ,j);
    }
   }
   return 0;
}

这里是 c 循环输出(我试图在 excel 中重新创建)

1,1

1,2

1,3

1,4

2,1

2,2

2,3

2,4

这是我的excel代码

Sub Button2_Click()

For i = 1 To 2
    For j = 1 To 4
        Cells(i, 2).Value = j
        Cells(i, 1).Value = i

    Next j
Next i
End Sub

这是输出(我希望这个输出与 c 匹配)

1、4

2、4

【问题讨论】:

    标签: c excel vba


    【解决方案1】:

    你需要第三个计数器每次向下移动一行:

    Sub Button2_Click()
    Dim rw as Long
    rw = 1
    
    Dim i as Long
    For i = 1 To 2
        Dim j as Long
        For j = 1 To 4
            ActiveSheet.Cells(rw, 2).Value = j
            ActiveSheet.Cells(rw, 1).Value = i
            rw = rw + 1    
        Next j
    Next i
    End Sub
    

    【讨论】:

    • 非常感谢您的回答。不过,我确实有一个后续问题。是否可以将此代码用于excel中的冒泡排序算法?
    • 新问题获得新帖子。
    猜你喜欢
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2021-06-01
    • 2013-12-01
    • 1970-01-01
    • 2016-02-26
    • 1970-01-01
    • 1970-01-01
    相关资源
    最近更新 更多