رسائل التنبيه لاتظهر اللغة العربية

[العبيدي رعد]

السلام عليكم  عند كتابة الكود  رسالة التنبيه  لاتظهر اللغة العربية 

 

 Dim m As Integer
Dim Sh_In As Worksheet, Sh_Out As Worksheet, Rng_In As Range
Set Sh_In = Sheets("قبض دولار") ' هنا لاتظهر اللغة العربية 
Set Sh_Out = Sheets("data")
Set Rng_In = Sh_In.Range("B4,B5,B6,B7,B10,B12,E4,E15,f10")
m = [F4]
If Application.CountA(Rng_In) < Rng_In.Count Then
    MsgBox prompt:=" أدخال كافة البيانات", Title:="خطأ"
    Exit Sub

[hegazee]

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

المشكلة مش من الكود نفسه، لكن من إعدادات الويندوز، لأنه أحيانًا لا يدعم النصوص العربية صح داخل محرر VBA، فتظهر رموز غريبة أو مربعات.

لو غيرت اللغة الافتراضية للنظام (Region → Administrative → Language for non-Unicode programs → Arabic)، هيظهر العربي صح حتى VBA

[العبيدي رعد]

هكذا  يظهر  الكود  

 

[hegazee]

جرب تغير اللغة

[العبيدي رعد]

11 دقائق مضت, hegazee said:

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

المشكلة مش من الكود نفسه، لكن من إعدادات الويندوز، لأنه أحيانًا لا يدعم النصوص العربية صح داخل محرر VBA، فتظهر رموز غريبة أو مربعات.

لو غيرت اللغة الافتراضية للنظام (Region → Administrative → Language for non-Unicode programs → Arabic)، هيظهر العربي صح حتى VBA

شكرا  جزيلا   استخدم   وندوز  11   مع  اوفيس  2020 

[Foksh]

24 دقائق مضت, العبيدي رعد said:

شكرا  جزيلا   استخدم   وندوز  11   مع  اوفيس  2020 

اقرأ هذه الموضوع
 

 

[العبيدي رعد]

غيرت  اللغة  وظهرت الكتابة  عربي  لكن  لايرحل  

[hegazee]

أرفق الملف

[العبيدي رعد]

سوف احمله لكم غدا

 

[العبيدي رعد]

هذا البرنامج 

حسابات 2025.rar

[العبيدي رعد]

هكذا  تظهر  اسماء  الصفحات  في  لوحة  vba 

[عبدالله بشير عبدالله]

 

الاساتذة / hegazee - العبيدي رعد

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

قمت بتجربة الملف المرفق بدون اي تعديل مني

بالنسبة لاسماء الصفخات او الكتابة العربية بالاكواد كلها سليمة

بالنسبة لكود الترحيل يعمل بكفاءة وبسرعة  وفام بطباعة الايصال والترحيل الى شيت DATA

كود الترحيل  ولغة الملف  100% 

تعلمنا من معلمنا عبدالله بافشير جزاه الله كل خير وخفظ يمننا السعيد من كل شر ومكروه انه عند نسخ كود ولصقه في مخرر الاكواد انه اذا كان في الكود حروف او كتابة عربية يجب تغيير لغة الكيبورد الى العربية وعندها انسخ والصق وستجد الكود بالحروف العربية اما اذا كانت لغة الكيبورد الانجليزية فالكتابة العربية ستظهر بلغة غير معروفة  وهذا عن تجربة 

لكما ولكل اعضاء المنتدى كل التقدير والاحترام

 

تم تعديل سبتمبر 28 بواسطه عبدالله بشير عبدالله

[hegazee]

الملف يعمل بكفاءة كما ذكر الاستاذ/ عبدالله و أسماء أوراق العمل كلها عربية واضحة. المشكلة عندك في لغة الويندوز. جرب الملف على أي جهاز آخر

[العبيدي رعد]

12 ساعات مضت, hegazee said:

الملف يعمل بكفاءة كما ذكر الاستاذ/ عبدالله و أسماء أوراق العمل كلها عربية واضحة. المشكلة عندك في لغة الويندوز. جرب الملف على أي جهاز آخر

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

اشكرك كثيرا  اخي الفاضل  ... خطرت في بالي  الكيبورد واللغة   وفعلا  انا  غيرتها  للعربية السعودية 
ولكن  ايضا  لم  يعمل   أعتقد  أنه الوندوز  النسخة 11  لأنني  كنت مصمم البرنامج  من ايام اوفيس 2007 
كان يعمل  بصورة ممتازة  عندما كانت الحاسبة  وندوز 10  و اوفيس  2010   لكن  اصابها  عطل  فغيرنا  الحاسبة  بجديدة  وجلبت الادارة  وندوز  11

 

17 ساعات مضت, عبدالله بشير عبدالله said:

 

الاساتذة / hegazee - العبيدي رعد

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

قمت بتجربة الملف المرفق بدون اي تعديل مني

بالنسبة لاسماء الصفخات او الكتابة العربية بالاكواد كلها سليمة

بالنسبة لكود الترحيل يعمل بكفاءة وبسرعة  وفام بطباعة الايصال والترحيل الى شيت DATA

كود الترحيل  ولغة الملف  100% 

تعلمنا من معلمنا عبدالله بافشير جزاه الله كل خير وخفظ يمننا السعيد من كل شر ومكروه انه عند نسخ كود ولصقه في مخرر الاكواد انه اذا كان في الكود حروف او كتابة عربية يجب تغيير لغة الكيبورد الى العربية وعندها انسخ والصق وستجد الكود بالحروف العربية اما اذا كانت لغة الكيبورد الانجليزية فالكتابة العربية ستظهر بلغة غير معروفة  وهذا عن تجربة 

لكما ولكل اعضاء المنتدى كل التقدير والاحترام

 

شكرك كثيرا  اخي الفاضل  ... خطرت في بالي  الكيبورد واللغة   وفعلا  انا  غيرتها  للعربية السعودية 
ولكن  ايضا  لم  يعمل   أعتقد  أنه الوندوز  النسخة 11  لأنني  كنت مصمم البرنامج  من ايام اوفيس 2007 
كان يعمل  بصورة ممتازة  عندما كانت الحاسبة  وندوز 10  و اوفيس  2010   لكن  اصابها  عطل  فغيرنا  الحاسبة  بجديدة  وجلبت الادارة  وندوز  11