Run the script in your image directory. Make sure that destination doesn't have any sub directories.

IMG=100     # Number of images to move

DES="."     # Destination



I=$(find . -maxdepth 1 -mindepth 1 -type f | wc -l)

N=$(( (I / IMG) + (I % IMG) ))

eval mkdir "$DES"/Folder{01..$N}



for i in $(find "$DES" -maxdepth 1 -mindepth 1 -type d | sort); do

    mv $(find . -maxdepth 1 -mindepth 1 -type f | sort | grep -m $IMG '.*') $i

done