错误Excel VBA中的 “方法范围的对象_global失败”

Question

这里是我的代码

Sub rangking() 
Dim mulai As Integer 
Dim akhir As Integer 
Dim i As Integer 
Application.CutCopyMode = False 
mulai = 0 
akhir = 60 
For i = akhir To mulai Step -1 
If Range("data!AC" & i).Value > 90 Then 
Range("data!AO" & i).Value = "mumtaz" 
ElseIf Range("data!AC" & i).Value > 80 Then Range("data!AO" & i).Value = "jayid jiddan" 
ElseIf Range("data!AC" & i).Value > 70 Then Range("data!AO" & i).Value = "jayid" 
ElseIf Range("data!AC" & i).Value > 60 Then Range("data!AO" & i).Value = "hasan" 
ElseIf Range("data!AC" & i).Value > 50 Then Range("data!AO" & i).Value = "kaaf" 
ElseIf Range("data!AC" & i).Value > 45 Then Range("data!AO" & i).Value = "makbul" 
Else: Range("data!AO" & i).Value = "rosib" 
End If 

Next i 

End Sub 

我 “的对象_global'失败方法 '范围'” 的行

If Range("data!AC" & i).Value > 90 Then 

有误，请帮我

Answer 1

Range("data!AC" & i) 

是不是你需要seperately定义表 如范围：

Sheets("data").Range("AC" & i)