أبو قاسم قام بنشر فبراير 10, 2016 مشاركة قام بنشر فبراير 10, 2016 السلام عليكم ورحمة الله وبركاتة جزاكم الله خير الجزء على ماتقدمونة المطلوب ربط 2 كمبوكس هو جاهز فقط اضافة تكس بوكس عند الاختيار كومبكس 2 يعطي بيانات الى تكس بوكس ويوجد مرفقات توضح المطلوب ربط 3 كمبوبوكس.rar رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر فبراير 10, 2016 مشاركة قام بنشر فبراير 10, 2016 السلام عليكم استخدم هذا الكود Private Sub Nawa_Change() Dim ii As Integer Dim sh As Worksheet Set sh = Sheets("تحديد القطاعات") If Nawa.Text = "" Then Me.TextBox_mycode = "" For ii = 6 To sh.Range("C" & Rows.Count).End(xlUp).Row If Sanf.Text = Cells(ii, 3) And Nawa.Text = Cells(ii, 4) Then Me.TextBox_mycode = Cells(ii, 5) Exit For End If Next End Sub ربط 2 كمبوبوكس.rar رابط هذا التعليق شارك More sharing options...
أبو قاسم قام بنشر فبراير 10, 2016 الكاتب مشاركة قام بنشر فبراير 10, 2016 ربنا يعطيك الف عافية ماقصرت باقي التاريخ هل يوجد حل رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر فبراير 10, 2016 مشاركة قام بنشر فبراير 10, 2016 (معدل) هل تقصد هكذا ربط 2 كمبوبوكس.rar تم تعديل فبراير 10, 2016 بواسطه رجب جاويش 3 رابط هذا التعليق شارك More sharing options...
أبو قاسم قام بنشر فبراير 10, 2016 الكاتب مشاركة قام بنشر فبراير 10, 2016 جزاك الله عنا الف خير لاتوفي كلماتي لشكرك ولابداعك 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان