আপনি যখন কোনও আউটলুক ইমেলের হাইপারলিঙ্কে ক্লিক করেন, লিঙ্কটি আপনার ডিফল্ট ইন্টারনেট ব্রাউজারে খোলা হবে। তবে বাস্তবে আপনি এই নিবন্ধে প্রবর্তিত পদ্ধতিটি সরাসরি আউটলুকে হাইপারলিঙ্ক খোলার জন্যও ব্যবহার করতে পারেন।
আপনি নিশ্চয়ই জেনে গেছেন যে আপনি যখন কোনও আউটলুক ইমেলের হাইপারলিঙ্কে ক্লিক করেন, তখন লিঙ্কটির ওয়েবপৃষ্ঠাটি আপনার ডিফল্ট ইন্টারনেট ব্রাউজার দ্বারা খোলা হবে। তবে, এমন অনেক ব্যবহারকারী আছেন যারা সরাসরি আউটলুকের মধ্যে হাইপারলিঙ্কটি খুলতে চান। আউটলুকের পূর্ববর্তী সংস্করণগুলিতে একটি দৃশ্যমান এবং সুস্পষ্ট ওয়েব সরঞ্জাম ছিল। তবে এখন, এই বৈশিষ্ট্যটি লুকানো আছে। তবুও, আসলে, আউটলুক এখনও একটি ওয়েব ব্রাউজার হিসাবে কাজ করতে পারে। আপনি নিম্নলিখিত পদ্ধতিটি প্রয়োগ করতে পারেন যা দ্রুত সময়ে এটি অর্জনের জন্য আউটলুক ভিবিএ ব্যবহার করে।
নতুন ব্রাউজার উইন্ডোর পরিবর্তে আউটলুকে সরাসরি হাইপারলিংক খুলুন
- প্রথম স্থানে, আপনার আউটলুক অ্যাপ্লিকেশন চালু করুন।
- তারপরে “Alt + F11” কী বোতাম টিপুন।
- এরপরে, আপনি সফলভাবে আউটলুক ভিবিএ সম্পাদক উইন্ডোতে প্রবেশ করবেন।
- এরপরে নীচের ভিবিএ কোডগুলিকে অন-ব্যবহারযোগ্য মডিউলটিতে অনুলিপি করুন এবং আটকান।
Public Sub OpenHyperlinkswithinOutlook()
Dim objMail As Outlook.MailItem
Dim objWordDocument As Word.Document
Dim objHyperlinks As Word.Hyperlinks
Dim i As Long
Dim objHyperlink As Word.Hyperlink
Dim strHyperlinkList As String
Dim strNumber As String
Dim strURL As String
Dim objExplorer As Explorer
Dim objWebBrowser As Object
Dim nAlert As Integer
On Error Resume Next
Select Case TypeName(Outlook.Application.ActiveWindow)
Case "Inspector"
Set objMail = ActiveInspector.CurrentItem
Case "Explorer"
Set objMail = ActiveExplorer.Selection.Item(1)
End Select
Set objWordDocument = objMail.GetInspector.WordEditor
Set objHyperlinks = objWordDocument.Hyperlinks
If objHyperlinks.Count < 1 Then
nAlert = MsgBox("There is no hyperlink in this email!", vbExclamation)
'Get the URL of the only hyperlink
ElseIf objHyperlinks.Count = 1 Then
Set objHyperlink = objWordDocument.Hyperlinks.Item(1)
strURL = objHyperlink.Address
'Select which hyperlink to open
ElseIf objHyperlinks.Count > 1 Then
For i = 1 To objHyperlinks.Count
strHyperlinkList = strHyperlinkList & i & ": " & objHyperlinks.Item(i).Address & vbCrLf
Next i
For i = 1 To objHyperlinks.Count
strNumber = InputBox("You have " & objHyperlinks.Count & " hyperlinks in this email as follows. " & vbCrLf & vbCrLf & "Please enter the number to select which one to be opened within your Outlook (format: 1)." & vbCrLf & vbCrLf & strHyperlinkList, "Select Hyperlink")
Set objHyperlink = objWordDocument.Hyperlinks.Item(strNumber)
strURL = objHyperlink.Address
Exit For
Next i
End If
'Open the selected hyperlink
Set objExplorer = Application.ActiveExplorer
Set objWebBrowser = objExplorer.CommandBars.FindControl(, 1740)
objWebBrowser.Text = strURL
objWebBrowser.Execute
End Sub
- এর পরে, যথারীতি কুইক অ্যাক্সেস সরঞ্জামদণ্ড বা ফিতাটিতে নতুন ম্যাক্রো যুক্ত করুন।
- পরে আপনার আউটলুক ম্যাক্রো সুরক্ষা স্তরটিকে নিম্নে পরিবর্তন করুন।
- শেষ পর্যন্ত আপনি চেষ্টা করতে পারেন। প্রথমত, নির্বাচন করুন বা একটি ইমেল খুলুন এবং তারপরে ম্যাক্রো বোতামটি টিপুন। ইমেলের মোট হাইপারলিংকের গণনার উপর নির্ভর করে এখানে 3 টি মামলা রয়েছে।
- ইমেলের কোনও হাইপারলিংক না থাকলে, আপনি একটি সতর্কতা পাবেন, যা নিম্নলিখিত স্ক্রিনশট হিসাবে দেখানো হয়েছে:
- ইমেইলে যদি কেবল একটি হাইপারলিংক থাকে তবে লিঙ্কটি একবারে খোলা হবে, নীচের চিত্রটির মতো:
- ইমেইলে বেশ কয়েকটি হাইপারলিংক থাকলে নীচের ছবির মতো আপনাকে হাইপারলিঙ্ক নির্বাচন করতে হবে। আপনি নির্বাচিত হাইপারলিংকের সংখ্যা প্রবেশ করার পরে, সেই অনুযায়ী ওয়েবপৃষ্ঠাটি একবারে খুলবে।
কখনও পিএসটি ঝামেলা ভয় করবেন না
অনেক ব্যবহারকারী তাদের অপ্রত্যাশিত হওয়ার সাথে সাথে আতঙ্কিত হয়ে পড়বে পিএসটি দুর্নীতি। কারণ তারা যথাযথ সতর্কতা করেনি, যেমন আপ-টু-ডেট পিএসটি ডেটা ব্যাকআপ এবং একটি অভিজ্ঞ মেরামত সরঞ্জামের মতো DataNumen Outlook Repair। আসলে, যতক্ষণ আপনি ভালভাবে প্রস্তুত থাকবেন ততক্ষণ আপনার কোনও পিএসটি সমস্যা ভয় পাওয়ার দরকার নেই।
লেখকের ভূমিকা:
শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় এমডিএফ দুর্নীতি এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com