Thank you, guys.
@gglick, using “For each” really seems like the most elegant way to do it with KBM’s building blocks.
And @ccstone, thanks for the pointer to Satimage.osax. I had never heard of it, nor am I experienced in AppleScript. But I’ll have a look at it. Doing such a task in four lines - that does sound elegant indeed.