वीबीए: मूल्यों को कैसे पेस्ट करें और फ़ॉर्मेटिंग को संरक्षित करें

आप कक्षों की एक श्रृंखला की प्रतिलिपि बनाने और मूल्यों और स्रोत स्वरूपण को एक नए स्थान पर चिपकाने के लिए वीबीए में निम्नलिखित वाक्यविन्यास का उपयोग कर सकते हैं:

 Sub PasteWithFormatting()

Range(" A1:C11 ").Copy
Range(" A13 ").PasteSpecial Paste:=xlPasteAllUsingSourceTheme
Application.CutCopyMode = False

End Sub

यह विशेष मैक्रो A1:C11 रेंज में सेल की प्रतिलिपि बनाएगा और सेल मानों को उनके फ़ॉर्मेटिंग के साथ सेल A13 से शुरू होने वाली रेंज में पेस्ट करेगा।

ध्यान दें : एप्लिकेशन.CutCopyMode = गलत लाइन निर्दिष्ट करती है कि मैक्रो चलाने के बाद कट और कॉपी मोड अक्षम किया जाना चाहिए।

निम्नलिखित उदाहरण दिखाता है कि व्यवहार में इस वाक्यविन्यास का उपयोग कैसे करें।

उदाहरण: मान चिपकाएँ और VBA का उपयोग करके फ़ॉर्मेटिंग जारी रखें

मान लीजिए कि हमारे पास एक्सेल में निम्नलिखित डेटासेट है जिसमें विभिन्न बास्केटबॉल खिलाड़ियों के बारे में जानकारी है:

मान लीजिए कि हम A1:C11 श्रेणी के सभी मानों को कॉपी करके एक नए स्थान पर पेस्ट करना चाहते हैं और फ़ॉर्मेटिंग रखना चाहते हैं।

ऐसा करने के लिए हम निम्नलिखित मैक्रो बना सकते हैं:

 Sub PasteWithFormatting()

Range(" A1:C11 ").Copy
Range(" A13 ").PasteSpecial Paste:=xlPasteAllUsingSourceTheme
Application.CutCopyMode = False

End Sub

जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:

ध्यान दें कि मूल सेल मानों को उनके स्वरूपण के साथ सेल A13 से शुरू होने वाली सेल श्रेणी में चिपका दिया गया है।

नोट : आप वीबीए पेस्टस्पेशल विधि के लिए संपूर्ण दस्तावेज़ यहां पा सकते हैं।

अतिरिक्त संसाधन

निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:

वीबीए: बिना फ़ॉर्मेटिंग के केवल मान कैसे पेस्ट करें
वीबीए: दृश्यमान पंक्तियों को दूसरी शीट पर कैसे कॉपी करें
वीबीए: मानदंडों के आधार पर पंक्तियों को दूसरी शीट पर कॉपी करें