Excel में सेलों को बाएँ से दाएँ कैसे स्थानांतरित करें?
जब हम एक्सेल शीट में मान टाइप करते हैं, तो हम आम तौर पर उन्हें बाएं से दाएं टाइप करते हैं, लेकिन कुछ मामलों में, आप शायद उन कोशिकाओं को स्थानांतरित करना चाहते हैं जो बाएं से दाएं, दाएं से बाएं, जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है। एक्सेल में कोई अंतर्निहित सुविधा नहीं है जो आपको इसे तुरंत हल करने में मदद कर सके, लेकिन इस लेख में, मैं आपको लाभ पहुंचाने के लिए कुछ तरकीबें पेश कर रहा हूं।
VBA के साथ कोशिकाओं को बाएँ से दाएँ स्थानांतरित करें
एक्सेल के लिए कुटूल के साथ कोशिकाओं को बाएं से दाएं या ऊपर से नीचे स्थानांतरित करें
VBA के साथ कोशिकाओं को बाएँ से दाएँ स्थानांतरित करें
सूत्रों के बिना कोशिकाओं को तेजी से बाएं से दाएं स्थानांतरित करने के लिए, आप वीबीए कोड का उपयोग कर सकते हैं।
1। दबाएँ ऑल्ट + F11 सक्षम करने के लिए कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। क्लिक करें सम्मिलित करें > मॉड्यूल, नीचे दिए गए कोड को रिक्त स्क्रिप्ट पर चिपकाएँ।
वीबीए: बाएँ से दाएँ स्थानांतरित करें
Sub RearrangeColumns()
'UpdatebyExtenoffice20161125
Dim xLng, i As Long, LastRow As Long, Letters As Variant, NewLetters As Variant
Dim strTemp As String
On Error Resume Next
strTemp = Application.InputBox _
(Prompt:="Enter the column you want to transpose with comma separate", _
Title:="Kutools For Excel", Type:=2)
For i = Len(strTemp) To 1 Step -1
NewOrder = NewOrder + Mid(strTemp, i, 1)
Next i
LastRow = Cells.Find(What:="*", SearchOrder:=xlRows, _
SearchDirection:=xlPrevious, LookIn:=xlFormulas).Row
Letters = Split(NewOrder, ",")
ReDim NewLetters(1 To UBound(Letters) + 1)
Application.ScreenUpdating = False
For xLng = 0 To UBound(Letters)
NewLetters(xLng + 1) = Columns(Letters(xLng)).Column
Next
Application.ScreenUpdating = True
Range("A1").Resize(LastRow, UBound(Letters) + 1) = _
Application.Index(Cells, Evaluate("ROW(1:" & LastRow & ")"), NewLetters)
End Sub
3। दबाएँ F5 कोड को चलाने के लिए कुंजी, आपके लिए कॉलम अक्षरों को दर्ज करने के लिए एक संवाद पॉप आउट होता है जिसे आप स्थानांतरित करना चाहते हैं। कृपया इन कॉलम अक्षरों को नीचे स्क्रीनशॉट में दिखाए अनुसार अल्पविराम से अलग करें।
4। क्लिक करें OK. अब चयन को बाएँ से दाएँ स्थानांतरित कर दिया गया है।
एक्सेल के लिए कुटूल के साथ कोशिकाओं को बाएं से दाएं या ऊपर से नीचे स्थानांतरित करें
यदि आपके पास एक्सेल के लिए कुटूल स्थापित है, तो आप अपनी आवश्यकता के अनुसार इसकी फ्लिप वर्टिकल रेंज और फ्लिप हॉरिजॉन्टल रेंज उपयोगिताओं के साथ कोशिकाओं को बाएं से दाएं या ऊपर से नीचे स्थानांतरित कर सकते हैं।
एक्सेल के लिए कुटूल, से अधिक के साथ 300 सुविधाजनक कार्य, आपके कार्यों को और अधिक आसान बनाते हैं। |
स्थापित करने के बाद Excel के लिए Kutools, कृपया नीचे दिए अनुसार कार्य करें:(एक्सेल के लिए अभी नि:शुल्क कुटूल डाउनलोड करें!)
उन कोशिकाओं का चयन करें जिन्हें आप बाएँ से दाएँ या ऊपर से नीचे स्थानांतरित करना चाहते हैं, क्लिक करें कुटूल > रेंज > क्षैतिज सीमा को पलटें/वर्टिकल रेंज पलटें > सब or केवल फ़्लिप मान. स्क्रीनशॉट देखें:
क्षैतिज रेंज पलटें > सभी: |
क्षैतिज फ़्लिप करें > केवल फ़्लिप मान: |
लंबवत रेंज पलटें > सभी: |
फ़्लिप वर्टिकल रेंज > केवल फ़्लिप मान:
|
डेटा पलटें
आपकी इसमें रुचि हो सकती है:
- एक्सेल में ऑटो फिल डाउन/राइट करते समय संदर्भ को कैसे स्थानांतरित करें?
- Excel में मानों को कैसे स्थानांतरित और लिंक करें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!