एक्सेल में मानदंड के आधार पर पंक्तियों को कॉलम में कैसे स्थानांतरित करें (2 तरीके)

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

एक्सेल में मानदंड के आधार पर पंक्तियों को कॉलम में स्थानांतरित करने के लिए 2 आसान दृष्टिकोण

हमने नीचे दिए गए आंकड़े में कई उत्पादों और उनकी मात्रा का डेटा सेट शामिल किया है। फिर पंक्तियों को स्तंभों में स्थानांतरित कर दिया जाएगा। हम मानदंडों के आधार पर पंक्तियों को स्तंभों में स्थानांतरित करेंगे अद्वितीय मानों का क्योंकि एक अलग सेल में कुछ डुप्लिकेट प्रविष्टियाँ हैं। सबसे पहले, हम INDEX . का उपयोग करेंगे , मिलान , COUNTIF , अगर , और IFERROR सूत्र बनाने का कार्य करता है। हम एक VBA . भी निष्पादित करेंगे एक ही चीज़ को पूरा करने के लिए कोड।

शुरुआत में, हम INDEX . के सूत्र लागू करेंगे , मिलान , COUNTIF , अगर , और IFERROR सरणियों के साथ कार्य करता है।

चरण 1:INDEX, MATCH, और COUNTIF फ़ंक्शन सम्मिलित करें

• सेल में E5 , अद्वितीय उत्पाद प्राप्त करने के लिए निम्न सूत्र टाइप करें।

चरण 2:सरणी लागू करें

• सूत्र को सरणी के साथ लागू करने के लिए,  Ctrl  press दबाएं + शिफ्ट + दर्ज करें 

• इसलिए, आपको पहला अनूठा परिणाम मिलेगा।

चरण 3:कक्षों को स्वतः भरें

• सभी अद्वितीय मान प्राप्त करने के लिए, स्वतः भरण . का उपयोग करें कॉलम को स्वतः भरने के लिए हैंडल टूल।

चरण 4:IFERROR फ़ंक्शन दर्ज करें

• मात्राओं के पंक्ति मान को कॉलम में बदलने के लिए, निम्न सूत्र लिखें।

चरण 5:सरणी लागू करें

• एक सरणी सम्मिलित करने के लिए,  Ctrl दबाएं +  शिफ्ट + दर्ज करें ।

• परिणामस्वरूप, सेल F5 नीचे दिखाए गए चित्र के अनुसार पहला ट्रांसपोज़्ड मान दिखाएगा।

• स्वतः भरण हैंडल टूल के साथ नीचे खींचें कॉलम को स्वतः भरने के लिए।

• आखिरकार, ऑटोफिल हैंडल टूल के साथ पंक्तियों को स्वतः भरें ।
• इसलिए, सभी ट्रांसपोज़्ड पंक्तियां नीचे दिखाए गए चित्र के अनुसार कॉलम में बदल जाएंगी।

और पढ़ें:समूह में एकाधिक पंक्तियों को Excel में स्तंभों में स्थानांतरित करें

समान रीडिंग

• डुप्लिकेट पंक्तियों को एक्सेल में कॉलम में कैसे स्थानांतरित करें (4 तरीके)
• Excel VBA:समूह में एकाधिक पंक्तियों को कॉलम में स्थानांतरित करें
• एक्सेल में एक से अधिक कॉलमों को एक कॉलम में स्थानांतरित करें (3 आसान तरीके)
• एक्सेल में रिवर्स ट्रांसपोज़ कैसे करें (3 आसान तरीके)

चरण 1:एक मॉड्यूल बनाएं

• सबसे पहले,  Alt press दबाएं +  F11 VBA मैक्रो शुरू करने के लिए ।
• सम्मिलित करें पर क्लिक करें ।
• एक मॉड्यूल बनाने के लिए , मॉड्यूल  . चुनें विकल्प।

चरण 2:VBA कोड टाइप करें

• निम्न चिपकाएं VBA

Sub TransposeRows()
'Define Variables
 Dim RowsNumber As Long
 Dim p As Long
 Dim xColCr As String
 Dim xColumn As New Collection
 Dim InputRng As Range
 Dim OutputRng As Range
 Dim RngText As String
 Dim CountRow As Long
 Dim xRowRg As Range
 On Error Resume Next
'Set values and Input Box fot Input Range
 RngText = ActiveWindow.RangeSelection.Address
 Set InputRng = Application.InputBox("Select Your Input Range for 2 columns:", "ExcelDemy", RngText, , , , , 8)
 Set InputRng = Application.Intersect(InputRng, InputRng.Worksheet.UsedRange)
'Apply Condition to count only 2 columns and to show msg box for alerting to select only two columns
 If InputRng Is Nothing Then Exit Sub
 If (InputRng.Columns.Count <> 2) Or _
 (InputRng.Areas.Count > 1) Then
 MsgBox "The specified range is only area for 2 columns ", , "ExcelDemy"
 Exit Sub
 End If
'Set values and Input Box fot Input Range
 Set OutputRng = Application.InputBox("Select Your Output Range (one cell):", "ExcelDemy", RngText, , , , , 8)
 If OutputRng Is Nothing Then Exit Sub
 Set OutputRng = OutputRng.Range(1)
'Count Rows
 RowsNumber = InputRng.Rows.Count
'Apply For loop
 For p = 2 To RowsNumber
 xColumn.Add InputRng.Cells(p, 1).Value, InputRng.Cells(p, 1).Value
 Next
 Application.ScreenUpdating = False
 For p = 1 To xColumn.Count
 xColCr = xColumn.Item(p)
 OutputRng.Offset(p, 0) = xColCr
 InputRng.AutoFilter Field:=1, Criteria1:=xColCr
 Set xRowRg = InputRng.Range("B2:B" & RowsNumber).SpecialCells(xlCellTypeVisible)
 If xRowRg.Count > CountRow Then CountRow = xRowRg.Count
'Copy and paste with transpose
 InputRng.Range("B2:B" & RowsNumber).SpecialCells(xlCellTypeVisible).Copy
 OutputRng.Offset(p, 1).PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
 Application.CutCopyMode = False
 Next
 OutputRng = InputRng.Cells(1, 1)
 OutputRng.Offset(0, 1).Resize(1, CountRow) = InputRng.Cells(1, 2)
 InputRng.Rows(1).Copy
 OutputRng.Resize(1, CountRow + 1).PasteSpecial Paste:=xlPasteFormats
 InputRng.AutoFilter
 Application.ScreenUpdating = True
End Sub

चरण 3:कार्यक्रम चलाएं

• पहले, सहेजें और  F5 . दबाएं कार्यक्रम चलाने के लिए।
• शीर्षक के साथ अपना डेटा सेट चुनें।
• ठीक पर क्लिक करें ।

• आउटपुट प्राप्त करने के लिए एक सेल का चयन करें
• फिर, ठीक . पर क्लिक करें ।

• परिणामस्वरूप, आपको ऐसे परिणाम प्राप्त होंगे जो पंक्तियों को स्तंभों में बदल देते हैं, जैसा कि नीचे दी गई छवि में दिखाया गया है।

और पढ़ें:Excel VBA (4 आदर्श उदाहरण) का उपयोग करके पंक्तियों को स्तंभों में कैसे स्थानांतरित करें

निष्कर्ष

मुझे उम्मीद है कि इस लेख ने आपको एक्सेल में मानदंड के आधार पर पंक्तियों को कॉलम में स्थानांतरित करने के बारे में एक ट्यूटोरियल दिया है। . इन सभी प्रक्रियाओं को सीखा जाना चाहिए और आपके डेटासेट पर लागू किया जाना चाहिए। अभ्यास कार्यपुस्तिका पर एक नज़र डालें और इन कौशलों का परीक्षण करें। हम आपके बहुमूल्य समर्थन के कारण इस तरह के ट्यूटोरियल बनाते रहने के लिए प्रेरित हैं।

यदि आपके कोई प्रश्न हैं - बेझिझक हमसे पूछें। साथ ही, बेझिझक नीचे दिए गए अनुभाग में टिप्पणी करें।

हम, महामहिम टीम, आपके प्रश्नों का हमेशा जवाब देती है।

हमारे साथ रहें और सीखते रहें।

संबंधित लेख

• पावर क्वेरी का उपयोग करके एक्सेल में कॉलम को पंक्तियों में बदलें
• सेल वैल्यू के आधार पर एक्सेल में कॉलम को पंक्तियों में कैसे बदलें
• VBA एक्सेल में पंक्तियों में एकाधिक स्तंभों को स्थानांतरित करने के लिए (2 तरीके)
• एकल उद्धरणों के साथ कॉलम को अल्पविराम से अलग की गई सूची में कैसे बदलें
• Excel Paste Transpose Shortcut:उपयोग करने के 4 आसान तरीके
• एक्सेल ट्रांसपोज़ फ़ॉर्मूला बिना संदर्भ बदले (4 आसान तरीके)
• Excel VBA (3 तरीके) में ट्रांसपोज़ कैसे करें