[megaloman]

формат выходной папки сделать с точками и пробелом то есть "Иванов А.Б." »

Одобряю, это более читаемо. Измените процедуру.

Код:

:MoveName
	FOR /F "tokens=1,2,3 delims=. " %%i IN ("%~nx1") DO (
		If Not Exist "%~3\%%i %%j.%%k." MD "%~3\%%i %%j.%%k."
		Echo Move %1 "%~3\%%i %%j.%%k.\"
		     Move %1 "%~3\%%i %%j.%%k.\" >nul
	)
Exit /B

Кстати, выделенная строка с Echo может быть удалена. Я её вставил, чтобы наблюдать процесс.