सशर्त स्वरूपण (5)
सूचियाँ और श्रेणियाँ (5)
मैक्रोज़ (वीबीए प्रक्रियाएँ) (63)
विविध (39)
एक्सेल बग और गड़बड़ियाँ (4)

कॉपी की गई कोशिकाओं को केवल दृश्यमान/फ़िल्टर किए गए कोशिकाओं में कैसे चिपकाएँ

सामान्य तौर पर, मुझे लगता है कि लेख का अर्थ, शीर्षक से पहले ही स्पष्ट है। मैं बस इसे थोड़ा विस्तारित करूंगा।

यह कोई रहस्य नहीं है कि एक्सेल आपको केवल दृश्य पंक्तियों का चयन करने की अनुमति देता है (उदाहरण के लिए, यदि उनमें से कुछ छिपे हुए हैं या कोई फ़िल्टर लागू किया गया है).

इसलिए, यदि आप इस तरह से केवल दृश्यमान कोशिकाओं की प्रतिलिपि बनाते हैं, तो उन्हें अपेक्षा के अनुरूप कॉपी किया जाएगा। लेकिन जब आप कॉपी की गई किसी चीज़ को फ़िल्टर की गई श्रेणी (या छिपी हुई पंक्तियों वाली) में पेस्ट करने का प्रयास करते हैं, तो पेस्ट का परिणाम बिल्कुल वैसा नहीं होगा जैसा आपने अपेक्षा की थी। छिपी हुई पंक्तियों में भी डेटा डाला जाएगा।

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

विकल्प स्पष्ट मंद rCopyRange रेंज के रूप में "इस मैक्रो के साथ हम डेटा कॉपी करते हैंउप My_Copy() यदि चयन.गणना > 1 है तो rCopyRange = सिलेक्शन.स्पेशलसेल्स(xlVisible) सेट करें अन्यथा: rCopyRange = ActiveCell End यदि एंड सब सेट करें "इस मैक्रो के साथ हम चयनित सेल से शुरू होने वाला डेटा सम्मिलित करते हैंउप My_Paste() यदि rCopyRange कुछ भी नहीं है तो उप से बाहर निकलें यदि rCopyRange.Areas.Count > 1 है तो MsgBox "चिपकाई गई श्रेणी में एक से अधिक क्षेत्र नहीं होने चाहिए!",vbक्रिटिकल, "अमान्य सीमा": रेंज के रूप में सब डिम आरसेल से बाहर निकलें, ली जितनी लंबी, उतनी लंबी, एललंबी गिनती, पूर्णांक के रूप में आईकॉल, पूर्णांक के रूप में आईकैलकुलेशन। .Columns.Count li = 0: lCount = 0:le = iCol - 1 rCopyRange.Columns(iCol).Cells में प्रत्येक rCell के लिए यदि ActiveCell.Offset(li,le).EntireColumn.Hidden = False और _ ActiveCell.Offset (ली, ले).एंटायररो.हिडन = गलत फिर आरसेल.कॉपी एक्टिवसेल.ऑफसेट(ली, ले): एलकाउंट = एलकाउंट + 1 अंत यदि ली = ली + 1 लूप जबकि एलकाउंट >= आरसेल.रो - आरकॉपीरेंज.सेल्स(1) .पंक्ति अगला आरसेल अगला आईकॉल एप्लीकेशन.स्क्रीनअपडेटिंग = सत्य: एप्लीकेशन.कैलकुलेशन = आईकैलकुलेशन एंड सब

विकल्प स्पष्ट मंद rCopyRange रेंज के रूप में "डेटा को कॉपी करने के लिए इस मैक्रो का उपयोग करें उप My_Copy() यदि चयन.गणना> 1 फिर rCopyRange = चयन.विशेषCells(xlVisible) सेट करें अन्यथा: rCopyRange = ActiveCell End यदि अंतिम उप सेट करें "पेस्ट करने के लिए इस मैक्रो का उपयोग करें चयनित सेल से शुरू होने वाला डेटा सब My_Paste() यदि rCopyRange कुछ भी नहीं है तो सब से बाहर निकलें यदि rCopyRange.Areas.Count > 1 है तो MsgBox "चिपकाए गए रेंज में एक से अधिक क्षेत्र नहीं होना चाहिए!", vbCritical, "अमान्य रेंज": बाहर निकलें सब डिम आरसेल रेंज के रूप में, ली जितनी लंबी, ली उतनी लंबी, एलगिनती जितनी लंबी, आईकॉल पूर्णांक के रूप में, आईकैलकुलेशन पूर्णांक के रूप में एप्लीकेशन.स्क्रीनअपडेटिंग = गलत आईकैलकुलेशन = एप्लीकेशन.कैलकुलेशन: एप्लीकेशन.कैलकुलेशन = -4135 आईकॉल के लिए = 1 से rCopyRange.Columns .गिनती li = 0: lCount = 0: ले = iCol - 1 rCopyRange.Columns(iCol).Cells में प्रत्येक rCell के लिए यदि ActiveCell.Offset(li,le).EntireColumn.Hidden = False और _ ActiveCell.Offset(li) , ले).एंटायररो.हिडन = गलत फिर आरसेल.कॉपी एक्टिवसेल.ऑफसेट(ली, ले): एलकाउंट = एलकाउंट + 1 अंत यदि ली = ली + 1 लूप जबकि एलकाउंट >= आरसेल.रो - आरकॉपीरेंज.सेल्स(1)। पंक्ति अगली आरसेल अगला आईकॉल एप्लीकेशन.स्क्रीनअपडेटिंग = सत्य: एप्लीकेशन.कैलकुलेशन = आईकैलकुलेशन एंड सब

चित्र को पूरा करने के लिए, इन मैक्रोज़ को हॉट कुंजियों को निर्दिष्ट करना बेहतर है (नीचे दिए गए कोड में, कोड के साथ एक पुस्तक खोलते समय यह स्वचालित रूप से किया जाता है)। ऐसा करने के लिए, आपको बस नीचे दिए गए कोड को मॉड्यूल में कॉपी करना होगा यह किताब (यह कार्यपुस्तिका) :

विकल्प स्पष्ट "कार्यपुस्तिका को बंद करने से पहले हॉटकीज़ का असाइनमेंट रद्द करें प्राइवेट सब वर्कबुक_बिफोरक्लोज़ (बूलियन के रूप में रद्द करें) एप्लीकेशन.ऑनकी "^q": एप्लीकेशन.ऑनकी "^डब्ल्यू" एंड सब "वर्कबुक खोलते समय हॉटकीज़ असाइन करें प्राइवेट सब वर्कबुक_ओपन() एप्लीकेशन .OnKey "^q", "My_Copy": एप्लिकेशन.OnKey "^w", "My_Paste" एंड सब

अब आप कुंजी दबाकर वांछित रेंज की प्रतिलिपि बना सकते हैं Ctrl + क्यू , और इसे फ़िल्टर किए गए में डालें - Ctrl + डब्ल्यू .

उदाहरण डाउनलोड करें

(46.5 KiB, 9,622 डाउनलोड)

केवल दृश्यमान कोशिकाओं को कॉपी करें और केवल दृश्यमान कोशिकाओं में ही चिपकाएँ
साइट आगंतुकों के अनुरोध पर, मैंने इस प्रक्रिया को परिष्कृत करने का निर्णय लिया। अब किसी भी श्रेणी की प्रतिलिपि बनाना संभव है: छिपी हुई पंक्तियों, छिपे हुए स्तंभों के साथ, और कॉपी की गई कोशिकाओं को किसी भी श्रेणी में चिपकाना भी संभव है: छिपी हुई पंक्तियों, छिपे हुए स्तंभों के साथ। यह बिल्कुल पिछले वाले की तरह ही काम करता है: कुंजियाँ दबाकर Ctrl + क्यू वांछित सीमा की प्रतिलिपि बनाएँ (छिपी/फ़िल्टर की गई पंक्तियों और स्तंभों के साथ या छिपा हुआ नहीं), और कीबोर्ड शॉर्टकट से पेस्ट करें Ctrl + डब्ल्यू . सम्मिलन छुपी/फ़िल्टर की गई पंक्तियों और स्तंभों में या बिना छुपे हुए भी किया जाता है।
यदि कॉपी की गई श्रेणी में सूत्र शामिल हैं, तो संदर्भ विस्थापन से बचने के लिए, आप केवल सेल मानों की प्रतिलिपि बना सकते हैं - अर्थात। मान सम्मिलित करते समय सूत्र नहीं, बल्कि उनकी गणना का परिणाम डाला जाएगा। या यदि उन कक्षों के स्वरूपों को संरक्षित करना आवश्यक है जिनमें प्रविष्टि होती है, तो केवल कक्ष मानों को कॉपी और पेस्ट किया जाएगा। ऐसा करने के लिए, आपको कोड में लाइन को बदलना होगा (नीचे दी गई फ़ाइल में):

rCell.कॉपी rResCell.Offset(lr, lc)

rCell.कॉपी rResCell.Offset(lr, lc)

इसके लिये:

rResCell.Offset(lr, lc) = rCell.Value

rResCell.Offset(lr, lc) = rCell.Value

ये दोनों पंक्तियाँ नीचे दी गई फ़ाइल में मौजूद हैं, आपको बस वह पंक्ति छोड़नी है जो आपके कार्यों के लिए अधिक उपयुक्त है।

उदाहरण डाउनलोड करें:

(54.5 KiB, 7,928 डाउनलोड)

यह भी देखें:
[]

क्या लेख से मदद मिली? अपने दोस्तों के साथ लिंक साझा करें! वीडियो ट्यूटोरियल

("बॉटम बार":("टेक्स्टस्टाइल":"स्टैटिक","टेक्स्टपोजीशनस्टैटिक":"बॉटम","टेक्स्टऑटोहाइड":ट्रू,"टेक्स्टपोजीशनमार्जिनस्टैटिक":0,"टेक्स्टपोजीशनडायनामिक":"बॉटमलेफ्ट","टेक्स्टपोजीशनमार्जिनलेफ्ट":24," textpositionmarginright":24,"textpositionmargintop":24,"textpositionmarginbottom":24,"texteffect":"slide","texteffecteasing":"easeOutCubic","texteffectduration":600,"texteffectslidedirection":"left","texteffectslideddistance" :30,"टेक्स्टइफेक्टडिले":500,"टेक्स्टइफेक्ट्सअलग":गलत,"टेक्स्टइफेक्ट1":"स्लाइड","टेक्स्टइफेक्टस्लाइडडायरेक्शन1":"राइट","टेक्स्टइफेक्ट्सस्लाइडडिस्टेंस1":120,"टेक्स्टइफेक्टेजिंग1":"ईजआउटक्यूबिक","टेक्स्टइफेक्टड्यूरेशन1":600 ,"texteffectdelay1":1000,"texteffect2":"slide","texteffectslidedirection2":"right","texteffectslidedistance2":120,"texteffecteasing2":"easeOutCubic","texteffectduration2":600,"texteffectdelay2":1500," टेक्स्टसीएसएस":"डिस्प्ले:ब्लॉक; टेक्स्ट-एलाइन:लेफ्ट;","टेक्स्टबीजीसीएसएस":"डिस्प्ले:एब्सोल्यूट; लेफ्ट:0पीएक्स; ","titlecss":"डिस्प्ले:ब्लॉक; स्थिति:रिश्तेदार; फ़ॉन्ट: बोल्ड 14px \"ल्यूसिडा सैन्स यूनिकोड\",\"ल्यूसिडा ग्रांडे\",सैंस-सेरिफ़, एरियल; रंग:#fff;","descriptioncss":"डिस्प्ले:ब्लॉक; स्थिति:रिश्तेदार; फ़ॉन्ट:12px \"ल्यूसिडा सैन्स यूनिकोड\",\"ल्यूसिडा ग्रांडे\",सैंस-सेरिफ़, एरियल; रंग:#fff; मार्जिन-टॉप:8पीएक्स;","बटनसीएसएस":"डिस्प्ले:ब्लॉक; स्थिति:रिश्तेदार; मार्जिन-टॉप:8पीएक्स;","टेक्स्टइफेक्टरेस्पॉन्सिव":सत्य,"टेक्स्टइफेक्टरेस्पॉन्सिवसाइज":640,"टाइटलसीएसएसरिस्पॉन्सिव":"फ़ॉन्ट-आकार:12पीएक्स;","डिस्क्रिप्शनसीएसएसरिस्पॉन्सिव":"डिस्प्ले:कोई नहीं !महत्वपूर्ण;","बटनसीएसएसरिस्पॉन्सिव": "","addgooglefonts":false,"googlefonts":"","textleftrightpercentforstatic":40))

यदि वर्कशीट में कुछ सेल, पंक्तियाँ या कॉलम दिखाई नहीं दे रहे हैं, तो आप सभी सेल (या केवल दृश्यमान सेल) की प्रतिलिपि बना सकते हैं। डिफ़ॉल्ट रूप से, एक्सेल न केवल दृश्यमान कोशिकाओं, बल्कि छिपी या फ़िल्टर की गई कोशिकाओं की भी प्रतिलिपि बनाता है। यदि आप केवल दृश्यमान कोशिकाओं की प्रतिलिपि बनाना चाहते हैं, तो नीचे दिए गए चरणों का पालन करें। उदाहरण के लिए, आप संरचित वर्कशीट से केवल सारांश डेटा कॉपी कर सकते हैं।

नीचे दिए गए चरणों का पालन करें.

टिप्पणी:जब आप कॉपी करते हैं, तो मानों को पंक्तियों और स्तंभों में क्रमिक रूप से डाला जाता है। यदि पेस्ट क्षेत्र में छिपी हुई पंक्तियाँ या कॉलम हैं, तो आपके द्वारा कॉपी किए गए सभी डेटा को देखने के लिए आपको उन्हें उजागर करने की आवश्यकता हो सकती है।

जब आप दृश्यमान कोशिकाओं को उस डेटा श्रेणी में कॉपी और पेस्ट करते हैं जिसमें छिपी हुई कोशिकाएँ होती हैं या जिसमें एक फ़िल्टर लागू होता है, तो आप देख सकते हैं कि छिपी हुई कोशिकाएँ दृश्यमान कोशिकाओं के साथ चिपका दी जाती हैं। दुर्भाग्य से, जब आप वेब के लिए एक्सेल में सेल की एक श्रृंखला को कॉपी और पेस्ट करते हैं तो आप इस सेटिंग को नहीं बदल सकते क्योंकि केवल दृश्यमान सेल को पेस्ट करना उपलब्ध नहीं है।

हालाँकि, यदि आप अपने डेटा को एक तालिका के रूप में प्रारूपित करते हैं और एक फ़िल्टर लागू करते हैं, तो आप केवल दृश्यमान कोशिकाओं को कॉपी और पेस्ट कर सकते हैं।

यदि आप अपने डेटा को तालिका के रूप में प्रारूपित नहीं करना चाहते हैं और आपके पास डेस्कटॉप एक्सेल स्थापित है, तो आप दृश्यमान कोशिकाओं को कॉपी और पेस्ट करने के लिए एक्सेल में कार्यपुस्तिका खोल सकते हैं। ऐसा करने के लिए, बटन पर क्लिक करें एक्सेल में खोलेंऔर केवल दृश्यमान कोशिकाओं को कॉपी और पेस्ट करने के चरणों का पालन करें।

अधिक जानकारी

आप हमेशा एक्सेल टेक कम्युनिटी विशेषज्ञ से प्रश्न पूछ सकते हैं, उत्तर समुदाय में मदद मांग सकते हैं और सुझाव भी दे सकते हैं नई सुविधाया वेबसाइट पर सुधार

एक्सेल में डेटा का चयन फ़िल्टर या सॉर्टिंग का उपयोग करके किया जाता था। अब उन्हें मुद्रित करने या किसी अन्य स्थान पर ले जाने की आवश्यकता है। एक्सेल में कॉपी करेंकॉन्फ़िगर किया गया है ताकि छिपी हुई कोशिकाओं की भी प्रतिलिपि बनाई जा सके।
आइए दो तरीकों पर विचार करें, को एक्सेल में फ़िल्टर की गई पंक्तियों को कैसे कॉपी करें।
पहला तरीका.
एक्सेल में एक बहुत बढ़िया फंक्शन है - Excel में विशेष फ़ंक्शन चिपकाएँ.
तो हमारे पास एक टेबल है.
फ़िल्टर कैसे स्थापित करें, लेख देखें "एक्सेल में फ़िल्टर करें"।
हम सूची से सभी इवानोव्स को हटाने के लिए एक फ़िल्टर का उपयोग करते हैं। यह इस प्रकार निकला।
तालिका का चयन करें और संदर्भ मेनू में "कॉपी करें" पर क्लिक करें। सेल A9 पर बायाँ-क्लिक करें और संदर्भ मेनू में "मान" चुनें।
ओके पर क्लिक करें"। वोइला. न केवल दृश्यमान पंक्तियों का मान, बल्कि कोशिकाओं का प्रारूप भी कॉपी किया गया था।
एक बारीकियां है- फ़िल्टर किए गए डेटा को उन पंक्तियों में न डालें जहां फ़िल्टर स्थित है। उदाहरण के लिए, हमारे उदाहरण में - पंक्तियों 1-7 में नहीं, बल्कि नीचे या किसी अन्य शीट पर, आदि। यदि हम उन पंक्तियों में पेस्ट करते हैं जहां फ़िल्टर स्थित है, तो फ़िल्टर किया गया डेटा भी फ़िल्टर द्वारा छिपी पंक्तियों में डाला जाएगा। सामान्य तौर पर, यह गड़बड़ हो जाएगा। दूसरा तरीका.
टेबल वही है. फ़िल्टर किए गए डेटा वाली तालिका का चयन करें. "होम" टैब पर, "संपादन" अनुभाग पर क्लिक करें Excel में फ़ंक्शंस ढूंढें और हाइलाइट करें. फिर, "जाओ" बटन पर क्लिक करें। दिखाई देने वाले संवाद बॉक्स में, "चयन करें..." बटन पर क्लिक करें। "कोशिकाओं का एक समूह चुनें" विंडो में, "केवल दृश्यमान कोशिकाएँ" के बगल में स्थित बॉक्स को चेक करें। ओके पर क्लिक करें"। अब उसी चयनित टेबल पर दाएँ माउस से हम कॉल करते हैं संदर्भ मेनू. "कॉपी करें" फ़ंक्शन पर क्लिक करें। एक नए स्थान पर (हमारे उदाहरण में, यह सेल A15 है), "सम्मिलित करें" पर क्लिक करें। सभी। यह इस प्रकार निकला।
कैसे, बिना नकल किये, तुरंत एक्सेल में फ़िल्टर डेटा प्रिंट करें, लेख "बुकमार्क" देखें एक्सेल शीट"पेज लेआउट"

केवल दृश्यमान पंक्तियों में चिपकाएँएक्सेलसंख्याएँ, सूत्र, पाठ कई तरीकों से किया जा सकता है। जब आपको तालिका की सभी पंक्तियों में संख्याएँ, सूत्र, पाठ सम्मिलित करने की आवश्यकता न हो, तो आप फ़िल्टर का उपयोग कर सकते हैं। फ़िल्टर कैसे स्थापित करें और एक्सेल में फ़िल्टर कैसे करें, लेख "एक्सेल में फ़िल्टर करें" देखें। लेकिन डेटा को केवल दृश्यमान कोशिकाओं में डालने के लिए, आपको अपनी विधियों की आवश्यकता होती है, खासकर यदि कई पंक्तियाँ हों।
पहला तरीका हैसाधारण .
आइए इस तरह की एक टेबल लें। तालिका सभी उदाहरणों के लिए समान होगी.
आइए तालिका से सभी अंक 2 को हटाने के लिए एक फ़िल्टर का उपयोग करें। शेष दृश्यमान कोशिकाओं में हम संख्या 600 डालते हैं। कोशिका बी2 में हम संख्या 600 डालते हैं, फिर इसे कॉलम के नीचे कॉपी करते हैं (सेल बी2 के निचले दाएं कोने को खींचें)। मान केवल दृश्यमान कोशिकाओं में कॉपी किए गए थे। आप इसी प्रकार फ़ॉर्मूले भी डाल सकते हैं. हम सेल C2 में निम्नलिखित सूत्र लिखते हैं। =ए2*10
यह इस प्रकार निकला।
आइए फ़िल्टर रद्द करें. परिणाम इस प्रकार एक तालिका है.
सूत्र और संख्याएँ केवल फ़िल्टर की गई पंक्तियों में डाले गए थे।
दूसरा तरीका.
हम डेटा को फ़िल्टर भी करेंगे. पहले सेल में हम कोई संख्या, सूत्र, पाठ आदि लिखते हैं। अब, यदि हजारों पंक्तियाँ हैं, तो इस तरह से कोशिकाओं का चयन करें: कुंजी "Ctrl" + "Shift" + नीचे तीर बटन (या ऊपर बटन, इस पर निर्भर करता है कि हम कहाँ कोशिकाओं का चयन करना चाहते हैं - नीचे या ऊपर) दबाएँ वह सेल जिसमें नंबर लिखा था)।
अब, या कुंजी संयोजन "Ctrl" + G, या F5 कुंजी दबाएँ। ट्रांज़िशन डायलॉग बॉक्स दिखाई देगा. "चयन करें..." बटन पर क्लिक करें। और, नए "कोशिकाओं का एक समूह चुनें" संवाद बॉक्स में, "केवल दृश्यमान कोशिकाएं" शब्दों के बगल में स्थित बॉक्स को चेक करें।ओके पर क्लिक करें"। फिर हमेशा की तरह डालें.

सेल समूह का चयन करें संवाद बॉक्स लाने का दूसरा तरीका।"होम" टैब पर, "संपादन" अनुभाग में, "ढूंढें और चुनें" बटन पर क्लिक करें। दिखाई देने वाली सूची में, "कोशिकाओं का एक समूह चुनें" फ़ंक्शन पर क्लिक करें।

को चयनित एक्सेल कॉलम में दृश्यमान सेल भरें, कुंजी संयोजन "Ctrl" + D दबाएं। और सभी चयनित कॉलम पहले सेल की तरह डेटा या सूत्र से भर जाएंगे। हमारे उदाहरण में, हमने सेल डी2, कॉलम डी में संख्या 800 लिखी है।

तीसरा तरीका.
एक नए कॉलम में (हमारे उदाहरण में, कॉलम ई), कोशिकाओं का चयन करें। F5 कुंजी दबाएँ. ट्रांज़िशन डायलॉग बॉक्स दिखाई देगा. "चयन करें..." बटन पर क्लिक करें। और, नए "कोशिकाओं का एक समूह चुनें" संवाद बॉक्स में, "केवल दृश्यमान कोशिकाएँ" शब्दों के बगल में स्थित बॉक्स को चेक करें। ओके पर क्लिक करें"। अब, चयन को रद्द किए बिना, कॉलम के पहले सेल में (हमारा E2 है), एक सूत्र, संख्या आदि दर्ज करें। कुंजी संयोजन "Ctrl" + "Enter" दबाएँ।