Excel में किसी टेक्स्टबॉक्स के चयनित होने पर उसके टेक्स्ट का स्वत: चयन कैसे करें?
टेक्स्टबॉक्स (एक्टिवएक्स कंट्रोल) में टेक्स्ट हटाने के लिए, सबसे पहले, आपको टेक्स्टबॉक्स के अंदर सभी टेक्स्ट का चयन करना होगा। यह आलेख एक्सेल में टेक्स्टबॉक्स पर क्लिक करने पर टेक्स्टबॉक्स के सभी टेक्स्ट को स्वचालित रूप से चुनने के बारे में बात कर रहा है।
जब किसी टेक्स्टबॉक्स को VBA कोड के साथ चुना जाता है तो टेक्स्ट का स्वतः चयन करें
जब किसी टेक्स्टबॉक्स को VBA कोड के साथ चुना जाता है तो टेक्स्ट का स्वतः चयन करें
एक्सेल में टेक्स्टबॉक्स का चयन करते समय टेक्स्टबॉक्स के सभी टेक्स्ट को स्वचालित रूप से चुनने के लिए कृपया नीचे दिए गए VBA कोड को लागू करें।
1. जिस वर्कशीट में टेक्स्टबॉक्स है, उसके लिए आप उसके टेक्स्ट को स्वत: चयनित कर देंगे, कृपया क्लिक करके डिज़ाइन मोड चालू करें डेवलपर > डिजाइन मोड. स्क्रीनशॉट देखें:
या आप क्लिक करके टेक्स्टबॉक्स भी डाल सकते हैं डेवलपर > सम्मिलित करें > टेक्स्ट बॉक्स (एक्टिवएक्स कंट्रोल). स्क्रीनशॉट देखें:
2. टेक्स्टबॉक्स पर राइट-क्लिक करें और क्लिक करें कोड देखें संदर्भ मेनू से. स्क्रीनशॉट देखें:
3. उद्घाटन में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, कृपया कोड विंडो में मूल VBA कोड को नीचे दिए गए VBA कोड से बदलें।
वीबीए कोड: किसी टेक्स्टबॉक्स पर क्लिक करने पर स्वचालित रूप से उसके टेक्स्ट का चयन करें
Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, _
ByVal X As Single, ByVal Y As Single)
Call SelTextBox(Me.TextBox1.Object)
End Sub
Sub SelTextBox(xTextBox As Object)
With xTextBox
.SelStart = 0
.SelLength = Len(.Text)
End With
End Sub
नोट्स:
1. कोड में, टेक्स्टबॉक्स1 यह उस टेक्स्टबॉक्स का नाम है जिससे आप सामग्री साफ़ करेंगे। कृपया इसे अपने अनुसार बदलें।
2. एकाधिक टेक्स्टबॉक्स पर क्लिक करते समय उनके टेक्स्ट को स्वचालित रूप से चुनने के लिए, कृपया उपरोक्त कोड में दो अनुभागों के बीच नीचे VBA कोड जोड़ें। और TextBox2 को अपने आवश्यक टेक्स्टबॉक्स के नाम में बदलें।
Private Sub TextBox2_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Call SelTextBox(Me.TextBox2.Object)
End Sub
4। दबाएं ऑल्ट + Q बाहर निकलने के लिए कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
5. डिज़ाइन मोड बंद करें.
अब से, टेक्स्टबॉक्स पर क्लिक करने पर, टेक्स्टबॉक्स के अंदर के सभी टेक्स्ट स्वचालित रूप से चयनित हो जाएंगे।
संबंधित आलेख:
- एक्सेल में टाइप करते समय टेक्स्टबॉक्स को स्वतः पूर्ण कैसे करें?
- एक्सेल में क्लिक करने पर टेक्स्टबॉक्स की सामग्री को कैसे साफ़ करें?
- Excel में एकाधिक कक्षों के पाठों को एक टेक्स्टबॉक्स में कैसे संयोजित करें?
- एक्सेल में उपयोगकर्ता इनपुट को रोकने के लिए टेक्स्टबॉक्स में संपादन को कैसे अक्षम करें?
- एक्सेल में टेक्स्टबॉक्स को प्रतिशत के रूप में कैसे प्रारूपित करें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!