set aFile to (path to desktop as text) & "erreur Numbers.rtf" as alias
tell application "Finder"
open information window of aFile
end tell
set theOpener to "TextWrangler.app"
tell application "System Events" to tell process "Finder"
tell first window to tell first scroll area
set popUp to first pop up button
click popUp
set theMenuItems to name of menu items of menu 1 of popUp
repeat with anItem in theMenuItems
if anItem starts with theOpener then
click menu item anItem of menu 1 of popUp
exit repeat
end if
end repeat
end tell
end tell
Yvan KOENIG running Yosemite 10.10.5 in French (VALLAURIS, France) dimanche 30 août 2015 16:38:58