Question

请问VBA中我这条指令有什么错误

Sub 检测重复()
For i = 11 To 55 Step 10
b = i + 9

'
' 检测重复 Macro
'
' 快捷键: Ctrl+n
'
ActiveCell.FormulaR1C1 = "=IF(COUNTIF(RiC1:RbC1,RC[-1])>1,""重复"",""正确"")"
Cells(i, 1).Select
Selection.AutoFill Destination:=Range(Cells(i, 2), Cells(b, 2)), Type:=xlFillDefault
Range(Cells(i, 2), Cells(b, 2)).Select
Next i
End Sub

如图我希望做的是检测11-20 看看有没有重复的内容 然后检测 21-30 看看有没有重复的内容（不能直接11-30的，因为只是小范围不准有重复）
然后因为我这是变量，所以单元格的表达都弄成了Cell
Selection.AutoFill Destination:=Range(Cells(i, 2), Cells(b, 2)), Type:=xlFillDefault这一句总是提示我
运行时错误‘1004’
类range的autofil方法无效
谢谢大神。

Answer 1

PRSDBLOGAffectedRowCount @PackageType,1350,@@RowCount
while @@rowcount>1
delete
from temp
OUTPUT deleted.*
INTO temp_deleted
WHERE OperateTime > @CurrentDate
exec PRSDBLOGAffectedRowCount
set rowcount 0