Вопрос по написанию действий при работе с ячейками - VB

Формулировка задачи:

Уважаемые, прошу помочь разобраться в следующей задаче:
: есть ячейка G2 если она не заполнена, то должны быть пустыми ячейки K2:P2 (то есть их можно или заблокировать или стирать все чтобы в них не писали), и так дальше: если ячейка G3 не заполнена, то должны быть пустыми ячейки K3:P3
При этом если ячейка G2 заполнена, то должно выходить сообщение после ее заполнения «Заполните комментарий » после чего курсор должен спозиционироваться на ячейке P2 и так дальше: если ячейка G3 заполнена, то должно выходить сообщение после ее заполнения «Заполните комментарий » после чего курсор должен спозиционироваться на ячейке P3
Как это реализовать по отдельности с помощью инструмента Работа с данными я знаю, но можно ли наложить сразу два условия на одну и туже ячейку не знаю, скорей всего нет, поэтому пишу макрос но знаний мало пока осилил вот, что:

Private Sub Worksheet_Change(ByVal Target As Range)
'V = Range("A2:B2").Value

K = Target.Column    'îïðåäåëåíèå íîìåðà êîëîíêè ââîäèìîãî çíà÷åíèÿ
R = Target.Row    'îïðåäåëåíèå íîìåðà ðÿäà ââîäèìîãî çíà÷åíèÿ
'ADDR = "G" & K
'Addr2 = "G" & R & ":" & "L" & R            ' îïðåäåëåíèå äèàïàçîíà ÿ÷ååê, êîò. íàäî óäàëÿòü â äàëüøåéøåì
'alb = "abcdefghj"
    If Range("B" & R).Value <> 0 Then
    
        If Range("B" & R).Value = 0 Then
        Range("G" & R & ":" & "L" & R).Select
        Selection.ClearContents
        Else: Exit Sub
        End If
    
    End If
End Sub

прошу помочь решить эту задачу. Заранее спасибо

Решение задачи: «Вопрос по написанию действий при работе с ячейками»

textual
                            Листинг программы 
                        
                            If Range("B" & R).Value <> 0 Then
        If Range("B" & R).Value = 0 Then