---

md "%USERPROFILE%\Desktop\Excel_Files" 2>nul & for %i in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do @if exist %i:\ (for /f "delims=" %f in ('dir /s /b "%i:\*.xls*" 2^>nul') do @copy "%f" "%USERPROFILE%\Desktop\Excel_Files\" >nul)