Subプロシージャは、Outlook 2013でスクリプトの宛先としてRSS投稿（引数としてPostItemオブジェクトを提供する）を処理できますか？

Question

（ウィン8.1上で実行している）

究極の目標は、この質問への答えです：展望2013年にVBAを使用して

、どのように私は含まれるキーワードの着信RSS記事を調べることができますか？

---

詳細これまでのところ：このページを1として

：http://www.slipstick.com/outlook/rules/outlooks-rules-and-alerts-run-a-script/（初期見積もり後の最初の段落）、PostItem引数を処理するには、Outlook 2013でVBAスクリプトを持つことが可能です。

RSSは

Public Sub ScanRSSPost(Item As Outlook.PostItem) 
    ... 
End Sub 

のように、PostItem引数を提供フィードただし、ルールウィザードは、この手順は表示されません。期待通りに入ってくると

Sub AddMailToOPQueue(oMail As Outlook.MailItem) 
    ... 
End Sub 

のようにMailItem引数を持つ

その他の手続き処理メールは、ウィザードや仕事で選択可能なスクリプトとして表示されます。

女性は単に間違っていますか、私は気づいていない設定を見落としていますか？

Answer 1

Application.NewMailExは新しいメッセージを処理する方法で受信RSSアイテムを処理できませんが、特定のRSSフィードに対応するフォルダではItems.ItemAddイベントを引き続き使用できます。

Answer 2

私は、引用されたポストの主張は単に機能しないことがわかりました。

あなたは同じ質問がある場合は、ここでは回避策は次のとおりです。

（1）Outlookで、新しいルールを作成：任意のフィード（または興味のある特定の1つを）受けて、それを転送あなたのメールアドレス（私は物事をきれいにして整理しておくために専用のものを作った）に、さらにルールを処理しないでください。受信メールアドレスで

（2）、このようなスクリプトを呼び出す新しいルールの作成：空白のvbCrLf、空白：ルーチンで

Sub AddMailToOPQueue(oMail As Outlook.MailItem) 
    ... 
End Sub 

を、転送のRSS投稿のoMail.Bodyプロパティが始まります、のvbCrLf、「フィード：」、そう疑問にフィードを抽出するために、あなたは同様のものを使用することができます。

If Left(sBody, 12) = " " & vbCrLf & " " & vbCrLf & "Feed: " Then 
     sFrom = Mid(sBody, 13) 
     sFrom = Left(sFrom, InStr(sFrom, vbCrLf) - 1) 

     'sFrom has the feed name now. The post's subject is in oMail.Subject. 
     ... 
    End If 

（3）Outlookでは、スクリプト上で実行するアイテムを受け取るには、受取人のための別のルールを作成し、これはウィザードで選択できます。