ti ringrazio molto! Con lo sleep ci sono riuscito...ora purtroppo ho un altro problema...prima dei due shell ho inserito un comando, ma inserendo questo comando non mi esegue più il secondo shell..

FileBmp = App.Path & Combo4.List(Combo1.ListIndex)
SavePicture Picture1.Picture, FileBmp

Shell
Sleep 5000 'millisecondi
DoEvents
Shell

Il comando è Filebmp ecc..come mai dà questo problema? Come posso risolverlo?

Ancora grazie attendo risposta!!