Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$B$1" Then
        Select Case UCase(IPScheduledSheet.Range("$B$1").Value)
        Case "YES"
            IPScheduledSheet.Range("$B2").Value = "Check Blux Matrix for Precert"
        Case "NO"
            IPScheduledSheet.Range("$B2").Value = "Check the NIC Site for Precert"
        Case Else
            IPScheduledSheet.Range("$B2").Value = ""
        End Select
    End If
End Sub