اظهار البيانات من اليست بوكس الى التكست بوكس

[فوزى فوزى]

السلام عليكم ورحمة الله وبركاته الى عملاقة الاكسيل والبرمجة عند اختيار اسم المدينة في القائمة المنسدلة وتضغط على زر بحث تظهر البيانات في اليست بوكس اود كود عند الضغط على اى بيان في ليست بوكس يظهر في التكست بوكس مثلا اسم كريم عند الضغط عليه تظهر بياناته في التكست بوكس كماهو موضح 

في نقطة أخرى ان قمت بتعديل اى بيان في التكست بوكس ممكن كود يظهر تعديل البيان في ليست بوكس وتعديل البيان أيضا في شيت البيانات  

ونتمنى لكم دوام الصحة والعافية والتوفيق

اظهار البيانات من اليست بوكس الى التكست بوكس.xlsm

[حسين مامون]

ضع الكود في الليست بوكس

Private Sub ListBox1_Click()
TextBox1.Value = ListBox1.Column(0)
TextBox2.Value = ListBox1.Column(1)
TextBox3.Value = ListBox1.Column(2)
TextBox4.Value = ListBox1.Column(3)
TextBox5.Value = ListBox1.Column(4)
TextBox6.Value = ListBox1.Column(5)
TextBox7.Value = ListBox1.Column(6)

End Sub

 

[فوزى فوزى]

رزقكم الله أسمى مراتب الدنيا وأعلى منازل الجنة وجعلكم ممن طال عمره وحَسُنْ عمله وبُورك له في رزقه وماله وصحته وعافيته وأولاده وأهله  

بالنسبة ان حبيت اعدل اى بيان فى تكست بوكس موهو الكود المستخدم لتعديل البيانات حتى تسمع فى شيت البيانات والتكست بوكس

[حسين مامون]

تفضل

اظهار البيانات من اليست بوكس الى التكست بوكس.xlsm

[فوزى فوزى]

أستاذنا الفاضل ا/ حسين مامون شكرا لمجهودك واود الا ان اكون اثقلت على حضرتك لقد تم المطلوب بفضل مجهودكم  وشكرا لسعة صدركم