Barna

اذن جاري التعديل على مرفقك .... انظرني <<<<<<<<<

سؤالي كان محدد ..... لان اسماء الحقول لو كانت مختلفة .... فكيف تخبر البرنامج ان الاسم في هذا الجدول هو اسم الطالب في الجدول الاخر .... علما كان طلبك ان التصدير يكون لجداول يتم اختيارها من خلال الكمبوبكس اي ليس جدولا محددا ... فلو كان جدولا محددا كانت العملية سهلة عن طريق الالحاق وكفي ..... انظر الصورة لجدولين واختلاف الاسماء بها ....... ليس لدينا سوى حل واحد وهر الاعتمان على ترتيب الحقل في الجدولين ((( فهل ترتيب الحقول في الجداول المراد تصدير البيانات لها هي نفس ترتيب الحقول في جدول tbltemp

يتبادر في الذهن سؤال :::: هل اسماء الحقول في الجدولين متشابهين تماما ( اقصد الجدول المنقول منه والجدول المنقول له ) أم تريد نقل البيانات كيفما كانت ........

ادرج مثال مبسط للتعديل عليه

ممكن مثال للجدول ... وماهي البيانات التي تريد ظهورها فقط

اعمل جدول وادرج السنوات المطلوبة بالكود ....

هل هذه الصورة المطلوبة ..... استخدم هذا ..... H: Year(Now()) & "-" & Year(Now())+1 & "-" & Year(Now())+2

طيب ... جرب الملف ..... Bar11.mdb

وعليكم السلام ... كان المفروض منك ادراج ملف مثال ليتم التعديل .... على العموم تفضل هذا المثال ... طبقه على ملفك ..... Bar11.mdb

اخي الكريم اقرأ ردي السابق

وعليكم السلام ورحمة الله وبركاته .... طيب في اعلا الصفحة ضع هذا ..... Option Compare Database #If VBA7 Then Private Declare PtrSafe Function GetKeyboardLayout Lib "user32" (ByVal dwLayout As Long) As Long #Else Private Declare Function GetKeyboardLayout Lib "user32" (ByVal dwLayout As Long) As Long #End If ثم في حدث عند التركيز على مربع النص العربي ضع هذا ..... On Error Resume Next Dim kbd As Long kbd = GetKeyboardLayout(0) kbd = Hex(kbd) If Right(kbd, 1) <> 1 Then SendKeys "%+" End If

هل هذه الصورة المطلوبة ...... اذا كان نعم .... فلا انصح به ... لانك تحتاج تغيير بعذ الاستعلامات المرتبطة بتلك النماذج .... لكن على كل حال انا اجريت تعديل واحد فقط على نموذج البلديات ... اذا انت مصر على المطلوب تتبع التعديل وعدل في كل الاكواد بنفس الطريقة ..... Handicap Bar Menu .rar

اخي خير اخترها افضل اجابة حتى نعرف انه تم الاجابة على السؤال .....

طيب اجعل الموشر في خانة البحث ثم اسحب الباركود بالماسح وانظر ....... Database1.accdb

هل هذا هو المطلوب .................. __شئون الطلبة_Barna (1).rar

وعليكم السلام الباركود يجب ان يعتمد على رقم فريد للموظف مثلا ( رقم هوية أو رقم وظيفي أو ...... ) لم اجد في الجدول لديك رقم فريد ؟؟؟؟؟

اين النموج ؟؟؟؟؟

طيب جرب المرفق التالي بعد التعديل ....... test print.mdb

جرب خاصية البحث في المنتدى تجد ما يسرك ...

جرب المرفق ........ واكتب التاريخ في مربع النص كاملا .... مثلا ( 2014/03/22 ) والبرنامج يقوم بالمطلوب . test print.mdb

يا اخي الكريم ابحث عن تاريخ موجود .... لكن جرب المرفق تم تعديل الرسالة .... test print.rar

غير هذا ..... بهذا .... Vl = Forms!test1!dateprint

انظر هذا الموضوع ... ولاتنسى التشغيل كمسؤول

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

هههه ........ بل انت بارك الله فيك اخي @ابوخليل سوف تفتح لنا باب كنا نظن اننا من فئة الشباب ..... 😉