سلام به دنبال کنندگان اکسل
نیاز به هایلات سلول های متغیر بر اساس انتخاب از لیست ها، داشتم
ممنون میشم اگر راهنمایی بفرمایید.
					نیاز به هایلات سلول های متغیر بر اساس انتخاب از لیست ها، داشتم
ممنون میشم اگر راهنمایی بفرمایید.
=AND($A2=$D$9,OR(B$1=$D$7,B$1=$D$8))
Private Sub Worksheet_Change(ByVal Target As Range)
Dim m1, m2, nm As String
    m1 = Range("d7").Text
    m2 = Range("d8").Text
    nm = Range("d9").Text
        Range("b2:g5").Interior.ColorIndex = 0
           For r = 2 To 5
               For s = 2 To 7
                 For s2 = 2 To 7
                   If nm = Cells(r, 1) Then
                       If m1 = Cells(1, s) And m2 = Cells(1, s2) Then
                           Rng = Cells(r, s).Address & ":" & Cells(r, s2).Address
                           Range(Rng).Interior.ColorIndex = 7
                           Exit For
                       End If
                   End If
                 Next s2
               Next s
           Next r
End Sub
کامنت