VBA Как получить диапазон, отфильтрованный и отсортированный в пользовательской форме

Question

Я новичок в VBA, и это моя проблема:

Sheet 
A          B                C
TOTO       300              Keep
JOHN       200              Keep          
JOHN       100              Keep
ROBERTO    300  

Цель состоит в том, чтобы получить этот диапазон в пользовательской форме, чтобы создать флажок и текстовое поле для каждой строки после фильтра на C = Сохранить и отсортировать по A и B.

Я пробовал это, но количество строк по-прежнему равно нулю:

Set rng1 = Ws.Cells

rng1.AutoFilter Field:=3, Criteria1:="Keep"
rng1.Sort Key1:=Range("A1"), Order1:=xlAscending, key2:=Range("B1"), order2:=xlAscending
For i = 1 To rng1.Row (always zero!)
        Set Obj = UserForm1.Controls.Add("forms.textbox.1")...  
        Set Obj = UserForm1.Controls.Add("forms.checkbox.1")...
Next

Заранее спасибо за любую помощь