Hello
This short script may be useful. It build a list of pictures and tables.
It's easy to adjust it to fit your needs.
Run it once
paste the clipboard where you want to insert section1's list of tables and list of images.
Delete what is related to other sections.
Edit the two lists to fit your taste.
Run the script again.
Repeat the described process to insert lists related to section2
…
on run
tell application "Pages" to tell document 1
set ns to count of sections
set mesTables to {}
set imgCnt to 0
set tblCnt to 0
repeat with s from 1 to ns
tell section s
--set imgCnt to 0
--set tblCnt to 0
copy "Section #" & s & return to end of mesTables
set np to count of pages
repeat with p from 1 to np
tell page p
set nbt to count of tables
set nbi to count of images
end tell -- pages
if (nbt + nbi) > 0 then
copy tab & "Page #" & p & return to end of mesTables
if nbt > 0 then
repeat with i from 1 to nbt
set tblCnt to tblCnt + 1
copy tab & tab & "Table #" & tblCnt to end of mesTables
end repeat
end if -- nbt > 0
if nbi > 0 then
repeat with i from 1 to nbi
set imgCnt to imgCnt + 1
copy tab & tab & "Image #" & imgCnt to end of mesTables
end repeat
copy "" to end of mesTables
end if -- nbi > 0
set nbt to 0
set nbi to 0
copy "" to end of mesTables
end if
end repeat
end tell -- sections
end repeat
end tell
set mesTables to my recolle(mesTables, return)
set the clipboard to mesTables
end run
on recolle(l, d)
local t
set AppleScript's text item delimiters to d
set t to l as text
set AppleScript's text item delimiters to ""
return t
end recolle
Yvan KOENIG (from FRANCE jeudi 7 mai 2009 17:27:48)
