小编Min*_* Ha的帖子

我已经构建了一个简单的函数,但它需要大约11-12个具有相同整数类型的变量.每次我尝试使用超过10个变量时,第一个变量经常出错,而其他变量被正确计算.如果我将变量数减少到10,那么它们都是正确的.这是否意味着hat vba一次只能存储10个相同类型的变量？或者这是我的电脑'限制:))

这是我的代码,btb返回错误的值,而其他的是正确的,但如果我删除变量"a"和所有相关的代码,那么btb返回正确

Sub regionCount()
Dim btb, dbb, hn, ntb, dnb, tnbBS, tnbNS, hcm1, hcm2, hcm3, a As Integer

btb = dbb = hn = dnb = tnbBS = tnbNS = hcm1 = hcm2 = hcm3 = a = 0

For Each mycell In Worksheets(1).Range("E2:E382")
    If mycell.Value = "Khu vuc Bac Trung Bo" Then
        btb = btb + 1
    ElseIf mycell.Value = "Khu vuc Dong Bac Bo" Then
        dbb = dbb + 1
    ElseIf mycell.Value = "Khu vuc Ha Noi" …