划分两列的基本VBA

Question

我是 VBA 的新手，也是 StackOverflow 的新手，我只是想按照教程来掌握窍门。 如果我有两列数字，A 列和 B 列，我想将 A/B 相除并将结果放入 C。我想使用 for 循环来执行此操作。我到目前为止的代码是：

Sub ForLooptoDivide()

Dim i As Integer

 For i = 2 To 6

Cells(i, 3).Value = Cells(1, i).Value / Cells(2, i).Value

Next i


End Sub

就像我说的，我是新手，刚刚在教程中遇到了障碍。

谢谢！

Answer 1

你没有提到你的问题。有很多方法可以做到这一点。下面的子将在Column A 中找到最后使用的单元格，然后迭代以将Column A 除以Column B 并将结果放入Column C。试一试...

Sub DivideColumns()
Dim Lastrow As Long
Dim i As Long

    Lastrow = Cells(Rows.Count, "A").End(xlUp).Row
    
    For i = 2 To Lastrow
        Cells(i, "C") = Cells(i, "A") / Cells(i, "B")
    Next i

End Sub