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

مثل ما يقولوا العمانيين:

وابوي انا عليك :)

خليتني ما اقدر اقاوم إلا ان ارد عليك ، شفت اسم مسقط بلادي :)

انت محتاج الى هذا الكود فقط:

Private Sub c2_AfterUpdate()

    Me.no2 = Me.c2.Column(0)
    Me.nam2 = Me.c2.Column(1)
End Sub

جعفر

اشكرك حبيبي على ما تقدمه من مساعدات للجميع

حياهم الله :)

جعفر