تنسيق شرطي متعدد DataValidation ودالة البحث Find

[Guest محمد ابو صهيب]

السلام عليكم  ,,مازلنا مع TARGET  واستعمالها المتعدد في هذا التطبيق تناولنا قائمة أصناف كما هو مبين في التطبيق جعلنا في العمود C   Data Validation تحتوي حالة الأصناف  مخصصة بتنسيق شرطي  واتي هي عبارة صيفة المنتوج بمجرد الاختيار

كما استعملنا دالة البحث FIND  لجلب البيانات من الشيت حالة الأصناف وتلوين سطر كامل بخاصية INTERIOR.COLORINDEX

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
  On Error Resume Next
  Cells(Target.Row, 1).Resize(, 4).Interior.ColorIndex = [EL_SINF].Find(Target, lookat:=xlWhole).Interior.ColorIndex
 End If
End Sub

 

تنسيق شرطي متعدد DataValidation ودالة البحث Find.rar

 

 

 

تم تعديل أغسطس 12, 2016 بواسطه محمد ابو صهيب

[ياسر خليل أبو البراء]

بارك الله فيك أخي العزيز أبو صهيب

فكرة بسيطة ورائعة ، وموضوع رائع

جزيت خير الجزاء .. واصل بلا فواصل فما زال هناك الكثير في جعبتك