اختيار فتح استعلام عن طريق قائمة منسدلة

زهور2014 · يونيو 4, 2015

هل ممكن اختيار فتح استعلام ما عن طريق وضع اسماء الاستعلامات فى قائمة منسدلة وعن طرقها مع زر امر يتم الفتح

**Elsayed Bn Gemy** · يونيو 4, 2015

هذا هو الكود فى حدث بعد التحديث للقائمة المنسدلة

If [r] = "name_1" Then
DoCmd.OpenQuery "m"
 
ElseIf [r] = "name_2" Then
DoCmd.OpenQuery "m"
 
ElseIf [r] = "name_3" Then
DoCmd.OpenQuery "m"

End If

حيث name_1) (name_2) (name_3) هى اسماء القيم فى القائمة المنسدلة ولازم تكون مظبوطه

حيث ( r ) هو اسم القائمة المنسدلة

حث (m) هو اسم الاستعلام

**jjafferr** · يونيو 4, 2015

هل ممكن اختيار فتح استعلام ما عن طريق وضع اسماء الاستعلامات فى قائمة منسدلة وعن طرقها مع زر امر يتم الفتح

نعم ، ومثل ما قال أخي مارد ،

ولكن اذا كان اسم الاستعلام صحيح ، فيمكن ان يكون الكود مجرد سطر واحد:

فاذا كان اسم القائمة lst_qry ، فالكود يكون:

docmd.openquery lst_qry

جعفر

الردود الموصى بها