Si celda activa vacia cambiar de valor

Tengo el suguiente codigo: [...]
El problema es el siguiente: Necesito hacer que cuando una determinada celda activa dentro de un rango
cambie de valor empty a no empty, y aplique fecha y hora en otra celda de la misma fila.
Sucede que este codigo aplica la fecha cuando la esta la celda activa, cambio o no de valor la celda activa.
Debe ser solo CUANDO SE INGRESE UN VALOR.
Ahora, en cada celda activa tengo previsto validar mediante un combo o list para ser rellenado de acerdo a otro rango de valores.
(es para agilizar el llenado)
que debo considerar para que pueda aplicar lo que he planteado inicialmente? Es necesario

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim fila, columna, valor
Dim celda As Range
fila = ActiveCell.Row
columna = ActiveCell.Column
If fila < 8 Or fila > 28 Or columna > 6 Then Exit Sub
valor = ActiveCell.Address
If columna = 1 And fila Then
Set celda = Intersect(Target, Range(valor))
If celda Is Nothing Then Exit Sub
Cells(fila, 6).Value = Format(Date, "mm/dd/yyyy") & " " & Format(Time, "hh:mm")
End If
End Sub