İlgili sayfanın sayfa sekmesi üzerine fare ile sağ tıklayıp Kod Görüntüle seçin ve açılan VBE sayfasına aşağıdaki kodları yapıştırın:

Private Sub Worksheet_Change(ByVal Target As Range)

    Application.EnableEvents = False

    If Target.Row >= 6 Then

        If (Target.Column = 2 Or Target.Column = 9) And Target = Empty Then

            Target.Offset(0, -1) = Null

        ElseIf (Target.Column = 2 Or Target.Column = 9) And Not (Target = Empty) Then

            Target.Offset(0, -1) = ActiveSheet.Range("K2")

        End If

    End If

    Application.EnableEvents = True

End Sub