Outlook vbaの現在の行を選択

Question

Outlook vbaで関数を書きました。メールをクリックして機能を使用すると、返信メールを自動的に作成します。それは完了だ

こんにちはミスター

：

私の返信メールは次のようになります！

よろしく、

私はBDD管理者だから、私は、メールからタスクの多くを受けるので、私はそれだけで「それは完了だ」とのメールを送信するために使用。

時には、私は自分の返信を使って通常のメールに返信しますが、これにはどのような種類の仕事も含まれていません。だから、私は手作業で削除しなければならない "それは私の返信を書く前に私の返信メールから。

"SendKeys"機能を使用すると、私のカーソルは自動的に "完了しました"の行に置かれますが、自動的にこの行を選択しようとしています。もしこの行が既に選択されていれば、「完了しました」の代わりに何かを書かなければならないでしょう。

しかし、私は "vba outlookでテキストを選択"または "行を選択"または "文章を選択"と "行を選択"を探して、私は問題を解決するために何も明らかにした。どのように私はトリックを行うことができますか？

よろしくお願いいたします。

Answer 1

は、[OK]を私はこれを行う方法を見つける：あなたの注意のための

Dim objOL As Outlook.Application 
     Dim objNS As Outlook.NameSpace 
     Dim objDoc As Word.Document 
     Dim objSel As Word.Selection 

    Set objOL = Application 
     If objOL.ActiveInspector.EditorType = olEditorWord Then 
      Set objDoc = objOL.ActiveInspector.WordEditor 
      Set objNS = objOL.Session 

      Set objSel = objDoc.Windows(1).Selection 
      objSel.MoveEnd Unit:=wdLine, Count:=1 

     End If 
    Set objOL = Nothing 
    Set objNS = Nothing 

感謝を！