Guest
2013-05-11, 08:45 AM
You might, of course, want to exclude the note from this, as in:
Code:
tell application id "OOut"
tell front document
-- WHICH OF THE COLUMNS ARE RICH TEXT ?
set lstColID to id of columns where its type = rich text
-- EXCLUDE THE NOTE ?
set strNoteID to id of note column
-- WITH SELECTED ROWS, FOR EXAMPLE
repeat with oRow in selected rows
repeat with strColID in lstColID
-- UNLESS THIS IS THE NOTE, RESET THE TEXT OBJECT
if (contents of strColID) ≠ strNoteID then ¬
tell cell id strColID of oRow to set value to value as string
end repeat
end repeat
end tell
end tell
Last edited by RobTrew; 2013-05-11 at 10:24 AM..