Applescript删除第1行中包含特定文本的Excel列

我需要一个applescript，用于删除excel中不包含第1行所需文本的任何列。下面是我的脚本，用于删除第1行中包含“REC_ID、F_STATUS或EVENT_ID”的列

set myValues to "REC_ID, F_STATUS, EVENT_ID"
tell application "Microsoft Excel"
set columnCount to (((count of columns of used range of active sheet)) + 1)
repeat with i from columnCount to 1 by -1
    set cellValue to value of cell ("1" & i)
    if cellValue is not in myValues then
        delete column i
    end if
end repeat
end tell

我不断收到此错误“Microsoft Excel出现错误：您试图访问的对象不存在”单元格“133”值中的编号-1728

谢谢你的帮助

我换了你的台词：

set cellValue to value of cell ("1" & i)

为此：

set cellValue to value of row 1 of column i

---

…这似乎解决了问题。

像冠军一样工作。谢谢