Wildcards & Multiple folder locations

[Switch]

I have the following code that runs on a button, is it possible to replace siteName in the file paths with a wildcard (due to the mass spelling errors on our server)??

Thanks in advance

Private Sub Document_File_Click()
Dim str_folder As String
Dim str_folder1 As String
Dim siteName As String
Dim siteID As String

siteName = Me.siteName
siteID = Me.sitesDoc

str_folder = "I:\GSM-R REB TEH  & Site Works\" & siteID & " " & siteName

str_folder1 = "I:\BTS Integration\All Sites\" & siteID & " " & siteName


Call Shell("explorer.exe " & str_folder, vbNormalFocus)