Hi there, Thank you so much for your application Kutools that is very useful for me. I need a VBA script that I did not find on your application. I need when I reply to an email with a Macro, a specific file on my pc attach to Reply Windows and I sent it ! I saw this code that can use just for create a new message with attached file : <pre class="line-numbers"><code class="language-markup">Sub </code></pre><pre class="line-numbers"><code class="language-markup">NewMessageWithAttachment()</code></pre> <pre class="line-numbers"><code class="language-markup">Dim</code></pre> <pre class="line-numbers"><code class="language-markup">oMsg </code></pre><pre class="line-numbers"><code class="language-markup">As</code></pre> <pre class="line-numbers"><code class="language-markup">Outlook.MailItem</code></pre> <pre class="line-numbers"><code class="language-markup">Set</code></pre> <pre class="line-numbers"><code class="language-markup">oMsg = Application.CreateItem(olMailItem)</code></pre> <pre class="line-numbers"><code class="language-markup">With</code></pre> <pre class="line-numbers"><code class="language-markup">oMsg</code></pre> <pre class="line-numbers"><code class="language-markup">.Attachments.Add </code></pre><pre class="line-numbers"><code class="language-markup">"C:Attachment.doc"</code></pre> <pre class="line-numbers"><code class="language-markup">.Display</code></pre> <pre class="line-numbers"><code class="language-markup">End</code></pre> <pre class="line-numbers"><code class="language-markup">With</code></pre> <pre class="line-numbers"><code class="language-markup">End</code></pre> <pre class="line-numbers"><code class="language-markup">Sub </code></pre> But I need this function when I reply an email. Best regards

جديد

إرفاق الملفات تلقائيًا في الرد باستخدام VBA outlook

كوتولس لتوقعات

عابدين 9400

الأربعاء، 22 أبريل 2020

1 الردود

5.5 ألف زيارة

الأصوات

فك

مرحبا هناك،

شكرًا جزيلاً على تطبيقك Kutools المفيد جدًا بالنسبة لي.
أحتاج إلى برنامج نصي لـ VBA لم أجده في التطبيق الخاص بك. أحتاج عندما أرد على رسالة بريد إلكتروني باستخدام ماكرو ، يتم إرفاق ملف معين على جهاز الكمبيوتر الخاص بي بـ Reply Windows وأرسلته!

رأيت هذا الرمز الذي يمكن استخدامه فقط لإنشاء رسالة جديدة بالملف المرفق:

Sub

NewMessageWithAttachment()

Dim

oMsg

As

Outlook.MailItem

Set

oMsg = Application.CreateItem(olMailItem)

With

oMsg

.Attachments.Add

"C:\Attachment.doc"

.Display

End

With

End

Sub

لكني أحتاج إلى هذه الوظيفة عندما أرد على بريد إلكتروني.
مع أطيب التحيات

لويس اتش

منذ سنوات 3

#2120

الأصوات

فك

هناك خدعة لإرفاق الملفات تلقائيًا في الرسائل الجديدة باستخدام ماكرو VBA في Microsoft Outlook. الخطوة 1: اضغط على مفاتيح Alt + F11 لفتح نافذة Microsoft Visual Basic for Applications. الخطوة 2: انقر فوق إدراج> وحدة. الخطوة 3: الصق الكود التالي في نافذة الوحدة الجديدة.

الصفحة:
1

لا توجد ردود لهذا المنصب حتى الآن.

يرجى تسجيل الدخول إلى مرحلة ما بعد الرد

ستحتاج إلى تسجيل الدخول لتتمكن من نشر الرد. تسجيل الدخول باستخدام النموذج على اليمين أو تسجيل حساب إذا كنت جديدا هنا. سجل هنا "