Excel VBA循环

gudnpqoy 于 2023-05-01 发布在其他

关注(0)|答案(1)|浏览(147)

如何在Excel（VBA）中填写列A和B，考虑到B应该〈100 000，A包含从1开始的整数，B包含值n^5-10n^4？
我尝试使用Do While循环，但不知道如何解决此任务
下面是我尝试过的代码，但我确信它是非常错误的（我刚开始使用VBA）：

columnB = Cells(k, 2).Value
columnA = Cells(i, 1).Value
Do Until columnB < 100000
    columnA = columnA + 1
    columnB = columnA ^ 5 - 10 * columnA ^ 4
Loop

excel

来源：https://stackoverflow.com/questions/76104093/excel-vba-loops

1条答案

按热度按时间

wtlkbnrh1#

如果它绝对必须是VBA，那么像这样的东西应该适合你。请注意，在您的原始代码中，您从未为结果设置单元格值，您只是不断更新变量。这是一些简单的代码，作为您尝试完成的示例：

Sub FillValues()
    
    Dim ws As Worksheet:    Set ws = ActiveWorkbook.ActiveSheet
    Dim i As Long:          i = 1
    Dim lMax As Long:       lMax = 100000
    
    Dim dValue As Double
    Do
        dValue = i ^ 5 - 10 * i ^ 4
        If dValue >= lMax Then Exit Do
        
        ws.Cells(i, "A").Value = i
        ws.Cells(i, "B").Value = dValue
        i = i + 1
    Loop
    
End Sub

赞(0）回复(0）举报 2023-05-01

我来回答

Excel VBA循环

1条答案

相关问题

热门标签

最新问答