[Georgio]

wiznv, попробуйте в цикле сделать так:

Код:

For /F "UseBackQ Tokens=1,2*" %%I In (
`Reg Query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"^|Find /I "Personal"`
) Do (
 If %%I==Personal (
  Set Person=%%K
))

.