ファイルを選択（拡張子を指定）.scpt

ダウンロード：chooses_by_an_extension.zip（5KB）

(*　

動作説明：

最も手前にあるFinderウインドウの中からダイアログで指定した拡張子のファイルのみを選択することができます

ダイアログには現在選択されているファイルの拡張子が自動入力されます

使い方：

このスクリプトをAppleScriptエディタ.appの書類ウインドウにコピー＆ペーストして「ユーザー・スクリプト・フォルダ」(~/Library/Scripts)に適当な名前を付けて保存してください。

メニューバーのスクリプトメニューから実行できます。

Takayuki Ueno

*)

tell application "Finder"

--activate

try

set objList to selection

set wCount to count of Finder window

if objList ≠ {} then --選択されたファイルがあるかどうかで条件分岐

set extName to name extension of item 1 of objList

--複数選択されたファイルの代表としてitem1の拡張子（name extension）を変数に格納する。

else

set extName to ""

end if

display dialog "選択したい" & return & "　ファイルの拡張子（.を含まない）" & return & "を入力して下さい。" default answer extName buttons {"キャンセル", "OK"} default button 2 with icon note

set ans to result --ダイアログの結果を変数に格納

set targetExt to text returned of ans

--ダイアログで入力されたテキスト（拡張子を示す文字列）を変数に格納

if wCount ≠ 0 then

set tergetList to (document files that name extension is targetExt) of Finder window 1

else

set tergetList to (document files that name extension is targetExt) in the desktop

end if

--指定した拡張子のファイルのリストを変数に格納

select tergetList

end try

end tell