■ スクリプトからマクロを実行

Set macro = macroParser.parse("@If(@Seen(),'Seen','Unseen')")
Set account = document.accounts.item("test")
Set folder = account.folders.item("Inbox")
Set mh = folder.messages.item(0)
value = macro.evaluate(mh, account)
MsgBox value