Buscar datos desde un userform diferentes archivos excel

hola

Lo que pasa es que tengo un userform de consulta que yo al ingresar un código me devuelve en un listbox los datos filtrados y todo me va bien , pero solo me funciona en el archivo donde ejecuto mi userform.. Entonces como haría que los items de mi combobox sean los nombres de archivos excel contenidas en una carpeta de mi ordenador de tal manera que al seleccionar un item(archivo excel) de mi combobox mi userform trabaje en el archivo seleccionado..

este es mi código que me devuelve en el listbox

Private Sub CommandButton_buscar_Enter()
Dim C As Range
Set C = Worksheets("Union").[b:b].Find(What:=txtcodigo, LookIn:=xlValues, LookAt:=xlWhole)
If C Is Nothing Then
MsgBox ("EL " & txtcodigo.Value & " NO REGISTRA CONSUMA EN ESTA SEMANA")
Cancel = True
Exit Sub
End If
[F1825] = txtcodigo.Text
Call filtro
Dim uf As Integer
uf = [AA65536].End(xlUp).Row
LisDts.ColumnCount = 9
LisDts.RowSource = "AA5:AK" & uf
labtotal.Caption = Range("AM81").Text
labnombref.Caption = Range("AM4").Text
LisDts.ColumnWidths = "80;60;0;180;75;75;75;75;75"
txtcodigo.SetFocus

End sub

y este el modulo que usa

Sub filtro()
Dim uf As Integer
uf = [B65536].End(xlUp).Row
Range("B2:L" & uf).AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
"F1824:G1825"), CopyToRange:=Range("AA4:Ak4"), Unique:=False
End Sub