কেবলমাত্র একটি নির্দিষ্ট ফোল্ডারে ইমেল ফরোয়ার্ড করা


2

আমি সুপার ইউজারের একটি পোস্ট জুড়ে দৌড়েছি যা আউটলুক ইমেল ফরোয়ার্ডিং সম্পর্কে একটি প্রশ্ন সম্বোধন করেছে। একজন ব্যবহারকারী ব্যবহারের জন্য একটি স্ক্রিপ্ট সরবরাহ করেছিলেন।

Sub AutoForwardAllSentItems(Item As Outlook.MailItem)
Dim strMsg As String
Dim myFwd As Outlook.MailItem

Set myFwd = Item.Forward

myFwd.Recipients.Add "email@email.com"
myFwd.Send
Set myFwd = Nothing 
End Sub

এটি আমার পক্ষে ভাল কাজ করেছে, তবে আমি যদি কেবলমাত্র একটি নির্দিষ্ট ফোল্ডারে কেবল স্বয়ংক্রিয়ভাবে ইমেল ফরোয়ার্ড করতে চাই তবে কীভাবে এটি কাজ করবে? ফোল্ডারে ইতিমধ্যে প্রাপ্তির পরে এটিতে ইমেল অটো নির্দেশিত রয়েছে। কোন ধারনা?


@ ডেভম পরের বারের বিন্যাসটি দেখুন।
slhck

উত্তর:


0

ধরে নিই যে আপনি কোনও নিয়ম ব্যবহার করে ইমেলটি ফোল্ডারে পুনর্নির্দেশ করছেন, আপনি একই স্ক্রিপ্টটিতে এই স্ক্রিপ্টটি চালাতে পারেন, সুতরাং এটি কেবল একই শর্তে প্রযোজ্য হবে।

অন্যথায় বর্তমান ফোল্ডারে অপঠিত বার্তাগুলি সন্ধান করতে এবং সেগুলি ফরোয়ার্ড করতে ম্যাক্রোর পরিবর্তন করা যেতে পারে। তারপরে আপনি সেই ফোল্ডারে নিয়মিতভাবে ম্যাক্রোটি ম্যাক্রো (এটিকে সহজ করার জন্য একটি শর্টকাট দিন) চালিয়ে যাবেন এবং এটি আপনার জন্য অগ্রণীগুলি করবে।

Sub ForwardUnreadInFolder()
  Dim CurItem As Outlook.MailItem
  Dim myFwd As Outlook.MailItem
  Dim strMsg As String

  Set CurFolder = Application.ActiveExplorer.CurrentFolder
  Set AllItems = CurFolder.Items
  NumItems = CurFolder.Items.Count

  For i = 1 To NumItems

    DoEvents

    Set CurItem = AllItems.Item(i)

    If (CurItem.UnRead) Then

        Set myFwd = CurItem.Forward
        myFwd.Recipients.Add "email@example.com"
        myFwd.Send
        Set myFwd = Nothing

    End If

  Next

   MsgBox "Done"
End Sub

1
ধন্যবাদ। হ্যাঁ আমি প্রথমে অন্য ফোল্ডারে অনুলিপিটি চেষ্টা করেছিলাম তবে স্ক্রিপ্টের জন্য পৃথক নিয়মটি বুঝতে পেরেছিল যে সমস্ত এমএসএজে প্রথমে ফরওয়ার্ড করা হয়েছে। । তারপর অনুলিপি করা। সুতরাং আমি ইমেলগুলির একটি অনুলিপি একটি ফোল্ডারে স্থানান্তরিত করার নিয়মটি পরিবর্তন করেছিলাম এবং তার পরেও নিয়মটি স্ক্রিপ্টটি চালিত করে। । তবে এটি ফোল্ডারে কোনও স্থানান্তরিত করার আগে প্রতিটি ইমেলকে অটো ফরওয়ার্ড করতে থাকে। নতুন ফোল্ডারে থাকা সমস্ত ইমেল অপঠিত এবং ফরোয়ার্ড না হিসাবে প্রদর্শিত হয়। আশা করছিলাম ম্যাক্রো বা অন্যটি ম্যানুয়ালি চালিত না করে এটি স্বয়ংক্রিয় করা যেতে পারে, যেহেতু আমি কম্পিউটারে না থাকলে কিছুই এগিয়ে যায় না। উত্তর দেওয়ার জন্য আপনাকে ধন্যবাদ।
আয়ান
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.