আজকের নিবন্ধে, আমরা আপনাকে একাধিক Word নথিতে বিষয়বস্তু খুঁজে ও প্রতিস্থাপন করার উপায় সম্পর্কে জানাতে পেরে রোমাঞ্চিত।
সাধারণভাবে বলতে গেলে, বেশিরভাগ ওয়ার্ড ব্যবহারকারীই সফটওয়্যারটির “ফাইন্ড অ্যান্ড রিপ্লেস” ফিচারটির সাথে বেশ পরিচিত। এটি আমাদের পুরো ডকুমেন্ট জুড়ে একসাথে অনেকগুলো ফাইল খোঁজার কাজে সাহায্য করে, যা আমাদের অনেক সময় বাঁচায়। কিন্তু আপনি কি একটি নির্দিষ্ট ফোল্ডারের অধীনে থাকা সমস্ত ফাইলের মতো একাধিক ডকুমেন্টের ক্ষেত্রে এই অপশনটি ব্যবহার করার কথা ভেবে দেখেছেন?
যেহেতু ফাইলগুলির একটি ব্যাচের বিষয়বস্তু অনুসন্ধান এবং প্রতিস্থাপন করার প্রয়োজন সবসময় থাকে, তাই ফাংশনটি উপলব্ধি করা ভাল হবে। আর আমাদের উপায় হল ম্যাক্রো ব্যবহার করা। আরো বিস্তারিত জানতে অনুগ্রহ করে পড়ুন।
ম্যাক্রো ইনস্টল এবং চালানোর পদক্ষেপ
- সর্বপ্রথম, সমস্ত ফাইল একটি ফোল্ডারে রাখুন এবং Word খুলুন।
- তারপরে "বিকাশকারী" ট্যাবে ক্লিক করুন।
- এরপর "ভিজ্যুয়াল বেসিক" এ ক্লিক করুন। অথবা VBA এডিটর ট্রিগার করতে "Alt+ F11" টিপুন।
- তারপরে "সাধারণ" প্রকল্পে ক্লিক করুন।
- এরপর "সন্নিবেশ" ট্যাবে ক্লিক করুন এবং তারপর "মডিউল" নির্বাচন করুন।
- এখন আপনি সফলভাবে একটি নতুন মডিউল সন্নিবেশ করেছেন। কোডিং স্পেস খুলতে এটিতে ডাবল ক্লিক করুন।
- সেখানে বেলিং কোডগুলি আটকান:
Sub FindAndReplaceInFolder()
Dim objDoc As Document
Dim strFile As String
Dim strFolder As String
Dim strFindText As String
Dim strReplaceText As String
' Pop up input boxes for user to enter folder path, the finding and replacing texts.
strFolder = InputBox("Enter folder path here:")
strFile = Dir(strFolder & "\" & "*.docx", vbNormal)
strFindText = InputBox("Enter finding text here:")
strReplaceText = InputBox("Enter replacing text here:")
' Open each file in the folder to search and replace texts. Save and close the file after the action.
While strFile <> ""
Set objDoc = Documents.Open(FileName:=strFolder & "\" & strFile)
With objDoc
With Selection
.HomeKey Unit:=wdStory
With Selection.Find
.text = strFindText
.Replacement.text = strReplaceText
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End With
objDoc.Save
objDoc.Close
strFile = Dir()
End With
Wend
End Sub
- শেষ অবধি, "রান" ক্লিক করুন।
- এখন একটি ইনপুট বক্স পপ আপ হবে। ফোল্ডার পাথ লিখুন যেখানে আপনি নথি সংরক্ষণ করেন।
- তারপর "ঠিক আছে" ক্লিক করুন এবং দ্বিতীয় বক্স আছে। আপনি খুঁজে পেতে চান পাঠ্য লিখুন.
- তৃতীয় ইনপুট বক্সটি খুলতে "ঠিক আছে" ক্লিক করা চালিয়ে যান, যেখানে আপনি প্রতিস্থাপনের পাঠ্যগুলি লিখুন এবং সেখানে "ঠিক আছে" বোতামটি ক্লিক করুন৷ ম্যাক্রো স্বয়ংক্রিয়ভাবে সমস্ত বিষয়বস্তু প্রতিস্থাপন করবে এবং পরিবর্তনটি সংরক্ষণ করবে।
আপনি দেখতে পাচ্ছেন, এই ম্যাক্রো আপনাকে 3টি ইনপুট বাক্স সরবরাহ করে যেখানে আপনি ফোল্ডার পাথ, পাঠ্যগুলি সন্ধান এবং প্রতিস্থাপন করতে পারেন। তাই আপনি এই ম্যাক্রোর জন্য একটি বোতাম বরাদ্দ করতে পারেন এবং পুনরায় ব্যবহারের জন্য "দ্রুত অ্যাক্সেস টুলবার" এ যোগ করতে পারেন।
কিভাবে একটি ম্যাক্রোতে একটি বোতাম বরাদ্দ করতে হয়, আপনি এই নিবন্ধটি পড়তে পারেন: আপনার শব্দে ম্যাক্রো এবং ভিবিএর সাথে আটকানো টেক্সটগুলির বিন্যাস কীভাবে সরানো যায়
মূল্যবান তথ্য রক্ষা করুন
ওয়ার্ডে ত্রুটি এবং সমস্যা হতে পারে। ফলস্বরূপ, মূল্যবান নথি ক্ষতিগ্রস্ত হতে পারে। সাথে মুখোমুখি হওয়ার সময় ডক ক্ষতি, তথ্য পুনরুদ্ধার করার জন্য এটি একটি পেশাদার পুনরুদ্ধার টুল ধরে রাখার পরামর্শ দেওয়া হয়।
লেখকের ভূমিকা:
ভেরা চেন একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় xls ক্ষতি এবং pdf মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com