এক্সেলের সেলের মধ্যে আংশিক পাঠ্য রঙ করা

Question

এক্সেলের মধ্যে পূর্ণ মানের ঘরটিকে তার মানের ভিত্তিতে রঙিন করার জন্য বেশ কয়েকটি উপায় রয়েছে তবে তার ঘরের মানের উপর ভিত্তি করে ঘরের কেবলমাত্র অংশকে গতিশীলভাবে রঙ করার কোনও উপায় আছে?

উদাহরণস্বরূপ, বলুন যে আমি একটি প্রতিবেদন তৈরি করছি যা নিম্নলিখিতগুলির মতো কিছু দেখায়:

 _________________________
|       |    Dec    | Nov |
|_______|___________|_____|
|Gross R| $75 (-25%)| $100|
|_______|___________|_____|
|Net Inc| $55 (+10%)| $50 |
|_______|___________|_____|

এই দৃশ্যে আমি কেবল শতাংশের মান (-25%) এবং (+ 10%) রঙ করতে চাই, ডলারের মানগুলি $ 75 এবং $ 55 নয় যা সেজেও রয়েছে। সমস্যাটি যুক্ত করা হ'ল রঙটি গতিশীল হওয়া উচিত (ধনাত্মকতার জন্য সবুজ, নেতিবাচক মানের জন্য লাল), এবং এই ঘরগুলি উল্লেখ করা হয় (সুতরাং ম্যানুয়াল রঙিনটি টেবিলের বাইরে রয়েছে)।

আমি বিল্ট ইন TEXT()ফাংশনটি ব্যবহার করার চেষ্টা করেছি , তবে এটিও কার্যকর হয়নি। বিশেষত আমি চেষ্টা করেছি =TEXT(A1,"$##")&" "&TEXT(A2,"[Green]0%;[Red](-0%)")যেখানে A1ডলারের পরিমাণের A2জন্য সেল রেফারেন্স এবং শতাংশের বদ্বীপে সেল রেফারেন্স।

হতাশাজনক বিষয়টি হ'ল কাস্টম ফর্ম্যাটিং [Green]0%;[Red](-0%)পুরো কক্ষে প্রয়োগ করার সময় ঠিকঠাক কাজ করে (কাস্টম নম্বর ফর্ম্যাটিং বিভাগের মাধ্যমে), তবে TEXT()ফাংশনের মাধ্যমে প্রয়োগ করা গেলে এটি কাজ করা বন্ধ করে দেয়। সুতরাং, আমি কীভাবে কোনও ঘরের মধ্যে আংশিক মান রঙ করতে পারি?

Comments

এক্সেল ফাংশন এটি করতে পারে না, শর্তসাপেক্ষ বিন্যাসটি কেবলমাত্র পুরো কক্ষের জন্যই প্রযোজ্য এবং আপনার মনে হয় আপনি কাস্টম সংখ্যার ফর্ম্যাটগুলি দিয়ে সম্ভাবনাগুলি শেষ করে দিয়েছেন। যদিও এটি ভিবিএতে করণীয় হতে পারে। (ক সহজ উদাহরণস্বরূপ, একটি কটাক্ষপাত এখানে আমি কৌতুহলী যদিও আপনি কিভাবে এক কক্ষে দুই নম্বর পেয়ে, তাদের সম্ভবত স্ট্রিং হিসেবে নির্মাণ করা হয়।।?

— ঝিকঝিক শব্দ

@ ছাফ হ্যাঁ, আমি সেগুলি স্ট্রিং হিসাবে তৈরি করছিলাম যাতে আমি এক্সেলের গ্রিড সীমাবদ্ধতাগুলি (প্রতিটি সারির জন্য নির্দিষ্ট প্রস্থ কলামের আকার) পেতে পারি।

— মোশি 21

Answer 1

এই সমস্যাটি ঘুরে দেখার জন্য আমি দুটি পন্থা আবিষ্কার করেছি এবং যেখানে সত্যিই অনুকূল নয়।

প্রথম পদ্ধতির স্ট্রিংগুলি দুটি পৃথক কলামে বিভক্ত করা হয়েছিল, এইভাবে আমি এর বর্ণ নির্ধারণ করতে পূর্ব বর্ণিত কাস্টম বিন্যাসগুলির একটি ব্যবহার করতে পারি। এটি আদর্শ সমাধান নয় কারণ অতিরিক্ত কলামটি সামঞ্জস্য করার জন্য আমাকে প্রতিবেদনের "চেহারা এবং অনুভূতি" সম্পর্কে আপস করতে হয়েছিল।

দ্বিতীয় পদ্ধতির ভিবিএ / ম্যাক্রোগুলি ব্যবহারের মাধ্যমে হয়, যা আমি এই নির্দিষ্ট দৃশ্যে এড়াতে পছন্দ করেছিলাম, তবে কাজটিই শেষ হতে পারত। যদিও আমি পুরো কার্যকরী কোডটি মুদ্রণ করব না, এটি এটিকে প্রয়োজনীয়ভাবে ফুটিয়ে তোলে:

1. আপনি যে ঘরটি সামঞ্জস্য করতে চান তা সন্ধান করুন (হয় ActiveCellলুপের মাধ্যমে অথবা)
2. Instrআপনি রঙ পরিবর্তন করতে চান সেখানে স্ট্রিংয়ের অবস্থান অনুসন্ধান করতে ফাংশনটি ব্যবহার করুন
3. যদি পাঠ্য দৈর্ঘ্য পরিবর্তনশীল Instrহয় তবে স্ট্রিংয়ের যেখানে আপনি রঙটি থামাতে চান সেখানে অবস্থান সন্ধান করতে আবার ব্যবহার করুন
4. Characters(start, length)আপনি আগে যে মানগুলি সংশোধন করতে চান তা হাইলাইট করতে ফাংশনটি ব্যবহার করুন , এর আগে পাওয়া মানগুলিতে চলে।
5. সাথে রঙ পরিবর্তন করুন Font.Color = RGB(r,g,b)

Comments

ডাউনভোটে পর্যাপ্ত খ্যাতি নেই, তবে এটি আমার প্রথম ছিল: "যদিও আমি পুরো ওয়ার্কিং কোডটি প্রিন্ট করব না" - কেন নয়? এই মত ফোরামের জন্য বেশ সহায়ক।

— hmedia1

Answer 2

ম্যাক্রো ব্যবহার করে একটি উদাহরণ পাওয়া যাবে এখানে:

এক্সেলের সেলগুলিতে ম্যাক্রো পাঠ্যের কিছু অংশ রঙ করুন

এক্সেল ম্যাক্রোস - লুপ টু কালার পার্ট অফ সেল এর জন্য

একটি এক্সেল ম্যাক্রো ব্যবহার করুন যাতে আবহাওয়ার ডেটা সারি দিয়ে লুপের জন্য লুপের জন্য থাকে এবং কক্ষের টেক্সটের লাল অংশের রঙের অংশটি যদি এতে গরম এবং নীল শব্দটি থাকে তবে এতে শব্দটি শীতল থাকে:

নির্দেশনা

1. এক্সেলের বিকাশকারী ট্যাবে ক্লিক করুন
2. ভিজ্যুয়াল বেসিক আইকনে ক্লিক করুন এবং নীচে ম্যাক্রো পাঠ্যটি 1 কোড উইন্ডোতে অনুলিপি করুন
3. এক্সেল ভিউতে ফিরে যেতে এক্সেল আইকনটি ক্লিক করুন
4. ম্যাক্রোস আইকনে ক্লিক করুন, টেক্সটপার্টকলারম্যাক্রো নামক ম্যাক্রোটি নির্বাচন করুন এবং রান ক্লিক করুন

সম্পূর্ণ ম্যাক্রো:

Sub TextPartColourMacro()

' Declarations and Initialisation
Dim Row As Integer, Col As Integer
Dim CurrentCellText As String
Col = 1

' Loop Through Rows 2 to 5
For Row = 2 To 5

    ' Get Text in Current Cell
    CurrentCellText = ActiveSheet.Cells(Row, Col).Value

    ' Get the Position of the Text Hot and Cool
    HotStartPosition = InStr(1, CurrentCellText, "Hot")
    CoolStartPosition = InStr(1, CurrentCellText, "Cool")

    ' Colour the Word Hot Red
    If HotStartPosition > 0 Then
        ActiveSheet.Cells(Row, Col).Characters(HotStartPosition, 3).Font.Color = RGB(255, 0, 0)
    End If

    ' Colour the Word Cool Blue
    If CoolStartPosition > 0 Then
        ActiveSheet.Cells(Row, Col).Characters(CoolStartPosition, 4).Font.Color = RGB(0, 0, 255)
    End If

Next Row
End Sub

Comments

সুপার ব্যবহারকারীর উদ্দেশ্য হ'ল অন্য কোথাও উত্তরগুলির লিঙ্কের সংগ্রহের চেয়ে একটি নলেজব্যাক তৈরি করা। বাহ্যিক লিঙ্কগুলি ভেঙে যেতে পারে, এক্ষেত্রে আপনার উত্তরের কোনও মূল্য থাকবে না। দয়া করে আপনার উত্তরে প্রয়োজনীয় তথ্য অন্তর্ভুক্ত করুন এবং বিশদ এবং আরও পড়ার জন্য লিঙ্কটি ব্যবহার করুন।

— ফিক্সার 1234

এটি একটি ভাল সমাধান, আমি এটি স্থাপন করব।

— এইচটিএম 11h

Answer 3

এই ম্যাক্রোটি বন্ধনীর সমন্বিত পাঠ্যের যে কোনও নির্বাচিত ব্যাপ্তিকে লাল রঙ করতে হবে যদি বন্ধনীগুলির মধ্যে লেখাটিতে "-" অক্ষর থাকে, অন্যথায় এটি এটিকে সবুজ করে দেয়। বন্ধনীগুলির বাইরের সমস্ত পাঠ্য অপরিবর্তিত রয়েছে।

Dim rngCell As Range
Dim CharCount As Integer
Dim BracketBegin As Integer
Dim BracketEnd As Integer
Dim strToColour As String

For Each rngCell In Selection
    CharCount = Len(rngCell)
    BracketBegin = InStr(1, rngCell, "(")
    BracketEnd = InStr(1, rngCell, ")")
    With rngCell.Characters(BracketBegin, CharCount - BracketEnd)
        ' Pull out string to check for +/-
        strToColour = rngCell.Characters(BracketBegin, CharCount - BracketEnd).Text
        ' If negative, colour red, otherwise green
        If InStr(strToColour, "-") Then
            .Font.Color = vbRed
        Else
            .Font.Color = vbGreen
        End If
  End With
Next rngCell
End Sub

[Example][1]


  [1]: https://i.stack.imgur.com/4lyN4.png

Answer 4

হাইলাইট হতে চাইলে পাঠ্যের উপরে লাইন সন্নিবেশ করুন, লাইটটি আপনার যত বেশি প্রয়োজন উচ্চতর হালকা করুন, পাঠ্যের রঙকে হলুদ (অথবা আপনি যে কোনও রঙ বেছে নিন) পরিবর্তন করুন এবং আপনার পছন্দ অনুযায়ী লাইনের অস্বচ্ছতা হ্রাস করুন।

Answer 5

একটি কার্যক্ষম পদ্ধতি যদিও এটি এমএস এক্সেলের সমাধান নয় তবে আপনি যদি কোনও অক্ষরের জায়গার সমান এক্সেল শিট গ্রিড (সেল প্রস্থ) ভাগ করে নেন তবে আপনি এটিকে আপনার পছন্দের রঙটি ব্যবহার করতে পারেন: