Condición para una celda

Prueba (en el módulo de la hoja) con:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Left(Target.Address, 5) = "$C$10" Then [A1].Select
End Sub

Notas:
a) >>> Cuidado si tienes más código en el evento SelectionChange de la
hoja.
b) Si seleccionas un rango que contenga en su interior C10, podrás cambiar
su contenido.
c) la rutina se ejecuta cada vez que cambies la selección a otra celda, pero
no creo que lo notes. Ademas con otras celdas no modifica la selección.

Saludos desde Tenerife (Islas Canarias).
************************************************
"Miguel" escribió en el mensaje
news:
Qué tipo de condición hay que poner en una celda, para que únicamente
acepte los valores elegidos de una lista de un combobox. En mi caso
tengo un Combo en el que se despliega una lista y lo que se elija de
la misma, se copia en una celda determina (C10). Que ha de hacerse en
esta celda (C10) para que no te deje insertar registro alguno, excepto
lo contenido en la lista del Combox.
Gracias.