You could force a default value with VBA. Suppose the cell with
validation is C1 and the default is 1. Put this code in the sheet's
code module.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$1" Then
If IsEmpty(Target) Then Target = 3
End If
End Sub

Hth,
Merjet