मुख्य सामग्री पर जाएं

एक्सेल में अल्पविराम से अलग किए गए मानों को पंक्तियों या स्तंभों में कैसे विभाजित करें?

लेखक: सिलुविया अंतिम संशोधित: 2020-04-23

कुछ मामलों में, आपको चयनित कोशिकाओं के अल्पविराम से अलग किए गए मानों को पंक्तियों या स्तंभों में विभाजित करने की आवश्यकता हो सकती है। यहां हम आपके लिए इस समस्या को विस्तार से हल करने के लिए तीन तरीकों का परिचय देंगे।

टेक्स्ट टू कॉलम फ़ंक्शन के साथ अल्पविराम से अलग किए गए मानों को कॉलम में विभाजित करें
अल्पविराम से अलग किए गए मानों को VBA कोड के साथ पंक्तियों में विभाजित करें
एक्सेल के लिए कुटूल के साथ अल्पविराम से अलग किए गए मानों को पंक्तियों या स्तंभों में त्वरित रूप से विभाजित करें


टेक्स्ट टू कॉलम फ़ंक्शन के साथ अल्पविराम से अलग किए गए मानों को कॉलम में विभाजित करें

आप चयनित सेल के अल्पविराम से अलग किए गए मानों को कॉलम में विभाजित करने के लिए टेक्स्ट टू कॉलम फ़ंक्शन लागू कर सकते हैं। कृपया निम्नानुसार करें.

1. उन कक्षों की श्रेणी का चयन करें जिन्हें आप मानों को स्तंभों में विभाजित करना चाहते हैं, और फिर क्लिक करें जानकारी > कॉलम से टेक्स्ट. स्क्रीनशॉट देखें:

2. प्रथम में टेक्स्ट को कॉलम विजार्ड में बदलें संवाद बॉक्स, का चयन करें सीमांकित विकल्प, और फिर क्लिक करें अगला बटन.

3. दूसरे में टेक्स्ट को कॉलम विजार्ड में बदलें डायलॉग बॉक्स, केवल चेक करें अल्पविराम इन बॉक्स सीमांकक अनुभाग पर क्लिक करें, और क्लिक करें अगला बटन.

4. आख़िर में टेक्स्ट को कॉलम विजार्ड में बदलें संवाद बॉक्स में, विभाजन मानों का पता लगाने के लिए एक सेल का चयन करें गंतव्य बॉक्स, और अंत में क्लिक करें अंत बटन। स्क्रीनशॉट देखें:

अब चयनित कोशिकाओं में सभी मान जो अल्पविराम से अलग किए गए थे, नीचे स्क्रीनशॉट में दिखाए गए अनुसार अलग-अलग कॉलम में विभाजित हो गए हैं।

आम तौर पर, इस कॉलम को टेक्स्ट सुविधा केवल कोशिकाओं को अलग-अलग स्तंभों में विभाजित करती है, यदि आप कोशिकाओं को पंक्तियों में विभाजित करना चाहते हैं, तो आप कैसे कर सकते हैं?
यहां एक्सेल के लिए कुटूल's विभाजन कोशिकाओं उपयोगिता आपको रिक्त स्थान, अल्पविराम, नई लाइन, अन्य विभाजक या निश्चित चौड़ाई के आधार पर कोशिकाओं को न केवल अलग पंक्तियों में, बल्कि एक्सेल में कॉलम में विभाजित करने में मदद कर सकती है। एक्सेल के लिए कुटूल अभी डाउनलोड करें! (30 दिन का निःशुल्क ट्रेल)


अल्पविराम से अलग किए गए मानों को VBA कोड के साथ पंक्तियों में विभाजित करें

अल्पविराम से अलग किए गए मानों को पंक्तियों में विभाजित करने के लिए, आप निम्नलिखित VBA कोड लागू कर सकते हैं।

1। दबाएं ऑल्ट + F11 खोलने के लिए एक साथ कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल. फिर नीचे दिए गए VBA कोड को कॉपी करके मॉड्यूल विंडो में पेस्ट करें।

वीबीए कोड: अल्पविराम से अलग किए गए मानों को पंक्तियों में विभाजित करें

Sub SplitAll()
	Dim xRg As Range
	Dim xRg1 As Range
	Dim xCell As Range
	Dim I As Long
	Dim xAddress As String
	Dim xUpdate As Boolean
	Dim xRet As Variant
	On Error Resume Next
	xAddress = Application.ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
	Set xRg  = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
	If xRg Is Nothing Then Exit Sub
		If xRg.Columns.Count > 1 Then
			MsgBox "You can't select multiple columns", , "Kutools for Excel"
			Exit Sub
			End If
			Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
			Set xRg1 = xRg1.Range("A1")
			If xRg1 Is Nothing Then Exit Sub
				xUpdate = Application.ScreenUpdating
				Application.ScreenUpdating = False
				For Each xCell In xRg
					xRet = Split(xCell.Value, ",")
					xRg1.Worksheet.Range(xRg1.Offset(I, 0), xRg1.Offset(I + UBound(xRet, 1), 0)) = Application.WorksheetFunction.Transpose(xRet)
					I = I + UBound(xRet, 1) + 1
				Next
				Application.ScreenUpdating = xUpdate
			End Sub

3। दबाएं F5 कोड चलाने की कुंजी. पॉप अप में एक्सेल के लिए कुटूल संवाद बॉक्स में, उन कक्षों का चयन करें जिन्हें आप विभाजित करना चाहते हैं, और फिर क्लिक करें OK बटन.

4. दूसरे पॉप अप में एक्सेल के लिए कुटूल संवाद बॉक्स में, विभाजन मानों का पता लगाने के लिए एक सेल का चयन करें, फिर क्लिक करें OK.

फिर आप देख सकते हैं कि चयनित कोशिकाओं में अल्पविराम से अलग किए गए मान पंक्तियों में विभाजित हो गए हैं जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है।


एक्सेल के लिए कुटूल के साथ अल्पविराम से अलग किए गए मानों को पंक्तियों या स्तंभों में त्वरित रूप से विभाजित करें

The विभाजन कोशिकाओं की उपयोगिता एक्सेल के लिए कुटूल अल्पविराम से अलग किए गए मानों को पंक्तियों या स्तंभों में आसानी से विभाजित करने में आपकी सहायता कर सकता है।

1. उन कोशिकाओं का चयन करें जिन्हें आपको विभाजित करना है, और फिर क्लिक करें कुटूल > विलय और विभाजन > विभाजन कोशिकाओं. स्क्रीनशॉट देखें:

2। में विभाजन कोशिकाओं संवाद बॉक्स में, चयन करें पंक्तियों में विभाजित करें or स्तंभों में विभाजित करें में प्रकार आपकी आवश्यकतानुसार अनुभाग। और इसमें एक विभाजक निर्दिष्ट करें अनुभाग में, चुनें अन्य विकल्प, टेक्स्टबॉक्स में अल्पविराम चिह्न दर्ज करें और फिर क्लिक करें OK बटन। स्क्रीनशॉट देखें:

3 .और फिर एक अन्य प्रॉम्प्ट बॉक्स आपको याद दिलाने के लिए निकलेगा कि परिणाम आउटपुट करने के लिए एक सेल का चयन करें, स्क्रीनशॉट देखें:

4। क्लिक करें OK बटन, आप नीचे दिखाए गए स्क्रीनशॉट के अनुसार परिणाम देख सकते हैं।

स्तंभों में विभाजित करें

पंक्तियों में विभाजित करें

  यदि आप इस उपयोगिता का निःशुल्क परीक्षण (30-दिन) चाहते हैं, कृपया इसे डाउनलोड करने के लिए क्लिक करें, और फिर उपरोक्त चरणों के अनुसार ऑपरेशन लागू करने के लिए जाएं।


डेमो: एक्सेल के लिए कुटूल के साथ त्वरित रूप से अल्पविराम से अलग किए गए मानों को पंक्तियों या स्तंभों में विभाजित करें

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖 कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
सुपर लुकअप: एकाधिक मानदंड VLookup    मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार    कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल    सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
शीर्ष 15 टूलसेट12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

Description


ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (11)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
A jak zmienić kod żeby nie pytał o ustawienie się w A1 i potem aby wynik był np też od A1 w dół
This comment was minimized by the moderator on the site
Hi Bartek,
You mean don't want to pop up the second dialog to select the target cell, and want to specify the target cell in the code directly?
If so, you need to change the following lines.
For example, you need to start outputting results from B1 and automatically fill down.
Please change this line:
Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
to
Set xRg1 = Application.Range("B2")
And then remove the next line:
Set xRg1 = xRg1.Range("A1")
This comment was minimized by the moderator on the site
i still cant upload my csv into 365
This comment was minimized by the moderator on the site
Go to excel file Data option -> text to column->delimited -> Done
it will spit comma separated value into individual column
example
id name add
1 Ratnesh myAdd
2,Yog,myAdd
we will apply in the 2nd record it will split record like 1st records,
Thanks,
Ratnesh Sahu
This comment was minimized by the moderator on the site
Go to excel file Data option -> text to column->delimited -> Done
it will spit comma separated value into individual column
example

id name add

1 Ratnesh myAdd

2,Yog,myAdd


we will apply in the 2nd record it will split record like 1st records,


Thanks,
Ratnesh Sahu
This comment was minimized by the moderator on the site
Thanks it helped :)
This comment was minimized by the moderator on the site
This is amazing, thanks for making it free and easy to use!
This comment was minimized by the moderator on the site
Thank you!
This comment was minimized by the moderator on the site
Alternately for separating into rows, use the text to column steps and then copy & paste ->transpose to turn the columns into rows.
This comment was minimized by the moderator on the site
Thanks Jake! This is what I was looking for. :)
This comment was minimized by the moderator on the site
Good one, the utility help me a lot. Thanks for that... :)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations