(تمت الاجابة) تغيير لغة الادخال على عمود محدد

[خالد الشاعر]

السادة الخبراء

الملف المرفق عبارة عن كود تغيير لغة الادخال

من عربى الى انجليزى و العكس على الشيت كله و لكن بزر

اريد تطبيق هذا الكود ولكن على عمود معين فى صفحة واحدة فقط دون باقى الاعمدة

ولكم جزيل الشكر

تغيير لغة الادخال - مع زر.rar

[ابو اسامة العينبوسي]

ممكن اخى

مثال:

ادخال انجليزى في الاعمدة الفردية و عربي في الزوجية

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Column Mod 2 = 0 Then

Call ChangeToArabic

Else

Call ChangeToEnglish

End If

End Sub

تغيير لغة الادخال - مع زر2.rar

[خالد الشاعر]

استاذ ابو اسامة

الف شكر

تسلم ايدك جزاك الله كل خير