السلام علسكم و رحمة الله و بركاته
اخي ابو خليل تحية لك
لا اختلاف جوهري بين المثالين حتى بعد ارفاق الملف وبعد اطلاع على المشاركة الثانية استغربت على تشابه حتى بالاسم
ولكن بعد اطلاع على اسماء متغيرات و وجود استعلام عرفت انه ليس ملفي .وقمت بالحذف المشاركة
والان غيرت بعض اكواد و المثال الى من يهمه الامر:
ملاحظة:
في حالة فراغ مرع "تاريخ تعين" و"تاريخ نهاية" يرجع تاريخ اليوم
في حالة تاريخ تعين اكبر من تاريخ النهاية، رسالة في مربعات يوم،شهر،سنة
datework3.zip
تم اضافة حقل جديد بإسم "نوع التحويل"(مربع تحرير والسرد)
عليك اختيار نوع التحويل, قطن او غير قطن،سترى النتيجة حسب وزن المواد،اختيار سجلات حاليه هو غير قطن
DDDB.zip
بالنسبة كتاب بالظبط كنت اكتب لك مثل ما كتب لك أبو خليل عليك اولا انشاء جدول مرتب يحتوي على رقم الكتاب,مؤلف كتاب وغيره من الحقول بشرط ان لا يتكرر الصف.
و بالنسبة الطلاب عملت لك تصفية بدلا من نموذج فرعي إنشاء الله هذا هو المطلوب.
db.zip
أخي ابو خليل!
اولا السلام عليكم ورحمت الله وبركاته
ثانيا ساشرح لك اسطر الكود بالقدر مستطاع حيث اخبرناكم في السابق ما تعاني منه
إنشاء الله سنوصل الى فهمك
سطر الأول:
تحديد دورات لـ ( i ) بمقدار عدد الأحرف الموجودة في مربع نص "txtr"
سطر الثاني:
dgt هو أسم المتغير
نفترض نريد ارجاع كود الحرف "س" مثلا فنكتب Ascw ("س") ونحصل على النتيجة 1587
هنا بدلا من كتابة حرف "س" بعد دالة Ascw ، نستخدم دالة Mid من اجل حصول على أحرف الموجودة في مربع نص txtr هنا قد حصلنا على الحرف الاول من مربع نص txtr بموجب دالة mid و عرفنا كوده بموجب دالة Ascw قد تم تعين قيمة لمتغير Dgt
السطر الثالث:
تزويد مربع نص txts بقيمته بالاضافة سلسلة الأحرف و الرموز الحاصرة بين علامات اقتباس.
علامة اقتباس مزدوجة اربع مرات لحصول علامة اقتباس واحدة في النتيجة و قيمة متغير Dgt ومرة اخرى علامات اقتباس و أحرف و الرموز المحاصرة بين علامات اقتباس.
هنا قد انتهت الدورة الاول لمتغير ( i ) وحصلنا على سطر التالي
Chrw ("1587")
السطرالرابع:
دورة تالية لمتغير ( i )
السطر الخامس:
السطر الخامس من اجل حذف آخر حرفين بعد استكمال كل دورات ( i ) لانه لايوجد احرف التالية بعده وهما مسافة و رمز"&"
كما نحن بالحاجة كتابة رسائل في vba و أحيانا نواجه مشاكل مثلا عدم قبول البرنامج أحرف بالغة العربية و نضطر لكتابة أكواد أحرف من اجل سهولة كتابة أكواد أرفقت لكم هذا البرنامج
Tocode.zip
سلام
مضى ايام كثيرة على هذالمشاركة و انا ما شفت الا اليوم
المهم: لو لايزال المشكلة قائمه بإمكاننا مساعدتكم ولو قليل او تحويل القائدة الى صيغة mdb
يرجي إفادتنا حتى لا نتعب بلا فائدة لأن تصميم نماذج يطلب وقت .