Numbersの選択したシート内のすべての表の空のセルの内容を0に

Numbersの選択したシート内のすべての表の空のセルの内容を0にするAppleScriptです。

tell application "Numbers"
tell front document
tell active sheet
repeat with j from 1 to (count every table)
tell table j
set aRes to value of cells
set aLen to length of aRes
set cList to cells
end tell
repeat with i from 1 to aLen
if (contents of item i of aRes) is missing value then
set anObj to contents of item i of cList
set value of anObj to 0
end if
end repeat
end repeat
end tell
end tell
end tell

更新履歴

inserted by FC2 system