Modificar macro para agregar una condición

Necesito modificar la siguiente macro para incluir una condición adicional. La macro actual tiene como única condición que el valor de la celda de la columna E sea "Si", y lo que necesitaría sería incluir la condición que esa misma fila pero columna F esté vacía. ¿Alguien sabe como podría modificar la programación?

Sub Completar()
Dim rango As Range
Set rango = Sheets("Hoja1").Range("E1:E10000")
fecha = Sheets("Actualizacion").[E4]
For Each celda In rango
If celda.Value = "SI" Then
celda.Value = "SI"
celda.Offset(0, 1).Value = fecha
End If
Next
End Sub