amigo mira en la carpeta donde se crea el archivo hay otros archivos y entonces el programa de copiar o mover es el ultimo archivo creado(el que el usuario crea) a la otra carpeta llamada ''programas''
tu dices que use esto? pero no se como usarlo me marca error
17.Public Sub FolderCopyEx(Source As String, Destination As String)
18. Dim SHFileOp As SHFILEOPSTRUCT
19.
20. With SHFileOp
21. .wFunc = FO_COPY
22. .pFrom = Source
23. .pTo = Destination
24. End With
25.
26. SHFileOperation SHFileOp
27.End Sub