Vraag naar het juiste bestand waarop Macro moet worden toegepast

Ik heb enkele macro's welke ieder andere filters zetten op een bestand. De betreffende bestanden zijn maandoverzichten welke steeds dezelfde naam-opbouw hebben (ritten_2017xx.xlsx)
Nu wil ik bereiken dat voordat de filters worden uitgevoerd eerst gevraagd wordt op welk bestand dit moet plaatsvinden.
Ik weet alleen niet hoe ik dit voor elkaar ga krijgen, aangezien ik pas begin met macro's
. Wie heeft een voorbeeld voor me??


Sub WMORittenWEBS12()
'
' WMORittenWEBS Macro
' Bepalen ritten WMO welke via WEBS binnen zijn gekomen
'

'
ChDir "L:\Zakelijk\Maandbestanden\2017"
Workbooks.Open Filename:= _
"L:\Zakelijk\Maandbestanden\2017\ritten_201712.xlsx"
Selection.AutoFilter
ActiveSheet.Range("$A$1:$CA$146572").AutoFilter Field:=8, Criteria1:=Array( _
"C3", "C5", "G6", "G7", "O1", "O4", "O5", "O6", "O9", "S1", "S4", "S5", "S9", "W6", "W7", "Z1" _
, "Z4", "Z5", "Z6", "Z9"), Operator:=xlFilterValues
ActiveSheet.Range("$A$1:$CA$146572").AutoFilter Field:=10, Criteria1:="<>"
ActiveWindow.ScrollColumn = 2
ActiveWindow.ScrollColumn = 3
ActiveWindow.ScrollColumn = 4
ActiveWindow.ScrollColumn = 5
ActiveWindow.ScrollColumn = 6
ActiveWindow.ScrollColumn = 7
ActiveWindow.ScrollColumn = 8
ActiveWindow.ScrollColumn = 9
ActiveWindow.ScrollColumn = 10
ActiveSheet.Range("$A$1:$CA$146572").AutoFilter Field:=19, Criteria1:= _
"=WEBS*", Operator:=xlAnd
End Sub

Als je sinds mei 2010 lid ben, moet je toch wel weten dat de code tussen tags moet staan.

Gelukkig leer ik nog iedere dag. Bij deze de tags:

johe,

Je zou ziets kunnen toevoegen:

in plaats van: