كيف تجبر إدخال النص بأحرف كبيرة في مربع نص؟
في Excel ، يمكننا تحويل الأحرف الصغيرة بسرعة إلى أحرف كبيرة في نص الخلية باستخدام وظيفة UPPER ، ولكن هل سبق لك أن حاولت إجبار النص المدخل على أن يكون أحرفًا كبيرة في مربع نص؟ في هذه المقالة ، سأقدم رمزًا بسيطًا لإنهاء هذه المهمة.
فرض الأحرف الكبيرة لإدخال النص في مربع نص برمز VBA
فرض الأحرف الكبيرة لإدخال النص في مربع نص برمز VBA
إجبار النص على إدخاله كأحرف كبيرة في مربع نص ، قد يكون رمز VBA التالي مفيدًا لك:
1. أولاً ، أدخل مربع النص بالنقر فوق المطور > إدراج > مربع نص (عنصر تحكم ActiveX)، ثم ارسم مربع نص حسب حاجتك ، انظر الصورة:
2. بعد إدخال مربع النص ، انقر بزر الماوس الأيمن فوقه واختر عرض الرمز من قائمة السياق لفتح ملف ميكروسوفت فيسوال باسيك للتطبيقات window ، ثم استبدل الكود الأصلي برمز VBA التالي في الوحدة النمطية الفارغة:
رمز فبا: فرض النص على أحرف كبيرة في مربع النص:
Private Sub TextBox1_Change()
TextBox1.Text = UCase(TextBox1.Text)
End Sub
3. ثم احفظ وأغلق نافذة الكود ، واخرج من ملف وضع التصميم، الآن ، عندما تكتب نصًا في مربع النص ، فسيتم إجباره على الإدخال كأحرف كبيرة ، انظر لقطة الشاشة:
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!