قهرني الأوفيس قام بنشر أغسطس 3, 2020 مشاركة قام بنشر أغسطس 3, 2020 السلام عليكم اخواني أعضاء أوفيسنا لي طلب أريد عمل مربع نص في نموذج مع (زر بحث لإظهار البيانات ) البحث يحوي مربعين بحث برقم الموظف ومربع بحث باسم الموظف الملف مرفق تجريبي1.rar رابط هذا التعليق شارك More sharing options...
محمد أبوعبدالله قام بنشر أغسطس 3, 2020 مشاركة قام بنشر أغسطس 3, 2020 وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم Private Sub أمر11_Click() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[no_m]=""" & Me.نص9 & """" Me.Bookmark = rs.Bookmark End Sub Private Sub أمر13_Click() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[name]=""" & Me.نص12 & """" Me.Bookmark = rs.Bookmark End Sub تجريبي1.rar تحياتي 1 2 رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر أغسطس 3, 2020 مشاركة قام بنشر أغسطس 3, 2020 3 ساعات مضت, محمد أبوعبدالله said: وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم Private Sub أمر11_Click() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[no_m]=""" & Me.نص9 & """" Me.Bookmark = rs.Bookmark End Sub Private Sub أمر13_Click() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[name]=""" & Me.نص12 & """" Me.Bookmark = rs.Bookmark End Sub تجريبي1.rar 25.68 kB · 4 تنزيلات تحياتي ولا اجمل ولا احلى روعه رابط هذا التعليق شارك More sharing options...
قهرني الأوفيس قام بنشر أغسطس 4, 2020 الكاتب مشاركة قام بنشر أغسطس 4, 2020 14 ساعات مضت, محمد أبوعبدالله said: وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم Private Sub أمر11_Click() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[no_m]=""" & Me.نص9 & """" Me.Bookmark = rs.Bookmark End Sub Private Sub أمر13_Click() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[name]=""" & Me.نص12 & """" Me.Bookmark = rs.Bookmark End Sub تجريبي1.rar 25.68 kB · 6 تنزيلات تحياتي أشكرك أخي محمد أبوعبدالله على الرد لكن عند الضغط على زر البحث لم يتم البحث ،،، أي الزر لايعمل رابط هذا التعليق شارك More sharing options...
محمد أبوعبدالله قام بنشر أغسطس 4, 2020 مشاركة قام بنشر أغسطس 4, 2020 رابط هذا التعليق شارك More sharing options...
قهرني الأوفيس قام بنشر أغسطس 4, 2020 الكاتب مشاركة قام بنشر أغسطس 4, 2020 47 دقائق مضت, محمد أبوعبدالله said: أشكرك أخي محمد أبوعبدالله أعتقد أن المشكلة عندي في اعداد الزر " كفيت ووفيت يعطيك العافية " رابط هذا التعليق شارك 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.