আউটলুক ক্যালেন্ডারের তালিকার ভিউতে সমস্ত জন্মদিন ইভেন্টের জন্য সংশ্লিষ্ট ব্যক্তিদের বয়সগুলি কীভাবে দেখানো যায়

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

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

তালিকা দৃশ্যে জন্মদিনের সমস্ত ইভেন্টের জন্য সংশ্লিষ্ট ব্যক্তিদের বয়স দেখান৷

1. একেবারে শুরুতে, Outlook VBA সম্পাদক চালু করুন।
2. তারপরে, নিম্নলিখিত কোডটি একটি মডিউলে অনুলিপি করুন।

Sub ShowAgesOfBirthdayEventsListView()
    Dim objStore As Outlook.Store
    Dim objOutlookFile As Outlook.Folder
    Dim objFolder As Outlook.Folder
 
    'Process All Calendar Folders in Your Outlook
    For Each objStore In Outlook.Application.Session.Stores
        Set objOutlookFile = objStore.GetRootFolder
        For Each objFolder In objOutlookFile.Folders
            If objFolder.DefaultItemType = olAppointmentItem Then
               Call ProcessFolders(objFolder)
            End If
        Next
    Next
End Sub

Sub ProcessFolders(ByVal objCalendar As Outlook.Folder)
    Dim i As Integer
    Dim objItem As Object
    Dim objBirthdayEvent As Outlook.AppointmentItem
    Dim dStart, dBirth As Date
    Dim nAge As Integer
    Dim objNewProperty As Outlook.UserProperty
    Dim objSubCalendar As Outlook.Folder

    For i = objCalendar.Items.Count To 1 Step -1
        Set objItem = objCalendar.Items.Item(i)
        'Add "Age" Property to Birthday Events
        If (objItem.MeetingStatus = olNonMeeting) And (objItem.IsRecurring = True) And (Right(objItem.Subject, 11) = "'s Birthday") Then
           Set objBirthdayEvent = objItem
           dStart = objBirthdayEvent.Start
 
           'Count Age
           dCurrentBirthday = DateSerial(Year(Now), Month(dStart), Day(dStart))
           nAge = DateDiff("yyyy", dStart, dCurrentBirthday)
 
           Set objNewProperty = objBirthdayEvent.UserProperties.Find("Age", True)
           If objNewProperty Is Nothing Then
              Set objNewProperty = objBirthdayEvent.UserProperties.Add("Age", olText, True)
           End If
 
           objNewProperty.value = nAge
           objBirthdayEvent.Save
        End If
    Next
 
    'Process All Sub-Calendar Folders Recursively
    If objCalendar.Folders.Count > 0 Then
       For Each objSubCalendar In objCalendar.Folders
           Call ProcessFolders(objSubCalendar)
       Next
    End If
End Sub

3. এর পরে, প্রথম সাবরুটিনে কার্সার রাখুন এবং এই ম্যাক্রোটি চালানোর জন্য "F5" টিপুন।
4. ম্যাক্রো শেষ হলে, VBA সম্পাদক থেকে প্রস্থান করুন এবং একটি ক্যালেন্ডার ফোল্ডার খুলুন।
5. পরবর্তীকালে, "দেখুন" ট্যাবে যান এবং "দর্শন পরিবর্তন করুন" > "তালিকা" এ ক্লিক করুন।
6. এরপরে, "সেটিংস দেখুন" বোতামটি ক্লিক করুন।
7. পপআপ ডায়ালগ বক্সে, "কলাম" নির্বাচন করুন।
8. তারপরে, “Show Columns”-এর পরবর্তী ডায়ালগ বক্সে, “Celeck available fields from from” তালিকা থেকে “ফোল্ডারে ব্যবহারকারী-সংজ্ঞায়িত ক্ষেত্র” নির্বাচন করুন।
9. পরে, "উপলব্ধ কলাম" বাক্সে "বয়স" এ পিচ করুন এবং "যোগ ->" বোতামে ক্লিক করুন।
10. অবশেষে, ক্যালেন্ডার আইটেম তালিকায় ফিরে না যাওয়া পর্যন্ত "ঠিক আছে" সিরিজে ক্লিক করুন।
11. এখন, তালিকায়, আপনি নিম্নলিখিত চিত্রে দেখানো সমস্ত জন্মদিনের ইভেন্টের ব্যক্তিদের বয়স দেখতে পারেন।

আপোস করা আউটলুক ফাইল ঠিক করুন

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

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

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