এমএস প্রকল্প স্থিতির ক্ষেত্রের ভিত্তিতে সারিটিতে পাঠ্যের রঙ পরিবর্তন করুন

আমি "স্থিতি" ক্ষেত্রে নির্দেশিত কিসের উপর ভিত্তি করে একটি সম্পূর্ণ সারির পাঠ্যের রঙ পরিবর্তন করতে চাই।

আমি অন্যান্য ফোরামে অনুসন্ধান করেছি এবং এর সমাধানগুলি নিকটে রয়েছে বলে খুঁজে পেয়েছি তবে কিছুই যা সত্যই আমি সন্ধান করছি তা করে না। আমি হাইলাইট বৈশিষ্ট্য এবং শর্তসাপেক্ষ বিন্যাস সম্পর্কে সচেতন, তবে আমি তাদের যা প্রয়োজন তা করতে পারি না। আমি প্রায় 5 বছর আগে এই সঠিক কাজটি করার জন্য কিছু ভিবি কোড লিখেছিলাম, তবে আমি একজন শিক্ষানবিশ, খুব বেসিক কোডটি লিখতে আমার প্রায় 5 দিন লেগেছে, এবং তখন আমি আমার সর্বশেষ কাজটি ছেড়ে দিলে আমি এটি হারিয়ে ফেলেছিলাম। :-(

সুতরাং, আমি কেবলমাত্র কিছু ভিবিএ রয়েছে যা নিম্নলিখিতগুলি করবে:

যদি স্থিতি = "দেরী" হয় তবে সারিটির পাঠ্যটিকে "RED" এ রঙ করুন
যদি স্থিতি = "সময়সূচীতে" থাকে তবে সারিটির পাঠ্যটিকে "GREEN" এ রঙ করুন
যদি স্থিতি = "ভবিষ্যতের কাজ" হয় তবে সারিটির পাঠ্যটিকে "BLACK" এ রঙ করুন
যদি স্থিতি = "সম্পূর্ণ" হয় তবে সারিটির পাঠ্যটিকে "গ্রে" তে রঙ করুন

আমি উন্নত হতে চাই এবং নীচের মতো কিছু পেতে চাই: যদি স্থিতি = "সময়সূচীতে", এবং% সম্পূর্ণ <85% হয়, এবং "শেষ তারিখ" ভবিষ্যতে <5 দিন হয়, তবে সারণির পাঠ্যটি "ORANGE" রঙ করুন "

— Cobra75007
সূত্র

শর্তসাপেক্ষ বিন্যাসের জন্য একটি কাজের মতো শোনাচ্ছে। আপনি কি চেষ্টা করেছেন যে কাজ করেনি? এটা কিভাবে কাজ করে না? এক্সেলের ক্ষেত্রে, উদাহরণস্বরূপ, আপনার ডেটা অঞ্চল নির্বাচন করা এবং একটি সূত্র ব্যবহার করে কলামে শর্তসাপেক্ষ বিন্যাস ব্যবহার =$E1="Late"করে মানটির জন্য আপনার নির্বাচিত সমস্ত অঞ্চল কলাম E পরীক্ষা করে এবং তারপরে পুরো সারিতে বিন্যাস প্রয়োগ করতে হবে। আমার কাছে প্রকল্পটি নেই বলে আমি খুব পারদর্শী নই।

— রায়স্টাফেরিয়ান

হ্যাঁ, এমএস প্রজেক্টে এক্সেলের মতো "শর্তসাপেক্ষ বিন্যাস" ধরণের ফাংশন নেই।

— Cobra75007

আপনি কোনও প্রশ্নের উত্তর

— দেননি

সাব কমপ্লিট পার্সেন্টস্যাব ()

Dim t As Task Dim i As Integer

'পুরো এমএস প্রকল্প ফাইলের মাধ্যমে আইট্রেট করে

অ্যাক্টিভপ্রজেক্ট.টাস্কগুলিতে প্রতিটি টি-তে i = 1

SelectRow Row:=i, RowRelative:=False

If Not t Is Nothing Then

    Select Case t.Status
        Case 0 'Complete
            Font32Ex CellColor:=&H98FB98 'LIGHT GREEN
        Case 1 'On Schedule
            Font32Ex CellColor:=&HE0FFFF 'TAN
        Case 2 'Late
            Font32Ex CellColor:=&HC0FF& 'LIGHT RED
        Case 2 'Future Task
            Font32Ex CellColor:=&HFFFFFF 'WHITE
    End Select
End If

i = i + 1

পরবর্তী টি

শেষ সাব

— user760527
সূত্র

আপনি ঠিক কী পরামর্শ দিচ্ছেন তা জানানোর জন্য দয়া করে এই উত্তরটিতে আরও কিছু প্রসঙ্গ যুক্ত করুন এবং যুক্ত করুন।

— পিম্প জুস আইটি