>>486

>>482の真ん中へんにある以下の部分をちょっと書き換えれば縦書き画面で動きそうです
set buttonPos to position of pop up button 1 of scroll area 1 of window 1

↓

set buttonPos to position of pop up button 1 of window 1