Hi All,

I have a form which sits over the top of rather large spreadsheet. The form is used as filter critera to run the auto filter. I also have a combo box on this form which I want to show the results of the autofilter. The idea is that there is a cut down selection of rows from 1000+ to around 10-20.

I can't seem to get the combo box to only show the autofiltered results, and with the latest code - im not getting anything at all.

If you know working code please let me know.

    With Worksheets("Promo")
        Set myInputRange = Range("A2:A" & .Cells(.Rows.Count, "A").End(xlUp).Row).SpecialCells(xlCellTypeVisible)

        If Application.CountA(myInputRange) = 0 Then
            myInputRange(1).Value = "No Entries"
        End If
        Me.cbo_PromoTrackerLoc.RowSource = myInputRange.Address(external:=True)
    End With
    ActiveSheet.ShowAllData

Thanks for your help