Excel में कक्षों के सभी नंबरों को X से कैसे बदलें?
जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है, एक्सेल में सेल के सभी नंबरों को x से कैसे बदलें? इस आलेख में दी गई विधि आपको समस्या को हल करने में मदद करेगी।
कक्षों में सभी संख्याओं को x के साथ VBA कोड से बदलें
कक्षों में सभी संख्याओं को x के साथ VBA कोड से बदलें
निम्नलिखित वीबीए कोड आपको एक्सेल में चयनित सेल में सभी नंबरों को एक्स से बदलने में मदद कर सकता है। कृपया निम्नानुसार करें.
1. उन कक्षों का चयन करें जिनमें वे संख्याएँ हैं जिन्हें आप x से प्रतिस्थापित करेंगे, और फिर दबाएँ ऑल्ट + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल. फिर नीचे दिए गए VBA कोड को कोड विंडो में कॉपी करें।
वीबीए कोड: एक्सेल में चयनित श्रेणी के सभी नंबरों को x से बदलें
Sub ReplaceNoX()
Dim cell As Object
Dim val As String
Dim i As Integer
Dim n As String
Application.ScreenUpdating = False
For Each cell In Selection
If IsNumeric(cell.Value) Then
val = cell.Text
For i = 1 To Len(val)
n = Mid(val, i, 1)
If "0" <= n And n <= "9" Then
Mid(val, i, 1) = "x"
End If
Next
cell.Formula = val
End If
Next
Application.ScreenUpdating = True
End Sub3। दबाएं F5 कोड चलाने की कुंजी. फिर आप देख सकते हैं कि चयनित सेल में सभी नंबरों को x से बदल दिया गया है जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है।
संबंधित आलेख:
- Excel में सभी रिक्त कक्षों को निश्चित संख्या या पाठ से कैसे खोजें और बदलें?
- Excel में कक्षों में अल्पविरामों को न्यूलाइन्स (Alt + Enter) से कैसे बदलें?
- Excel में लाइन ब्रेक को br से कैसे बदलें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
