Hladanie existenice suborov v priecinku v hociakom formate

Vytvoril som si makro:
Sub fileExistsFSORange()
Dim Rng As Range
Set fso_obj = CreateObject(“Scripting.FileSystemObject”)

Set Rng = Selection

For Each Cell In Rng
If fso_obj.fileExists(Cell) Then
Cell.Font.Color = vbGreen
Else
Cell.Font.Color = vbRed
End If
Next Cell
End Sub

Takze ked si dam do okna cestu, napr E:\test\skuska.pdf, oznacim a zapnem makro, tak sa text zozelenie alebo zcervenie podla toho ci tam je.
No musi tam byt aj format suboru. Ako urobyt aby nerozlisovalo format suboru? skusal som zastupitelny znak E:\test\skuska.* ale to nefungovalo.