/ / Interior.PatternTintAndShade संपत्ति - एक्सेल, वीबीए, xlsx

आंतरिक। PatternTintAndShade संपत्ति - एक्सेल, वीबीए, xlsx

मैं एक्सेल शीट्स पर बड़ी मात्रा में काम कर रहा हूंसेल पैटर्न आधारित डेटा। मैं इन सेल पैटर्न के मूल्यों को पढ़ने की कोशिश कर रहा हूं और उस जानकारी को किसी अन्य शीट में संग्रहीत कर रहा हूं। लेकिन मैं ऐसा करने में असमर्थ हूं क्योंकि Excel में ऐसा करने के लिए कोई फ़ंक्शन उपलब्ध नहीं है। कृपया मदद कीजिए।

उत्तर:

जवाब के लिए 0 № 1

आपके शीर्षक के अनुसार, ऐसा लगता है कि आप वीबीए चाहते हैं। अब, अगर आप कॉपी करना चाहते हैं तो यह स्पष्ट नहीं है Interior.Pattern, Interior.PatternTintAndShade, या शायद कुछ और।

आपको जिस कोड की आवश्यकता है वह कुछ है

Dim wssrc as Worksheet, wstrg as Worksheet
Dim rngsrc as Range, clsrc as Range, cltrg as Range
Set rngsrc = <what you want>
For Each clsrc in rngsrc
Set cltrg = wstrg.Range(clsrc.Address)
cltrg.Interior.PatternTintAndShade = clsrc.Interior.PatternTintAndShade
Next clsrc

(पीएस: मेरे पास वर्तमान में एक्सेल के साथ एक सिस्टम नहीं है, इसलिए इस कोड को थोड़ा समायोजन की आवश्यकता हो सकती है)।

अन्य विकल्प जो शायद आपके लिए काम करता है: पहली प्रतिलिपि है, और उसके बाद उपयोग करें Range.PasteSpecial तरीका, पहले तर्क के साथ xlPasteFormats। यह वीबीए विधि है संपादित करें -> स्पेशल पेस्ट करो (जीपड द्वारा टिप्पणी देखें)।