ربط ثلاثة كومبكس مع بعض وتعديل ظهور التاريخ

**أبو قاسم** · فبراير 10, 2016

السلام عليكم ورحمة الله وبركاتة

جزاكم الله خير الجزء على ماتقدمونة

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

ربط 3 كمبوبوكس.rar

**رجب جاويش** · فبراير 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