এই পোস্টে, আমরা আপনার ওয়ার্ড ডকুমেন্টের একাধিক শেপের ফিল কালার একসাথে মুছে ফেলার ৩টি কার্যকরী পদ্ধতি দেখাতে পেরে আনন্দিত।
কোনও ওয়ার্ড নথিতে আকার সন্নিবেশ করার সময়, আপনি সেগুলিতেও পূর্ণ রঙ প্রয়োগ করতে পারেন। একক আকৃতির ভরাট রঙ যুক্ত করা বা মুছে ফেলা সহজ। তবে যখন ব্যাচ প্রসেসিংয়ের কথা আসে তখন আমাদের কিছু কৌশল দরকার হবে।
এবার, আমরা আপনাকে ব্যাচ কীভাবে ডকুমেন্টের একাধিক আকারের ভরাট রঙ মুছে ফেলতে তা দেখাতে চাই। সুতরাং আপনি এগুলি পছন্দসই রঙগুলি দিয়ে আবার পূরণ করতে পারেন বা খালি পটভূমিতে আকার ছেড়ে যেতে পারেন। নিম্নলিখিত 3 টি পদ্ধতি যা আপনাকে বিভিন্ন ক্ষেত্রে সহায়তা করতে পারে।
পদ্ধতি 1: একটি পৃষ্ঠায় একাধিক আকৃতির ভরাট রঙ সরান
- সবার আগে, ফিতাটির "হোম" ট্যাবটি ক্লিক করুন।
- তারপরে "সম্পাদনা" গোষ্ঠীতে "নির্বাচন করুন" কমান্ডটি ক্লিক করুন।
- ড্রপ-ডাউন মেনুতে, "নির্বাচন ফলক" নির্বাচন করুন।
- এখন "নির্বাচন এবং দৃশ্যমানতা" ফলকে আপনি এই পৃষ্ঠায় সমস্ত আকারের নাম দেখতে পাবেন। আপনার প্রয়োজনীয় আকারগুলি নির্বাচন করতে "Ctrl" টিপুন।
- তারপরে রিবনে "ফর্ম্যাট" ক্লিক করুন।
- এরপরে “শেপ ফিল” ক্লিক করুন।
- ড্রপ-ডাউন মেনুতে "কোনও পূরণ হবে না" চয়ন করুন।
পদ্ধতি 2: ব্যাচ একটি নথিতে সমস্ত আকারের রঙ পূরণ করুন
- সর্বপ্রথম, যদি “ডেভেলপার” ট্যাবটি উপলব্ধ থাকে, তবে সেটিতে ক্লিক করুন এবং তারপরে VBA এডিটর খোলার জন্য “ভিজ্যুয়াল বেসিক”-এ ক্লিক করুন। যদি “ডেভেলপার” সক্রিয় না থাকে, তবে এর পরিবর্তে “Alt+ F11” চাপুন।
- এখন সম্পাদকটিতে, বাম পাশে "সাধারণ" প্রকল্পটি ক্লিক করুন।
- তারপরে মেনু বারে "sertোকান" ক্লিক করুন।
- এরপরে ড্রপ-ডাউন মেনুতে "মডিউল" চয়ন করুন।
- নতুন মডিউলটি খোলার জন্য ডাবল ক্লিক করুন এবং এই কোডগুলিকে সেখানে পেস্ট করুন:
Sub RemoveAllShapeFill()
Dim objShape As Shape
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
For Each objShape In objDoc.Shapes
objShape.Fill.Visible = False
objShape.Line.Visible = msoTrue
Next objShape
Application.ScreenUpdating = True
Set objDoc = Nothing
End Sub
- শেষ অবধি, কোডগুলি সম্পাদন করতে "রান" বোতামটি ক্লিক করুন বা "F5" টিপুন।
পদ্ধতি 3: একটি নথিতে সমস্ত পাঠ্য বাক্সের রঙ পূরণ করুন Remove
পাঠ্য বাক্সগুলি আকৃতির বিভাগের অন্তর্গত। আপনি যদি সমস্ত পাঠ্য বাক্সের রঙের রঙ সরিয়ে ফেলতে চান তবে অন্য আকারগুলি রাখতে চান, আপনি এইভাবে ব্যবহার করতে পারেন।
- প্রথমত, ম্যাক্রো ইনস্টল এবং চালানোর জন্য পদ্ধতি 2 এর পদক্ষেপগুলি পুনরাবৃত্তি করুন।
- এবং এই বারের সাথে সেই ম্যাক্রোটি প্রতিস্থাপন করুন:
Sub RemoveTextBoxFill()
Dim objShape As Shape
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
For Each objShape In objDoc.Shapes
If objShape.Type = msoTextBox Then
objShape.Fill.Visible = msoFalse
objShape.Line.Visible = msoTrue
Else
Exit For
End If
Next objShape
Application.ScreenUpdating = True
Set objDoc = Nothing
End Sub
ফলাফল এখানে:
ক্ষতিগ্রস্থ দলিলগুলি দ্রুত পুনরুদ্ধার করুন
যদি কখনো আপনার নথি নষ্ট হয়ে যায়, তবে আতঙ্কিত হবেন না। মনে রাখবেন যে বেশিরভাগ নথিই পুনরুদ্ধারযোগ্য। আপনার যা করা উচিত তা হলো সময় নিয়ে একটি ব্যবস্থা করা। ডক ফিক্স টুল. আজকাল, এই জাতীয় ইউটিলিটি আপনার ডেটা ফিরিয়ে আনতে একটি দুর্দান্ত সহায়তা হতে পারে।
লেখকের ভূমিকা:
ভেরা চেন একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় xls ফিক্স এবং pdf মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com




