-- Finder ウインドウの位置とサイズを整形 property x : 280 -- ウィンドウ左上の横位置 (X 座標) property y : 70 -- ウィンドウ左上の縦位置 (Y 座標 : 45 以下はメニューバーに埋まる) property w : 660 -- ウィンドウの横幅 property h : 540 -- ウィンドウの縦幅 tell application "Finder" try close (every window whose floating is true) if collapsed of the front window then error set theFldr to (target of the front window) as alias set the bounds of the container window of theFldr to {x, y, x + w, y + h} on error beep display dialog "対象の Finder ウインドウが無いっぽい。" buttons {"あらま"} default button 1 with icon caution end try end tell