mira creo que lo que vos buscas es lo que en este modulo hace



Private Declare Function GetShortPathName Lib _
"kernel32" Alias "GetShortPathNameA" (ByVal _
lpszLongPath As String, ByVal...