次の方法で共有


Actions.Add メソッド (Outlook)

Actions コレクションに新しいアクションを作成します。

構文

追加

: Actions オブジェクトを表す変数。

戻り値

新しいアクションを表す Action オブジェクト。

この VBA の例は、新しいメール メッセージを作成し、 アクション を追加する Add メソッドを使用します。 エラーを発生させずにこの例を実行するには、受信者の名前で ' Dan Wilson' を置き換えます。

Sub AddAction() 
 
 Dim myItem As Outlook.MailItem 
 
 Dim myAction As Outlook.Action 
 
 
 
 Set myItem = Application.CreateItem(olMailItem) 
 
 Set myAction = myItem.Actions.Add 
 
 myAction.Name = "Link Original" 
 
 myAction.ShowOn = olMenuAndToolbar 
 
 myAction.ReplyStyle = olLinkOriginalItem 
 
 myItem.To = "Dan Wilson" 
 
 myItem.Send 
 
End Sub

関連項目

Actions オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。