微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

如何在Excel中进行for循环?

如何解决如何在Excel中进行for循环?

我想知道您是否可以帮助我在Excel中进行循环?

我可以用Java或C来做,但是用Excel很难!!我看过一些入门教程,但是太复杂了!

S(i) and T(i) are to explain that I need to go from S3 to S32,and T3 to T32

{
INT C4  = Intro!B5
INT var = 0

FOR i = 3 to 32
    IF  S(i) = INTRO!A12    THEN
        IF  T(i) = 0    THEN
            var = INTRO!B2
        ELSE    var = INTRO!B2 - T(i)
        ENDIF
    ELSE    var = 0
    ENDIF

    C4 = C4 - var
    i++
ENDFOR
}

这是我尝试过的方法,但是不起作用!

Sub title()

Dim i As Integer
Dim var As Integer
var.Value = 0

For i = 3 To 32
    If Cells(4,3).Value = "C" Then
        If Cells(i,19) = 0 Then
            var = INTRO.Cells(2,2)
        Else: var = INTRO.Cells(2,2) - Cells(i,20)
        End If
    Else: var = 0
    Enf If
Cells(4,3) = Cells(4,3) - var
Next i

End Sub

解决方法

我基于您尝试的转换,有一些错误,但我想我已经全部清除了:

Sub title()
Dim i As Long,var As Long
var = 0
For i = 3 To 32
    If Cells(4,3).Value = "C" Then
        If Cells(i,19) = 0 Then
            var = Sheets("INTRO").Cells(2,2).Value
        Else
            var = Sheets("INTRO").Cells(2,2).Value - Cells(i,20).Value
        End If
    Else
        var = 0
    End If
    Cells(4,3) = Cells(4,3) - var
Next
End Sub

在VBA中,请使用Long而不是Integer并直接赋值,因为var = 0是变量而不是对象,所以var = 0而不是var.value = 0。

还有一个错字enf if而不是end if

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。