关于#大数据#的问题：vba统计每列中0到9没有出现过的内容，并按列对应输出到另一张新的工作表中

统计每列中0到9没有出现过的内容，并按列对应输出到另一张新的工作表中，并统计出现数字的次数按升序排在对应列没有出现过过的数字下面，注释详解哦！

Dim arr(0 To 10) As Integer

For i = 0 To 10
    arr(i) = 1
Next i

For i = 2 To 9
    arr(Cells(i, 1).Value) = 0
Next i

s = "没有出现过的："
For i = 0 To 10
    If arr(i) = 1 Then s = s & " " & CStr(i)
Next i

MsgBox s