Automator/Applescript to move files to folders

Put it around only the move line, or run:

tell application "Finder"

set this_folder to (choose folder) --do not change this line

set the_files to (get files of this_folder)

repeat with this_file in the_files

set the_name to name of this_file

set the_short_name to items 1 thru 8 of the_name as string

if exists folder the_short_name of this_folder then move this_file to folder the_short_name of this_folder

end repeat

end tell

(161751)

Assuming the logic is that the folder name is essentially a prefix to the file names, you can do something like this in AppleScript:

use AppleScriptversion "2.4" -- Yosemite (10.10) or later

use scripting additions

set topFolder to (choose folder with prompt "Select the top-level folder")

tell application "Finder"

set folderList to every folder of folder topFolder

repeat with eachFolder in folderList

set folderName to name of eachFolder

set filesToMove to (every file of folder topFolder whose name begins with folderName)

if (count of filesToMove) > 0 then

movefilesToMovetoeachFolder

end if

end repeat

end tell

Run the following:

tell application "Finder"

set this_folder to (choose folder) --do not change this line

repeat with this_subfolder in (get folders of this_folder)

set folder_name to name of this_subfolder

move (every file of this_folder whose name starts with folder_name) to this_subfolder

end repeat

end tell

(161748)

Will work if the folder names are less then 8 characters.

tell application "Finder"
    
    set this_folder to (choose folder) --do not change this line
    
    set the_files to (get files of this_folder)
    
    repeat with this_file in the_files
        log "this_file is " & this_file
        
        set the_name to name of this_file
        log "the_name is " & the_name
        -- problem line
        set minimumValue to my min(count of the_name, 8)
        log "minimumValue is " & minimumValue
        set the_short_name to items 1 thru minimumValue of the_name as string
        
        if exists folder the_short_name of this_folder then move this_file to folder the_short_name of this_folder
        
    end repeat
    
end tell

on min(x, y)
    if x ≤ y then
        return x
    else
        return y
    end if
end min

No, you don’t. Place that line inside:

ignoring application responses

end ignoring

(161750)