outlook-vba

    1

    1答えて

    Outlookの電子メールを抽出し、送信者の電子メールアドレスの一部(「@」の後で「.com」の前に)で名前を付ける必要があります。私のコードは正常に動作しますが、名前を変更する部分については、ファイルの一部が正しく割り当てられていない、特にスレッド内の電子メールが割り当てられています。私は過去2週間の解決策を探してみましたが、失敗しました。この問題に関して誰かが私を助けることができれば感謝します

    0

    1答えて

    ExcelでOutlookタスクを割り当てています。タスクのコピーを保存していないので、タスクが保存されず、とにかく送信したいかどうかを尋ねるアラートが表示されます。 私はSendkeysを使用しています(わかりました、それは良い方法ではありません)。それは私のコンピュータ上で動作していますが、私の同僚のコンピュータでは動作しません。 これらのアラートを無効にすることはできますか?ここで は私のコ

    0

    1答えて

    に.SentOnBehalfOfNameを実装すると、私はこのように私のコードを持っていた: Public WithEvents myItem As Outlook.MailItem Private Sub Application_ItemLoad(ByVal Item As Object) If Item.Class = olMail Then Set myItem = Item

    0

    1答えて

    私は、VBAについて何も知らない、私は一緒にルールを経由して名前を付けて保存メールに私を可能にする非常に簡単なマクロを置くことをどうにか: Sub sTXT(myMail As Outlook.MailItem) strname = myMail.Subject myMail.SaveAs "C:\Users\ss127w\Box Sync\maildump\" & strname & ".t

    0

    1答えて

    私はこのフォーラムの助けを借りてコードを使用して、ドロップダウンメニューからセントラルリポジトリから.oftメールテンプレートを選択しています。 Public Sub Email_Templates() With Select_Email_Template .Show If .Tag <> -1 Then CreateItemFromTemplate(T

    0

    1答えて

    以下のOutlook VBAでマクロを作成して、挨拶に追加された送信者のファーストネームを使用して本文にテキストを追加し、私が望むフォント。 私が助けが必要なのは、マクロが送信者の名前をすべて取得して、電子メールの本文のどこかに配置できる値を割り当てることです。それができないなら、私は挨拶にすべての名前を入れるだけで済むが、名前を動かすことができる方がはるかに好ましい。 例:; は現在、このマクロ

    0

    1答えて

    私はCCに、BCCなど、件名などのすべての詳細とマクロコードで作成された20+メールを持って、私はMSでドラフトとして保存これらのメールにしたいですそれらを送信する前にOutlook。 これは私のコードです: With OutMail .SentOnBehalfOfName = email_from .To = email_to .CC = email_cc

    1

    1答えて

    VSTO Outlook Addin(Visual Studioを使用)を作成して、あるフォルダから別のフォルダに電子メールをコピーした後、いくつかの条件に一致させました。 私はSub ThisAddIn_Startup()のコードをOutlookの起動時に実行を開始します。これにより、このアドイン機能を実行する前にOutlookアプリケーションを完全に開くことができなくなります。メインのOutl

    1

    2答えて

    ALL TITLES in ALL RSS FEEDSを比較して重複を削除する方法があるのだろうかと思います。 私はたくさんのフィードを読んでいます。多くの人が複数のフォーラムにクロスポストしてから、同じものを見ることになります。RSS複数回フィード。 すべての Option Explicit Public Sub DupeRSS() Dim olNs As Outlook.NameS

    0

    3答えて

    次の手順を使用して、固有のメールをダウンロードしようとしましたが、エラーが発生しました(91オブジェクト変数またはブロック変数が設定されていません) FindFirst "task =""" & Mailobject.UserProperties.Find("taskID") & """" Private Sub getml() Dim rst As DAO.Recordset Dim OlA