আউটলুকের অন্য পরিচিতি ফোল্ডারে নতুন পরিচিতিগুলি কীভাবে স্বয়ংক্রিয়ভাবে সিঙ্ক করবেন

এখন শেয়ার:

কিছু ব্যবহারকারী চান যে নতুন পরিচিতিগুলি স্বয়ংক্রিয়ভাবে তাদের আউটলুকের দুই বা ততোধিক ফোল্ডারে যুক্ত করা যেতে পারে। সুতরাং, এই নিবন্ধটি অন্য পরিচিতি ফোল্ডারে নতুন পরিচিতিগুলি স্বয়ংক্রিয়ভাবে সিঙ্ক করার একটি উপায় ভাগ করবে৷

সম্ভবত আপনি আপনার Outlook-এ বেশ কয়েকটি ইমেল অ্যাকাউন্ট কনফিগার করেছেন। এবং তাদের প্রত্যেকের নিজস্ব পরিচিতি ফোল্ডার রয়েছে। এই ধরনের ক্ষেত্রে, আপনি যখন একটি ফোল্ডারে একটি পরিচিতি তৈরি করেন, তখন আপনি এটিকে অন্যান্য ইমেল অ্যাকাউন্টের পরিচিতি ফোল্ডারেও সিঙ্ক করতে চাইতে পারেন। কেন আউটলুক স্বয়ংক্রিয়ভাবে এটি সম্পন্ন করতে দেবেন না? এখানে আমরা আপনাকে শেখাব কিভাবে এটি উপলব্ধি করতে হয়।

আউটলুকের অন্য পরিচিতি ফোল্ডারে নতুন পরিচিতিগুলি স্বয়ংক্রিয়ভাবে সিঙ্ক করুন

অন্য পরিচিতি ফোল্ডারে নতুন পরিচিতি স্বয়ংক্রিয়ভাবে সিঙ্ক করুন

  1. খুব শুরুতেই, আপনাকে আপনার Outlook প্রোগ্রাম চালু করতে হবে।
  2. তারপরে, প্রধান আউটলুক উইন্ডোতে, শর্টকাট কী - "Alt + F11" টিপুন।
  3. এর পরে, আপনি "অ্যাপ্লিকেশনের জন্য মাইক্রোসফ্ট ভিজ্যুয়াল বেসিক" উইন্ডোতে প্রবেশ করবেন, যেখানে আপনাকে "ThisOutlookSession" প্রকল্পটি খুঁজে বের করতে হবে এবং খুলতে হবে।
  4. পরবর্তীকালে, নিম্নলিখিত VBA কোডটি অনুলিপি করুন এবং এটি প্রকল্পে পেস্ট করুন।
Public WithEvents objSourceFolder As Outlook.Folder
Public WithEvents objContacts As Outlook.Items

Private Sub Application_Startup()
    'Get the source Contacts folder
    Set objSourceFolder = Application.Session.GetDefaultFolder(olFolderContacts)
    Set objContacts = objSourceFolder.Items
End Sub

'Occurs when new item is added to the source folder
Private Sub objContacts_ItemAdd(ByVal Item As Object)
    Dim objContact As Outlook.ContactItem
    Dim objTargetFolder As Outlook.Folder
    Dim objCopiedContact As Outlook.ContactItem
 
    If TypeOf Item Is ContactItem Then
       Set objContact = Item
 
       'Specify the target Contacts folder
       '"Personal" refers to the displaying name of target Outlook file
       On Error Resume Next
       Set objTargetFolder = Application.Session.Folders("Personal").Folders("Contacts").Folders("From John Smith")
       If objTargetFolder Is Nothing Then
          Set objTargetFolder = Application.Session.Folders("Personal").Folders("Contacts").Folders.Add("From John Smith")
       End If
 
       'Copy the new contact
       Set objCopiedContact = objContact.Copy
       'Move copied contact to the target folder
       objCopiedContact.Move objTargetFolder
    End If
End Sub

VBA কোড - অন্য পরিচিতি ফোল্ডারে নতুন পরিচিতি স্বয়ংক্রিয়ভাবে সিঙ্ক করুন

  1. এর পরে, আপনাকে এই কোডটি স্বাক্ষর করতে হবে। টুলবারে শুধু "সরঞ্জাম" বোতামে ক্লিক করুন এবং তারপর "ডিজিটাল স্বাক্ষর" নির্বাচন করুন। পপআপ ডায়ালগ বক্সে, শুধু অনস্ক্রিন নির্দেশাবলী অনুসরণ করুন।
  2. পরে আপনি বর্তমান উইন্ডো থেকে প্রস্থান করতে পারেন এবং ডিজিটালভাবে স্বাক্ষরিত ম্যাক্রোগুলিকে অনুমতি দেওয়ার জন্য আপনার Outlook ম্যাক্রো সেটিংস পরিবর্তন করতে পারেন।
  3. সবশেষে, এই নতুন ম্যাক্রোটি সক্রিয় করতে আপনি আপনার Outlook পুনরায় চালু করতে পারেন।
  4. এখন থেকে যখনই সোর্স ফোল্ডারে কোনো নতুন কন্ট্যাক্ট যোগ করা হবে, তা স্বয়ংক্রিয়ভাবে পূর্বনির্ধারিত টার্গেট ফোল্ডারে সিঙ্ক হয়ে যাবে।

ঘন ঘন আউটলুক সমস্যা প্রতিক্রিয়া

যদি আপনি কয়েক দশক ধরে আউটলুক ব্যবহার করে থাকেন, তবে আপনি নিশ্চয়ই আউটলুক ফ্রিজ হয়ে যাওয়া, ঘন ঘন এরর মেসেজ আসা, PST ফাইল নষ্ট হয়ে যাওয়া ইত্যাদি নানা সমস্যার সম্মুখীন হয়েছেন। সাধারণত, আপনি সেফ মোডে আউটলুক রিস্টার্ট করে, নতুন আউটলুক প্রোফাইল তৈরি করে, ত্রুটিপূর্ণ অ্যাড-ইনগুলো নিষ্ক্রিয় করে ইত্যাদি উপায়ে এই সমস্যাগুলো সমাধান করার চেষ্টা করতে পারেন। অবশ্যই, আপনি একটি শক্তিশালী রিপেয়ার টুলের সাহায্যও নিতে পারেন, যেমন... DataNumen Outlook Repair। এটা হতে পারে পিএসটি ঠিক করুন একটি কর্ক মত ত্রুটি.

লেখকের ভূমিকা:

শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় মেরামত এমডিএফ এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com

এখন শেয়ার:

মন্তব্যসমূহ বন্ধ করা হয়.