Neste caso, tem que ser via VBA.

Se for para apenas uma planilha (aba)
Use o seguinte código:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row < 5 Then Exit Sub
If Target.Column = 2 Then Target.Offset(0, -1).Value = Date
End Sub

Caso não saiba como inserir, siga os passos:

Dê um Alt + F11 para abrir o VBE. Nessa janela, localize a planilha onde vc vai trabalhar, dê 2 cliques nela, e no campo que abrir, cole o código.

Se for para todas as planilhas, use:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Row < 5 Then Exit Sub
If Target.Column = 2 Then Target.Offset(0, -1).Value = Date
End Sub

Porém, nesse caso,

Dê um Alt + F11 para abrir o VBE. Nessa janela, dê 2 cliques em EstaPasta_de_trabalho, e no campo que abrir, cole o código.

Segue um anexo com o segundo caso.

Ah, outra coisa. As regras do fórum pedem que vc sempre envie arqivos compactados.

Não estava anexando. Agora foi.

Caso seja necessário reabrir o tópico, o autor poderá enviar uma MP para um dos moderadores solicitando o desbloqueio.