আপনার আউটলুক সভার ট্র্যাকিং তালিকা মুদ্রণের জন্য 3 টি দ্রুত পদ্ধতি

এখন শেয়ার:

সভার আমন্ত্রণ প্রেরণের পরে, আপনি মিটিংয়ের "ট্র্যাকিং" পৃষ্ঠায় প্রাপকদের 'মিটিং প্রতিক্রিয়াগুলি পরীক্ষা করতে পারেন। আপনি যদি ট্র্যাকিং তালিকাটি মুদ্রণ করতে চান তবে আপনি এই নিবন্ধে প্রবর্তিত 3 টি পদ্ধতি ব্যবহার করতে পারেন।

আউটলুক সভাগুলির জন্য ব্যবহারকারীদের "ট্র্যাকিং" বৈশিষ্ট্য সরবরাহ করে। এটি সমস্ত সভায় অংশগ্রহণকারীদের সমস্ত প্রতিক্রিয়া তালিকাভুক্ত করবে। এইভাবে, আপনি যদি এই ব্যবস্থাটি গ্রহণের ব্যবস্থা করেন এবং কারা প্রত্যাখ্যান করেন তা যদি আপনি পরীক্ষা করে দেখার আশা করেন তবে আপনি স্রেফ ট্র্যাকিং তালিকার অ্যাক্সেস পেতে পারেন। তবে তালিকাটি মুদ্রণের জন্য সরাসরি কোনও কার্যকারিতা নেই। এর মাধ্যমে, এখানে দ্রুত প্রিন্ট করার জন্য আমরা আপনাকে 3 উপায়টি ভাগ করব।

সভায় ট্র্যাকিং

পদ্ধতি 1: স্ক্রিনশট "ট্র্যাকিং" মুদ্রণ করুন

  1. শুরু করতে, সভাটি "ট্র্যাকিং" পৃষ্ঠাটি খুলুন।
  2. এর পরে, একটি নতুন ইমেল তৈরি করুন।
  3. এর পরে, "সন্নিবেশ" ট্যাবে শিফট করুন এবং "স্ক্রিনশট" বোতামটি ক্লিক করুন।
  4. পরে, "উপলভ্য উইন্ডোজ" তালিকা থেকে "ট্র্যাকিং" স্ক্রিনশটটি চয়ন করুন।ইমেলটিতে "ট্র্যাকিং" স্ক্রিনশট sertোকান
  5. অবশেষে, “ট্র্যাকিং” এর স্ক্রিনশটটি মুদ্রণ করতে "ফাইল"> "মুদ্রণ" এ যান।

পদ্ধতি 2: এক্সেলে অনুলিপি করার পরে মুদ্রণ করুন

  1. শুরুতে, “ট্র্যাকিং” পৃষ্ঠাটি খুলুন।
  2. এরপরে, "ট্র্যাকিং" তালিকায় একটি প্রবেশিকা নির্বাচন করুন।
  3. এরপরে, সমস্ত এন্ট্রি নির্বাচন করতে "Ctrl + A" টিপুন।
  4. এরপরে, এগুলি অনুলিপি করতে "Ctrl + C" টিপুন।ট্র্যাকিং এ সমস্ত এন্ট্রি অনুলিপি করুন
  5. তারপরে একটি নতুন এক্সেল ফাইল খুলুন।
  6. "A1" ঘরটি নির্বাচন করুন এবং অনুলিপিযুক্ত “ট্র্যাকিং” তালিকাটি পেস্ট করতে "Ctrl + V" টিপুন।এক্সেলের মধ্যে আটকান
  7. শেষ পর্যন্ত, এক্সেলে, বর্তমান কার্যপত্রকটি মুদ্রণের জন্য "ফাইল"> "মুদ্রণ" এ যান।

পদ্ধতি 3: আউটলুক ভিবিএ সহ মুদ্রণ করুন

  1. প্রথমে, “উল্লেখ করে আউটলুক ভিবিএ সম্পাদকটিতে যানআপনার আউটলুকে কীভাবে ভিবিএ কোড চালাবেন"।
  2. তারপর, “MS Excel Object Library” কে নিম্নলিখিত অনুযায়ী সক্রিয় করুনVBA-তে কীভাবে একটি অবজেক্ট লাইব্রেরি রেফারেন্স যুক্ত করবেন"।
  3. এর পরে, নীচে কোডটি একটি মডিউলে রাখুন।
Sub PrintTracking_Meeting()
    Dim objMeeting As Outlook.AppointmentItem
    Dim objAttendees As Outlook.Recipients
    Dim objAttendee As Outlook.Recipient
    Dim objExcelApp As Excel.Application
    Dim objExcelWorkbook As Excel.Workbook
    Dim objExcelWorksheet As Excel.Worksheet
    Dim nLastRow As Integer
 
    Set objMeeting = Outlook.Application.ActiveInspector.CurrentItem
    Set objAttendees = objMeeting.Recipients
 
    Set objExcelApp = CreateObject("Excel.Application")
    Set objExcelWorkbook = objExcelApp.Workbooks.Add
    Set objExcelWorksheet = objExcelWorkbook.Sheets(1)
    objExcelApp.Visible = True
 
    With objExcelWorksheet
         .Cells(1, 1) = "Name"
         .Cells(1, 1).Font.Bold = True
         .Cells(1, 2) = "Attendance"
         .Cells(1, 2).Font.Bold = True
         .Cells(1, 3) = "Response"
         .Cells(1, 3).Font.Bold = True
    End With
 
    For Each objAttendee In objAttendees
        nLastRow = objExcelWorksheet.Range("A" & objExcelWorksheet.Rows.Count).End(xlUp).Row + 1
 
       Select Case objAttendee.MeetingResponseStatus
              Case olResponseAccepted
                   With objExcelWorksheet
                        .Range("A" & nLastRow) = objAttendee.Name
                        .Range("B" & nLastRow) = GetAttendance(objAttendee.Type)
                        .Range("C" & nLastRow) = "Accepted"
                   End With
              Case olResponseDeclined
                   With objExcelWorksheet
                        .Range("A" & nLastRow) = objAttendee.Name
                        .Range("B" & nLastRow) = GetAttendance(objAttendee.Type)
                        .Range("C" & nLastRow) = "Declined"
                   End With
              Case olResponseNone
                   With objExcelWorksheet
                        .Range("A" & nLastRow) = objAttendee.Name
                        .Range("B" & nLastRow) = GetAttendance(objAttendee.Type)
                        .Range("C" & nLastRow) = "None"
                   End With
              Case olResponseTentative
                   With objExcelWorksheet
                        .Range("A" & nLastRow) = objAttendee.Name
                        .Range("B" & nLastRow) = GetAttendance(objAttendee.Type)
                        .Range("C" & nLastRow) = "Tentative"
                   End With
              Case olResponseOrganized
                   With objExcelWorksheet
                        .Range("A" & nLastRow) = objAttendee.Name
                        .Range("B" & nLastRow) = GetAttendance(objAttendee.Type)
                        .Range("C" & nLastRow) = "Organized"
                   End With
       End Select
    Next
 
    objExcelWorksheet.Columns("A:C").AutoFit
    objExcelWorksheet.PrintOut
End Sub

Function GetAttendance(lType As Long) As String
    Select Case lType
           Case 0
                GetAttendance = "Meeting Organizer"
           Case 1
                GetAttendance = "Required Attendee"
           Case 2
                GetAttendance = "Optional Attendee"
    End Select
End Function

ভিবিএ কোড - একটি আউটলুক মিটিংয়ের ট্র্যাকিং তালিকা মুদ্রণ করুন

  1. পরবর্তী, দ্রুত অ্যাক্সেস সরঞ্জামদণ্ডে (কিউএটি) এই ম্যাক্রো যুক্ত করুন।
  2. শেষ পর্যন্ত, একটি সভা খুলুন এবং কিউএটিতে ম্যাক্রো বোতামটি চাপুন।
  3. একবারে, সভার ট্র্যাকিং তালিকাটি নীচের চিত্রটিতে প্রদর্শিত হিসাবে মুদ্রণ করা হবে।মুদ্রিত ট্র্যাকিং তালিকা

মূল্যবান আউটলুক ডেটা ফিরে পান

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

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

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

এখন শেয়ার:

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