أبوبسمله

اتبع الشرح فالرابط التالى ووافنا بالنتيجه لحل هذه المشكله

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله خيرا

بالتوفيق

ساشرح باختصار

الكمبو الاول والثانى لاختيار الفروع ووضعت بمصدر الصف لهم نفس الجمله التاليه

SELECT MSysObjects.Name, MSysObjects.Flags
FROM MSysObjects
WHERE (((MSysObjects.Flags)=0) AND ((MSysObjects.Type)=1));

فى حدث بعد التحديث للكمبو الاول وضعنا الكود التالى لجلب الاسماء بناء على الفرع

Sub cmbF1_AfterUpdate()
Dim x As String
Dim strSQL As String

x = Me.cmbF1.Value

strSQL = "SELECT الاسم FROM " & "[" & x & "]" & ";"
Me.cmbEmp.RowSource = strSQL

End Sub

بعد اختيار الاسم

فحدث عند النقر قمت بوضع الكود التالى لالحاق البيانات

Private Sub btnRun_Click()

Dim x As String
Dim y As String
Dim z As String

x = Me.cmbF1.Value
y = Me.cmbF2.Value
z = Me.cmbEmp.Value


DoCmd.RunSQL "INSERT INTO " & "[" & y & "]" & "( الاسم, [تاريخ الميلاد], [الشهاده الجامعيه], الجامعه, الراتب, [الحاله الاجتماعيه], [تاريخ بداية الخدمه] )" & _
"SELECT الاسم,[تاريخ الميلاد],[الشهاده الجامعيه],الجامعه,الراتب,[الحاله الاجتماعيه], Date() AS SDate " & _
"FROM " & "[" & x & "]" & " WHERE (الاسم='" & z & "');"

End Sub

طيب جرب الان

عما اشرح لك

New1.accdb

شغال عندى وجربته قبل ما ارفعه

طيب جرب الان

New1.accdb

طيب جرب الان

New.accdb

السلام عليكم

مشاركه مع اخى @husamwahab جزاه الله خيرا 💐

هل هذا ما تريد

افتح النموذج اختار الفرع المحول منه ثم اختار الفرع المحول اليه ثم اختار الموظف الذى سيتم نقله للفرع المحول عليه ثم اضغط زر تنفيذ

ملحوظه الاسماء سوف تظهر بعد اختيار الفرع المحول منه

ثم افتح الجدول الخاص بالفرع المحول عليه

جرب ووافنا بالنتيجه

New.accdb

وفيك بارك الله

ولا يهمك بالتوفيق

4 دقائق مضت, محمد التميمي said:

السلام عليكم

يا اخي انا عدلت بالكد نفس ما انت ارسلتي ولاكن لم تعمل

شكراً جزيلاً

وعليكم السلام

طيب هل عملت معك الان ؟

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله خيرا

جزاك الله خيرا اخى واستاذى @husamwahab 💐

اتفضل اخى @محمد التميمي جرب ووافنا بالنتيجه

بالتوفيق

33(1).accdb

2 دقائق مضت, فايز.. said:

جزاكم الله جميعا خيرا واحسن اليكم .. 

استفسار اخي @الفلاحجى @kanory  لماذا حصل الخطأ وهو نقص البيانات في جدولstudent ؟ علما ان خصائص الحق تقول : يجب اختيار عدد صحيح طويل اذا كان المعرف ترقيم تلقائي .  

حقل المعرف  بخصائص الترقيم التلقائى ملناش علاقه به

عندما اشار اليك اخى ابو البشر لتحويل حقل t1 والخاص برقم الطالب الى نوع رقم فنوع الرقم له انواع وخصائص نحددها على حسب احتياجنا للحقل

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

ودى صفحه ميكروسوفت لحجم الحقول الرقميه للاطلاع

https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/data-type-summary

ارجو ان اكون قد وفقت بالشرح والتوضيح

بالتوفيق اخى @فايز..

العفو اخى @محمد التميمي واياكم ان شاء الله بالتوفيق

بارك الله فيك اخى واستاذى @husamwahab وجزاك الله خيرا 💐

مشاركه مع اخى واستاذى @husamwahab جزاه الله خيرا

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

33.accdb

واياكم اخى فايز وفيكم بارك الله

اخى @فايز.. افضل اجابه لاخى واستاذى @kanory جزاه الله خيرا 💐

اخى @فايز.. السجلات الفعليه 674 طالب

اما 676 فالجداول تمب لان فيها صفين بهما بيانات راس الجدول بالاكسيل كما بالصوره

قمت بفحص الملف ب افاست ولم اجد به شىء

طيب عالعموم  سوف ازيل المرفق

وقم بالدخول على جدول الطلاب student_x

الحقل t1 ومن الخصائص بالاسفل اجعل حجم الحقل مزدوج

جرب ووافنا بالنتيجه

وعليكم السلام

اخى الفاضل برجاء اطلع على هذا الموضوع بخصوص مشاركه قواعد البيانات ع الشبكه لام عهود جزاها الله كل خير

بالتوفيق

بعد مراجعه ملف الاكسيل ووجدت ان هذه الاسماء لها ارقام

رجعت مره اخره للاكسيس جعلت حقل رقم الطالب رقم وخصائصه حجم الحقل مزدوج ليحمل هذه القيمه الكبيره

جرب ووافنا بالنتيجه

السلام عليكم اخى @فايز..

قمت بتحميل الملف المعدل من قبل اخى واستاذى @kanory جزاه الله خيرا 💐

وجزاه الله خيرا اخى @ابو البشر 💐

شوف استعلام 1 فيه اسم مكرر مرتين برقمين مختلفين

شوف استعلام 2 فيه 14 اسم من غير ارقام

بالتوفيق

F_E_MNew.rar

جزاك الله خيرا اخى واستاذى @محمد أبوعبدالله 💐

جعله الله فى ميزان حسناتك إن شاء الله

في ١٥‏/٧‏/٢٠٢٠ at 13:24, Barna said:

حياك الله داما وتشرفي ..... خلاص اجهز الكنكة .....ههههه

بارك الله فيك أخي الحبيب 

تسلم اخى واستاذى محمد 😀

وفيك بارك الله 💐

جزاك الله خيرا اخى واستاذى @husamwahab 💐

2 ساعات مضت, Barna said:

والله مريت بس يبدو لي اني لم احتسي كوبا من القهوة لذلك انظر المرفق وبدون قهوة .... لس راضي عنه ولكن ........

ان ناسبتك الفكرة طبقها والا ارم بها في عرض البحر ...

طب اعمل حسابى اخى واستاذى محمد فى فنجان قهوه معاك 😀

اخى @فايز.. طالما ليه عامل 2 كمبو لتحديد الصفوف ؟

يكفى كمبو واحد لاختيار الصف مع اليوم

وطالما هتختار جميع الصفوف ليوم معين فاختار اليوم فقط

وجميعهم يعملون كما يجب

الا ان كان هناك توضيح اكثر ....

جزاك الله خيرا استاذ @عبد اللطيف سلوم 💐

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله خيرا 💐

فلم افعل شئ

بالتوفيق

الملف المرفق من قبل الاستاذ ابوعارف جزاه الله خيرا

libraiesT1.accdb