Particular Drop down then no bank cell in same row

[Abhijeet]

Hi

I have data In Column G If select Qc related drop down then Column B that row cell if blank then i want pop up message the need to fill Auditing For column i tried the formula but i want to pop up message please tell me how to do this

=IFERROR(IF(SEARCH("QC",G9,1),IF(B9="","yes","no")),"")

 

[Abhijeet]

I tried this code but not work please tell me how to do this

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim A As Range, r As Range
    Set A = Range("f9:f20")
    If Intersect(Target, A) Is Nothing Then Exit Sub
    For Each r In Target
        If LCase(r.Value) = "yes" Then
            MsgBox "guest entered into cell " & r.Address
        End If
    Next r
End Sub

 

[Abhijeet]

I tried this but copy paste from different workbook then not work & Ctrl + D then not work please tell me

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim a As Variant

If Target.Column = 7 Then

On Error Resume Next

a = Application.WorksheetFunction.Search("QC", Target.Value, 1)

If Err.Number = 0 And Range("B" & Target.Row).Value = "" Then
MsgBox "Please provide name in Column B & Row - " & Target.Row, vbExclamation

End If
On Error GoTo 0

End If


End Sub