Delete some cells numbers with Applescript

Hi Karelias,

I do not understand your question.

Karelias wrote:

In Numbers I create three tables (TableOne, TableTwo, TableThree). Each table has 16 row and 3 colomns.

Like this?

Columns are A, B, C

How can I delete the follow cells with Applescript:

TableOne: B2, C2, E1, E3, H2, J1

TableTwo: A1, A2, A3, B1, B2, J2, L1, M2

TableThree: D1, D3, F3, H1, M1, M2

Columns D, E, F etc. do not exist.

Please reply with more information so that we can help you.

Regards,

Ian.

You can try something like the script below. It assumes the tables contain the cells you list. Change the table names and cells in the first line as needed. Be sure to keep the { and } and the ".

SG

set tblCells to {{"TableOne", {"B2", "C2", "E1", "E3", "H2", "J1"}}, {"TableTwo", {"A1", "A2", "A3", "B1", "B2", "J2", "L1", "M2"}}, {"TableThree", {"D1", "F3", "H1", "M1", "M2"}}}

repeat with i in tblCells

repeat with c in i's item 2's items

deleteCellContents(i'sitem 1 as text, c as text)

end repeat

end repeat

to deleteCellContents(tblName, cellName)

tell application "Numbers"

set t to front document's active sheet's table tblName

set t'sselection range to t'scellcellName

activate

tell application "System Events" to key code 51 using command down

end tell

end deleteCellContents

SGIII,

I tried this an could never actually set the value of the cell. I find your knowledge of AppleScript very helpful. Generally, to me, Applescripts misses the clarity of other languages, in that, to extend from one thing to the next, it is far less than intuitive.

I do not understand how to address a specific cell. you cleared the value by "typing" the delete key. can you also demonstrate setting the value of the cell to empty string?

Answering Wayne's question about setting a cell to blank (which preserves formatting) rather than 'deleting' it (which removes formatting and value), if you just want to clear the current value in the cell the script could be as below.

SG

set tblCells to {{"TableOne", {"B2", "C2", "E1", "E3", "H2", "J1"}}, {"TableTwo", {"A1", "A2", "A3", "B1", "B2", "J2", "L1", "M2"}}, {"TableThree", {"D1", "F3", "H1", "M1", "M2"}}}

repeat with i in tblCells

repeat with c in i's item 2's items

deleteCellContents(i'sitem 1 as text, c as text)

end repeat

end repeat

to deleteCellContents(tblName, cellName)

tell application "Numbers"

set t to front document's active sheet's table tblName

set t'scellcellName'svalue to missing value

end tell

end deleteCellContents

Karelias wrote:

is it possible to position the cell in "Start with Blank" (which preserves the list)?

Yes, it's possible, indirectly. But that's a different question from this thread, which you've marked solved.

SG

Karelias wrote:

is it possible to position the cell in "Start with Blank" (which preserves the list)?

I haven't found a way to directly control Pop-Pp Menu in AppleScript. But it is possible to set up a Pop-Up Menu in a one-cell table, set to the blank in the Start with Blank and have AppleScript copy-paste that into cells where you want to reset the menu at blank. Here is a simple example that resets the Pop-Up Menu in cells I3 and J3 of a table named 'TableOne'. The one-cell table containing the Pop-Up Menu is named 'MenuCell'.

SG

set menuCell to {"MenuCell", "A1"}

set tblCells to {{"TableOne", {"I3", "J3"}}}

repeat with i in tblCells

repeat with c in i's item 2's items

copyPaste("MenuCell", "A1", "c")

copyPaste(i's item 1 as text, c as text, "v")

end repeat

end repeat

to copyPaste(tblName, cellName, typekey)

tell application "Numbers"

set t to front document's active sheet's table tblName

set t'sselection range to t'scellcellName

activate

tell application "System Events" to keystroke typekey using {command down}

end tell

end copyPaste

Or perhaps you mean this 😉

Regards,

Ian.

Thanks, SG.

I had that question, too.

Barry

Hi Karelias,

You marked my reply as solved. All I did was ask you to clarify. You have two "Helpfuls" (gold stars). Please award them to SGIII, the real solver of the problem!

Regards,

Ian.

What exactly are you trying to accomplish?

SG