email - テキストの削除、Applescript

Question

そこで、メールの送信者をコピーして Numbers 書類に貼り付けるスクリプトを作成しました。コピーしたアドレスには 2 つの異なるメールがリストされており、そのうちの 1 つを削除する必要があります。

      tell application "Mail"
	set theSenderList to {}
	set theMessages to the selected messages of message viewer 0
	repeat with aMessage in theMessages
		set end of theSenderList to {address of to recipients of aMessage, " OR"}
	end repeat
	set AppleScript's text item delimiters to " "
	set the clipboard to (theSenderList as string)
	set AppleScript's text item delimiters to ""
    beep
end tell

tell application "Numbers" to tell document 1 to tell sheet 1 to tell table 1
	set value of cell "a1" to (the clipboard as text)
end tell

tell application "Numbers" to tell document 1 to tell sheet 1 to tell table 1
	set value of cell "b1" to current date
end tell