एक्सेल में हर दूसरी पंक्ति को कॉलम में कैसे ले जाएं
क्या आपने कभी एक्सेल में हर दूसरी पंक्ति के डेटा को एक कॉलम में ले जाने की कोशिश की है, जैसे हर विषम पंक्ति को एक कॉलम में ले जाना, और हर सम पंक्ति को दूसरे कॉलम में ले जाना, जो नीचे स्क्रीनशॉट के रूप में दिखाया गया है। यहां मुझे कुछ तरकीबें मिलीं जो इस समस्या से निपट सकती हैं।
सूत्र के साथ हर दूसरी पंक्ति को कॉलम में ले जाएँ
VBA के साथ हर दूसरी पंक्ति को कॉलम में ले जाएँ
एक्सेल के लिए कुटूल के साथ हर दूसरी पंक्ति को कॉलम में ले जाएं
सूत्र के साथ हर दूसरी पंक्ति को कॉलम में ले जाएँ
अधिकांश एक्सेल उपयोगकर्ताओं के लिए, एक्सेल में समस्या को हल करने के लिए फॉर्मूला का उपयोग करना सबसे आसान तरीका है।
1. अपने डेटा के आगे एक सेल चुनें और यह फॉर्मूला टाइप करें =IF(ISEVEN(ROW(B2)),B2,"") (बी2 उस डेटा को इंगित करता है जिसे आप प्राप्त करना चाहते हैं) और दबाएँ दर्ज कुंजी फिर इस सूत्र का उपयोग करके इच्छित सीमा को भरने के लिए स्वतः भरण को खींचें। अब इस कॉलम में हर दूसरी पंक्ति का डेटा आ गया है।
2. फिर उपरोक्त कॉलम के आगे दूसरे सेल का चयन करें और इस फॉर्मूले को टाइप करें =IF(ISODD(ROW(B3)),B3,"") (बी3 वह डेटा है जिसे आप प्राप्त करना चाहते हैं) इसमें डालें और दबाएँ दर्ज कुंजी फिर इस सूत्र का उपयोग करके इच्छित सीमा को भरने के लिए स्वतः भरण को खींचें। अब इस कॉलम में हर तीसरी पंक्ति का डेटा आ गया है।
VBA के साथ हर दूसरी पंक्ति को कॉलम में ले जाएँ
अनुवर्ती VBA हर दूसरी पंक्ति को कॉलम में भी ले जा सकता है।
1। दबाएँ F11 + ऑल्ट एम खोलने के लिए कीबोर्ड पर कुंजियाँ एक साथअनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। तब दबायें सम्मिलित करें > मॉड्यूल एक नई मॉड्यूल विंडो सम्मिलित करने के लिए। और फिर फॉलो VBA कोड को विंडो पर कॉपी करें।
वीबीए: हर दूसरी पंक्ति को कॉलम में ले जाएं।
Sub MoveRange()
'Updateby20140730A
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set InputRng = InputRng.Columns(1)
For i = 1 To InputRng.Rows.Count Step 2
OutRng.Resize(1, 2).Value = Array(InputRng.Cells(i, 1).Value, InputRng.Cells(i + 1, 1).Value)
Set OutRng = OutRng.Offset(1, 0)
Next
End Sub
3। क्लिक करें रन बटन या F5 कुंजीपटल पर कुंजी, और स्थानांतरित करने के लिए एक सीमा का चयन करने के लिए एक संवाद पॉप आउट हो जाता है। स्क्रीनशॉट देखें:
4। तब दबायें OK परिणाम आउटपुट करने के लिए सेल का चयन करने हेतु अन्य संवाद दिखाने के लिए। स्क्रीनशॉट देखें:
5। क्लिक करें OK, और आप नीचे दिखाए गए परिणाम देख सकते हैं:
एक्सेल के लिए कुटूल के साथ हर दूसरी पंक्ति को कॉलम में ले जाएं
सूत्रों और VBA के अलावा, यदि आपने स्थापित किया है एक्सेल के लिए कुटूल, आप इसका उपयोग कर सकते हैं ट्रांसफ़ॉर्म रेंज हर दूसरी पंक्ति को तुरंत कॉलम में ले जाने की सुविधा।
एक्सेल के लिए कुटूल इसमें 300 से अधिक उपयोगी एक्सेल टूल शामिल हैं। 30 दिनों में बिना किसी सीमा के प्रयास करने के लिए निःशुल्क। अब समझे
1. वह सीमा चुनें जिसे आप हर दूसरी पंक्ति में ले जाना चाहते हैं, और क्लिक करें कुटूल > रेंज कनवर्टर > ट्रांसफ़ॉर्म रेंज. स्क्रीनशॉट देखें:
2। में ट्रांसफ़ॉर्म रेंज संवाद, जांचें श्रेणी के लिए एकल स्तंभ in रूपांतरण प्रकार अनुभाग, और जाँच करें निर्धारित मूल्य फिर चुनें या दर्ज करें 2 सूची में प्रति रिकॉर्ड पंक्तियाँ अनुभाग। स्क्रीनशॉट देखें:
3। क्लिक करें Ok परिणाम निकालने के लिए एकल कक्ष का चयन करने के लिए एक संवाद खोलने के लिए, स्क्रीनशॉट देखें:
4। तब दबायें OK. आप परिणाम नीचे दिखाए अनुसार देख सकते हैं:
ट्रांसफॉर्म रेंज के बारे में अधिक जानकारी के लिए।
संबंधित लेख:
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!