اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الكتابة فقط بالاحرف الكبيرة في الخلية


الردود الموصى بها

السلام عليكم ورحمة الله وبركاته

ماهي طريقة جعل النص في الخلية او الخلايا التي أقوم بتحديدها في حالة الأحرف الكبيرة او الصغيرة (Upper Case / Lower Case )

رابط هذا التعليق
شارك

السلام عليكم

هذا الكود في حدث الصفحه

اذا كنت تريد الكلمة بمجملها

بمجرد الخروج من الخليه يغير الخط من اسمول الى كبتل


Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("A1:F1")) Is Nothing Then

	  Target.Value = UCase(Target.Value)

End If

End Sub

وهذا الكود بمودويل يغير نطاق تحدده في الكود من اسمول الى كبتل

Sub THOEEL()

   For Each CEL In Range("A3:F3")

	  CEL.Value = UCase(CEL.Value)

   Next

End Sub

رابط هذا التعليق
شارك

اخى

قم بفتح الفاجول بيزك altوf11

اختر الصفحة التى تريد بها التنفيذ

الصق بها اول كود وغير المدى منa1:f1الى المدى الذى تريده وبالتوفيق

استاذ ابو نصار زادك الله علما وكرما

بارك الله فيك كود ولا اروع

احترامى

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information