I dont know whats you exacly think , but when I use
for each , hope that works correctly

, so I have one more question , can you help me pls

i need insert condition into for cycle, can you help me pls ?
Code:
condition = 50
For Each l In ccc
If l > condition Then
l = l
With aaa
.Add Item:=l
End With
Else:
l = l
With bbb
.Add Item:=l
End With
End If
Next
ccc is variant
aaa and bbb is collection