اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
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