Maybe you should post the entire procedure code exactly as written, ensuring that we have the results of variables because, first, this has no quotes so it should error out anyway
Code:
strFullFileName = L:\aaTS\AAFilesToCopy\Site Plans PDF\Standford Corporate Centre.*
and because I can also confirm that it's possible to use the * wildcard
Code:
Sub TestWildcardForExtension()
Dim strPath As String, strFileNames As String
Dim FoundFiles As String
strPath = "C:\Users\Micron\Documents\forum1"
FoundFiles = Dir(strPath & ".*")
If FoundFiles = "" Then
MsgBox "not found"
End If
End Sub
but Dir will only return the 1st file that satisfies the function, thus it seems arbitrary to email whichever one it finds first. Perhaps you are ok with that.
The more we hear silence, the more we begin to think about our value in this universe.
Paraphrase of Professor Brian Cox.