¿No repetir un valor en Excelen una misma Fecha?

Los datos en una misma celda o cada uno en un celda diferente
Es decir
a1=01-09-2011 (12000)
o
a1=01-09-2011
b1 = (12000)

claro... la opción dos...
A1= Fecha
b1=12000

Ok.
Aquí tienes:
Desde el editor de visual basic (alt+f11) selecciona la hoja que utilizaras para completar datos, en la ventana de edición de visual basic que corresponde a esa hoja pegas este macro:
Private Sub Worksheet_Change(ByVal Target As Range)
On Local Error GoTo errores
If Target.Columns.Count > 1 Then Exit Sub
If Target.Rows.Count > 1 Then Exit Sub
If Target.Column > 2 Then Exit Sub
Dim c As String
Dim r As Range
c = Range("A" & Target.Row) & Range("b" & Target.Row)
For Each r In Range("A1" & ":" & "A" & Application.WorksheetFunction.CountA(Range("A:A")))
If r.Row = Target.Row Then GoTo 1
If c = r & r.Offset(0, 1) Then Range("C" & Target.Row) = "repetido"
If Target = Empty Then Range("C" & Target.Row).Clear
1:
DoEvents
Next
Set r = Nothing
errores:
If Err.Number > 0 Then MsgBox Err.Description
End Sub
Si repites un dato el macro te lo dirá en la columna C, si corrigues ese dato el macro eliminara el aviso de la col. C
No olvides CERRAR la pregunta