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

टेक्स्टबॉक्स में टेक्स्ट प्रविष्टि के अपरकेस को कैसे बाध्य करें?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2017-01-16

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

VBA कोड के साथ टेक्स्टबॉक्स में टेक्स्ट प्रविष्टि के अपरकेस को बाध्य करें


तीर नीला दायां बुलबुला VBA कोड के साथ टेक्स्टबॉक्स में टेक्स्ट प्रविष्टि के अपरकेस को बाध्य करें

टेक्स्टबॉक्स में टेक्स्ट को अपरकेस के रूप में दर्ज करने के लिए मजबूर करना, निम्नलिखित वीबीए कोड आपके लिए उपयोगी हो सकता है:

1. सबसे पहले, क्लिक करके टेक्स्टबॉक्स डालें डेवलपर > सम्मिलित करें > टेक्स्ट बॉक्स (एक्टिवएक्स कंट्रोल), और फिर अपनी आवश्यकतानुसार एक टेक्स्टबॉक्स बनाएं, स्क्रीनशॉट देखें:

दस्तावेज़ टेक्स्टबॉक्स अपरकेस 1

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

वीबीए कोड: टेक्स्ट को टेक्स्टबॉक्स में अपरकेस होने के लिए बाध्य करें:

Private Sub TextBox1_Change()
    TextBox1.Text = UCase(TextBox1.Text)
End Sub

दस्तावेज़ टेक्स्टबॉक्स अपरकेस 2

3. फिर कोड विंडो को सहेजें और बंद करें, और बाहर निकलें डिज़ाइन मोड, अब, जब आप टेक्स्टबॉक्स में टेक्स्ट टाइप करते हैं, तो इसे अपरकेस के रूप में दर्ज करने के लिए मजबूर किया जाएगा, स्क्रीनशॉट देखें:

दस्तावेज़ टेक्स्टबॉक्स अपरकेस 3

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations