[Iska]

Если результирующий каталог и маски совпадают, то можно сократить до (не проверялось):

Код:

…
for %%i in (
	"Z:\Источник 1"
	"Z:\Источник 2"
	"Z:\Источник 3\Какой-то каталог"
	"Z:\Источник 3\Ещё какой-то каталог"
) do call :In "%%~i" "*.txt" "Z:\Единый результирующий каталог"
…