電子メールを再送信または転送する場合、送信済みアイテムフォルダにコピーを保存したくない場合があります。 この記事では、OutlookVBAを使用してコピーを保存するかどうかを確認するようにOutlookを構成する方法について説明します。
実際には、ほとんどの一般的なメールについては、送信済みアイテムフォルダにコピーを保存するのが望ましいでしょう。しかし、メールを再送信したり転送したりする場合、あるいはメールに非常に大きな添付ファイルが付いている場合など、状況によってはコピーを保存する必要がないと考えるかもしれません。このような場合、Outlookがユーザーに選択肢を提示してくれることを期待するしかありません。
回避策：「保存しない」オプションを利用する
実際、Outlookにはこの機能はありません。 ただし、回避策を使用できます。 これは、メッセージウィンドウの「保存しない」オプションです。 次のスクリーンショットのように、[オプション]タブに切り替えて、[送信済みアイテムの保存先]ボタンをクリックするとアクセスできます。
このオプションに簡単にアクセスするには、クイックアクセスツールバーに追加します。 それを右クリックして、ポップアップメニューから「クイックアクセスツールバーに追加」を選択します。
今後は、コピーを保存したくない場合は、クイックアクセスツールバーの「保存しない」オプションの横にあるチェックボックスをオンにするだけで済みます。この方法は確かに便利ですが、多くのユーザーはチェックボックスをオンにするのを忘れがちだと不満を漏らしています。そのため、コピーを保存するかどうかを尋ねるOutlookのポップアッププロンプトを依然として求めています。これを実現するには、Outlook VBAを使用する必要があります。詳細なコードと手順については、以下をお読みください。
VBA：メールを送信するときにコピーを保存するかどうかを尋ねる
- まず、Outlookを起動し、[開発者]タブに移動します。
- 次に、「Visual Basic」ボタンをクリックすると、新しいウィンドウが表示されます。
- 「VisualBasic」ウィンドウで、「ThisOutlookSession」をダブルクリックして「ThisOutlookSession」プロジェクトウィンドウを開きます。
- 次に、次のコードをコピーして貼り付けます。
Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim strMsg As String
Dim nRes As Integer
strMsg = "Do you want to save a copy of this message?"
nRes = MsgBox(strMsg, vbYesNo + vbQuestion, "Confirm Saving Copy")
If nRes = vbNo Then
Item.DeleteAfterSubmit = True
End If
End Sub
- その後、通常どおりこのコードに署名し、マクロ設定を変更して、デジタル署名されたマクロのみを有効にする必要があります。
- 最終的には、試してみることができます。 「送信」ボタンをクリックすると、次の画像のようなOutlookアラートが表示されます。 「いいえ」ボタンを選択した場合、現在のメッセージは送信済みアイテムフォルダに保存されません。 「はい」ボタンを押すと、このメッセージは保存されます。
頻繁なOutlookの問題に対処する
他のアプリケーションと同様に、Outlookは、突然のクラッシュ、応答しない、ときどきエラーメッセージなど、さまざまな問題が発生する可能性があります。 したがって、Outlookを定期的に使用している場合は、 Outlookファイル修復ツール、のような DataNumen Outlook Repair いくつかの未知の理由でOutlookファイルが破損していることがわかったときに便利です。
著者紹介：
Shirley Zhangは、のデータ復旧の専門家です。 DataNumen、Inc。は、以下を含むデータ復旧技術の世界的リーダーです。 修理 SQL Server mdfデータベースの破損 と見通し修理ソフトウェア製品。 詳細については、次のWebサイトをご覧ください。 WWW。datanumen.com