ٹپ: دوسری زبانیں Google-Translated ہیں. آپ ملاحظہ کر سکتے ہیں English اس لنک کا ورژن.
لاگ ان کریں
x
or
x
x
رجسٹر
x

or

فائل کے نظام سے آؤٹ لک فولڈر میں پیغام فائلوں کو کس طرح درآمد کرنا ہے؟

عام طور پر، آپ فائلوں کو فائل سسٹم سے آؤٹ لک فولڈر میں ڈرائنگ اور گر کرکے پیغام درآمد کرسکتے ہیں. اس آرٹیکل میں ہم آپ کو ایک فائل سسٹم سے تمام مخصوص فائلوں کو تفصیلات میں مخصوص آؤٹ لک فولڈر میں درآمد کرنے کے لئے ایک آسان طریقہ دکھائے جا رہے ہیں.

VBA کوڈ کے ساتھ فائل کے نظام سے آؤٹ لک فولڈر میں فائلوں کو پیغام بھیجیں


آؤٹ لک میں مختلف ای میل فائلوں کے طور پر منتخب ای میلز آسانی سے محفوظ کریں:

اسکرین شاٹ کے طور پر محفوظ کریں کے طور پر Outlook کے لئے کوبل کے فائل کی افادیت کے طور پر، آپ آسانی سے متعدد منتخب کردہ ای میلز کو انفرادی ایچ ٹی ایم ایل فارمیٹ فائل، TXT فارمیٹ فائل، ورڈ دستاویز، CSV فائل کے ساتھ ساتھ آؤٹ لک میں پی ڈی ایف فائل کو محفوظ کرسکتے ہیں.

آؤٹ لک کے لئے Kutools: 40 سے زیادہ آؤٹ لک آؤٹ لک اضافی سے زیادہ کے ساتھ، 45 دنوں میں کوئی حدود کے ساتھ کوشش کرنے کے لئے آزاد. ڈاؤن لوڈ اور مفت آزمائشی اب!


VBA کوڈ کے ساتھ فائل کے نظام سے آؤٹ لک فولڈر میں فائلوں کو پیغام بھیجیں

براہ مہربانی آؤٹ لک میں ایک مخصوص فولڈر میں فائل سسٹم سے پیغام فائلوں کو درآمد کرنے کے لئے ذیل میں کریں.

1. دبائیں آلٹ + F11 کلیدوں کو کھولنے کے لئے مائیکروسافٹ بصری بنیادی کے لئے درخواستیں کھڑکی.

2. میں مائیکروسافٹ بصری بنیادی کے لئے درخواستیں ونڈو کی، مظاہرہ داخل > ماڈیول. پھر ماڈیول ونڈو میں VBA کوڈ کے نیچے کاپی کریں.

VBA کوڈ: فائل کے نظام سے آؤٹ لک فولڈر میں درآمد پیغام فائلیں درآمد کریں

ذیلی ImportMessagesInFolder () ڈیم XFSO سکرپٹ کے طور پر. FileSystemObject ڈیم xSourceFld اسکرپٹنگ کے طور پر. فولڈر ڈیم xSourceFldPath کے طور پر سٹرنگ ڈیم XFileItem سکرپٹ کے طور پر. فائل ڈیم XMSG کے طور پر Object Dim xMailItem کے طور پر MailItem ڈیم XSaveFld آؤٹ لک. فولڈر کے طور پر خرابی پر دوبارہ شروع کریں XFSO = نیا سکرپٹ. FileSystemObject سیٹ XSelFolder = CreateObject ("Shell.Application"). براؤزرForFolder (0، "ایک فولڈر منتخب کریں:"، 0، 0) اگر ٹائپ نام (XSelFolder) = "کچھ نہیں" تو پھر XSourceFldPath = xSelFolder.self.Path + "\" ایل ایس ایکس ایسورسفڈ پیڈ = "" باہر نکلیں ذیلی اختتام اگر سیٹ xSourceFld = xFSO.GetFolder (XSourceFldPath) سیٹ کریں XSaveFld = GetObject (""، "Outlook.Application"). GetNamespace ("MAPI"). PickFolder اگر TypeName (XSaveFld) = "کچھ بھی نہیں" پھر باہر نکلیں ذیلی اختتام ہر XFileItem کے لئے XSourceFld.Files میں xMSG = سیشن. OpenSharedItem (xFileItem.Path) مقرر کریں XMailItem = xMSG سیٹ کریں xMailItem.Move XSaveFld سیٹ XMailItem = کچھ xMSG.Delete xMSG = کچھ بھی نہیں XFileItem سیٹ xFileItem = کچھ بھی نہیں سیٹ کریں XSourceFld = کچھ بھی سیٹ XFSO = N اوٹ آؤٹ اختتام

3. دبائیں F5 کوڈ چلانے کی کلید. آغاز میں فولڈر کے لئے براؤز کریں ڈائیلاگ باکس، اس فولڈر کو منتخب کریں جس میں آپ آؤٹ لک فولڈر میں درآمد کریں گے، اور پھر کلک کریں OK بٹن. اسکرین شاٹ دیکھیں:

4. اب ایک فولڈر منتخب کریں ڈائیلاگ کا باکس پاپ اپ، براہ کرم ایک منتخب کریں آؤٹ لک درآمد شدہ فائلوں کو محفوظ کرنے کیلئے فولڈر، اور کلک کریں OK بٹن.

پھر آپ کے فائل سسٹم میں کسی مخصوص فولڈر میں تمام پیغام فائلوں کو فوری طور پر ایک مخصوص Outlook فولڈر میں درآمد کیا جاتا ہے.


متعلقہ مضامین:


ایکسل پروڈکٹیوٹیئٹی ٹولز

ایکسل کے ربن (ایکسل انسٹال کے لئے کوٹول کے ساتھ)

300 + اعلی درجے کی خصوصیات 70٪ کی طرف سے آپ کی پیداوری میں اضافہ، اور آپ بھیڑ سے باہر کھڑے ہونے میں مدد!

کیا آپ اپنے روزانہ کام کو جلدی اور مکمل طور پر مکمل کرنا پسند کریں گے؟ ایکسل کے لئے Kutools لاتا ہے 300 + ڈاؤن لوڈ، اتارنا اور طاقتور اعلی درجے کی خصوصیات (کام کے کتابوں کو جمع، رنگ کی طرف سے رقم، تقسیم سیل مواد، تاریخ تبدیل، اور اسی طرح ...) کے لئے 1500 + کام کے منظر نامہآپ کو حل کرنے میں مدد ملتی ہے 80٪ ایکسل کے مسائل.

  • سیکنڈ میں تمام پیچیدہ کاموں کے ساتھ معاملہ، آپ کے کام کی صلاحیت کو بڑھانے میں مدد، زبردست مقابلہ سے کامیابی حاصل کریں، اور کبھی بھی دھماکہ نہ ہونے کے بارے میں فکر کریں.
  • بہت سارے کام کا وقت بچائیں، آپ کو خاندان سے پیار کرنے اور دیکھ بھال کرنے کے لئے بہت وقت لگے اور ابھی آرام دہ زندگی سے لطف اندوز ہو.
  • ہر روز ہزار کی بورڈ اور ماؤس کلکس کو کم کریں، اپنے تھکے ہوئے آنکھوں اور ہاتھوں سے دور رہیں، اور آپ کو ایک صحت مند جسم دے.
  • 3 منٹ میں ایکسل ماہر بنیں، اور اپنے ساتھیوں یا دوستوں سے نظر آتے ہیں.
  • اب کوئی دردناک فارمولہ اور VBA کوڈ کو یاد کرنے کی ضرورت نہیں ہے، ایک آرام دہ اور خوشگوار دماغ ہے، آپ کو ایک ایسی ایسی مثال دیتے ہیں جو آپ نے پہلے کبھی نہیں تھا.
  • صرف $ 39 خرچ کرو، لیکن دوسروں کے $ 4000 تربیت کے مقابلے میں. 110,000 ایلائٹس اور 300 + معروف کمپنیوں کی طرف سے استعمال کیا جا رہا ہے.
  • 60 دن لامحدود مفت آزمائشی. 60 دن پیسے کی واپسی کی ضمانت. 2 سال کے لئے مفت اپ گریڈ اور سپورٹ. ایک بار خریدیں، ہمیشہ کے لئے استعمال کریں.
  • جس طریقے سے آپ کام کرتے ہو اس کو تبدیل کریں، اور آپ کو فوری طور پر ایک بہتر زندگی دیں!

دفتری ٹیب آفس کو موثر اور آسان ٹیبز (ایکسل میں شامل)، جیسے جیسے کروم، فائر فاکس، اور نیا آئی ای

  • جب ایک سے زیادہ دستاویزات کو دیکھنے اور ان میں ترمیم کرتے ہیں تو 50٪ کی طرف سے اپنی پیداوری کو بڑھا دیتا ہے.
  • ماؤس کے ہاتھ سے الوداع کہو، ہر روز آپ کے لئے سینکڑوں ماؤس کلکس کو کم کرنا.
  • نئی کھڑکیوں کے بجائے، اسی ونڈو کے نئے ٹیب میں دستاویزات کھولیں اور بنائیں.
  • آپ کو تیزی سے کام کرنے میں مدد ملے گی اور آسانی سے بھیڑ سے باہر کھڑے ہو جاؤ! ایک دوسرے دوسرا درجنوں کھلی دستاویزات کے درمیان سوئچ کرنے کے لئے!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Amey Thombre · 11 months ago
    This is amazing and just does what i was looking for. just make sure that you have Microsoft System Runtime library selected in the references of the VBA project as Scripting object is from that library.