–指定のAutomator Workflowのファイルを実行する
on executeAutomatorWorkflow(aWorkflow)
　　set aShell to “/usr/bin/automator “ & (quoted form of POSIX path of aWorkflow)
　　with timeout of 3600 seconds
　　　　try
　　　　　　set aRes to (do shell script aShell)
　　　　on error errorMes
　　　　　　return errorMes
　　　　end try
　　end timeout
　　
　　return aRes
end executeAutomatorWorkflow

▼新規書類に　▼カーソル位置に　▼ドキュメント末尾に

–指定のAutomator Workflowのファイルを実行する
on executeAutomatorWorkflow(aWorkflow)
　　try
　　　　with timeout of 3600 seconds
　　　　　　using terms from application “Automator“
　　　　　　　　tell application “Automator“
　　　　　　　　　　close every workflow saving no
　　　　　　　　　　open aWorkflow
　　　　　　　　　　tell workflow 1
　　　　　　　　　　　　execute
　　　　　　　　　　end tell
　　　　　　　　end tell
　　　　　　end using terms from
　　　　end timeout
　　on error
　　　　display dialog “Automator Workflow実行時にエラーが発生しました” buttons {”OK“} default button 1 with icon caution
　　end try
end executeAutomatorWorkflow

▼新規書類に　▼カーソル位置に　▼ドキュメント末尾に

set a_ref to a reference to a

set aList to {}
set aList_ref to a reference to aList

set bList to {}
set bList_ref to a reference to bList

repeat with i in a_ref
　　repeat with j in i
　　　　set aGenle to contents of j
　　　　if aGenle is not in aList_ref then
　　　　　　set the end of aList to aGenle
　　　　　　set the end of bList to 1
　　　　else
　　　　　　repeat with k from 1 to length of bList_ref
　　　　　　　　if contents of item k of aList = aGenle then
　　　　　　　　　　exit repeat
　　　　　　　　end if
　　　　　　end repeat
　　　　　　
　　　　　　set item k of bList_ref to (item k of bList_ref) + 1
　　　　end if
　　end repeat
end repeat

set eList to {}
repeat with i from 1 to (length of aList)
　　set the end of eList to {item i of aList_ref, item i of bList_ref}
end repeat

eList

▼新規書類に　▼カーソル位置に　▼ドキュメント末尾に