How to tell the users with message box that the path location having a space?

rlyr.file = Dir1.Path & "\" & File1.List(File1.ListIndex)