Catalina以降のIllustratorやPhotoshopなどで、ファイル名だけを選択状態にするAppleScript

実行方法はいろいろあるのでお好きに。

Keyboard Maestroで実行する方が素直に動作します。
保存ダイアログ（シート、従来）のファイル名フィールドを選択後、SHIFTキーとカーソルキーを使って拡張子以外を選択させているので、AppleScriptのみで実行すると発火のためのキーにSHIFTが含まれている場合、モデファイキーをすぐ離さないと誤作動します。
Keyboard Maestroで実行すれば、押しているキーを無視してマクロ実行してくれるので、発火キーにSHIFT等含まれていても問題なし。

Keyboard Maestroのマクロは以下。

AppleScript部分のコードは以下。

tell application "System Events"
    set a to name of first application process whose frontmost is true
    tell window 1 of process a
        try
            set b to text field 1
        on error
            try
                set b to text field 1 of sheet 1
            on error
                return false
            end try
        end try
        set focused of b to true
        set c to value of b
        set d to offset in (reverse of characters of c as text) of "."
        return d
    end tell
end tell

Save to Variableで戻り値を変数に格納し、以降のマクロで使っています。
※捨て変数としてVariableという名前のものを使っているのでややこしいけど…

AppleScriptのみで実行する場合は以下。

tell application "System Events"
    set a to name of first application process whose frontmost is true
    tell window 1 of process a
        try
            set b to text field 1
        on error
            try
                set b to text field 1 of sheet 1
            on error
                return false
            end try
        end try
        set focused of b to true
        set c to value of b
        set d to offset in (reverse of characters of c as text) of "."
        key code 125
        repeat d times
            key code 123
        end repeat
        delay 0.1
        key code 126 using {shift down}
        return d
    end tell
end tell