एक्सेल की रंग योजना - वीबीए कोड उदाहरण

सेल का रंग बदलें - .Interior.ColorIndex

सेल का रंग बदलने के लिए हम इसका उपयोग कर सकते हैं:

Cell.Interior.ColorIndex = Num

कहा पे:
• सेल सेल संदर्भ है
• आंतरिक - वास्तविक सेल रंग के रंग को संदर्भित करता है (आंतरिक संपत्ति)
• एक्सेल के 56 पूर्वनिर्धारित रंगों में से एक के लिए Colourindex 1 और 56 के बीच का मान है

और संख्या सेल को सौंपा गया संख्या रंग है। हालांकि, यह याद रखना हमेशा आसान नहीं होता कि कौन सी संख्या किस रंग का प्रतिनिधित्व करती है। निम्न सबरूटीन पंक्ति संख्या के आधार पर सेल का रंग बदलता है। तो उदाहरण के लिए पंक्ति 3 में रंग 3 आदि होगा।

चूंकि एक्सेल में 56 प्रीसेट रंग हैं, इसका मतलब है कि सेल 59, 115 का रंग वही होगा जो सेल में पंक्ति 3 में है:

123456789101112

विकल्प स्पष्टनिजी उप कमांडबटन1_क्लिक करें ()Color_Range (शीट्स ("शीट 2")। रेंज ("A1: A2000"))अंत उपउप रंग_रेंज (सेल_रेंज के रूप में रेंज)' हर सेल को रेंज में कलर करेगामंद सेलCell_Range में प्रत्येक सेल के लिएसेल। इंटीरियर। कलरइंडेक्स = सेल। रो मॉड 56सेल। ऑफसेट (0, 0)। मान = सेल। पंक्तिअगलाअंत उप

रूटीन एक क्लिक ईवेंट द्वारा सक्रिय होता है।

इस ट्यूटोरियल के लिए .XLSM फ़ाइल डाउनलोड करने के लिए, कृपया यहाँ क्लिक करें।