بلال اليامين قام بنشر نوفمبر 27, 2021 مشاركة قام بنشر نوفمبر 27, 2021 السلام عليكم اريد عند الضغط على اسم الموظف تظهر معلوماتة اسفل النموذج اليك البرنامج تلامذ.accdb رابط هذا التعليق شارك More sharing options...
محمد أبوعبدالله قام بنشر نوفمبر 27, 2021 مشاركة قام بنشر نوفمبر 27, 2021 وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم Private Sub named_Click() Dim rst As Recordset Set rst = Forms!Main2.Form.Recordset.Clone rst.FindFirst "[الاسم] = '" & Me.named & "'" If Not rst.EOF Then Forms!Main2.Form.Bookmark = rst.Bookmark End If Set rst = Nothing End Sub تلامذ.rar تحياتي 1 رابط هذا التعليق شارك More sharing options...
بلال اليامين قام بنشر نوفمبر 27, 2021 الكاتب مشاركة قام بنشر نوفمبر 27, 2021 بارك الله فيك استاذ محمد ابو عبد الله رابط هذا التعليق شارك More sharing options...
محمد أبوعبدالله قام بنشر نوفمبر 27, 2021 مشاركة قام بنشر نوفمبر 27, 2021 1 دقيقه مضت, بلال اليامين said: بارك الله فيك استاذ محمد ابو عبد الله وفيك بارك استاذنا الفاضل تحياتي رابط هذا التعليق شارك More sharing options...
بلال اليامين قام بنشر نوفمبر 27, 2021 الكاتب مشاركة قام بنشر نوفمبر 27, 2021 استاذ هل اسطيع اكمل الكود في بقية الحقول رابط هذا التعليق شارك More sharing options...
محمد أبوعبدالله قام بنشر نوفمبر 27, 2021 مشاركة قام بنشر نوفمبر 27, 2021 نعم يمكن ولكن في حقل التاريخ استخدم التالي كمثال Dim rst As Recordset Set rst = Forms!Main2.Form.Recordset.Clone rst.FindFirst "[تاريخ الازدياد] = #" & Me.[تاريخ الازدياد] & "#" If Not rst.EOF Then Forms!Main2.Form.Bookmark = rst.Bookmark End If Set rst = Nothing تحياتي رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.