[megaloman]

Код:

@Echo Off
cls
>nul chcp 1251
	Set "FileTxt=Z:\Soft_In\список папок c номерами в txt.txt"

	Set "BoxIn=Z:\Box_In" 
	Set "BoxOut=Z:\Box_Out"

	FOR /F "usebackq delims=" %%n IN ("%FileTxt%") DO For /F "usebackq delims=" %%f In (`2^>nul Dir "%BoxIn%\*%%n.*" /B /A:D`) Do (
		>nul Xcopy "%BoxIn%\%%f\*.*" "%BoxOut%\%%f\" /E /Y /D /H /R
	)
pause
Exit /B 0