Solo marcar una celda

Hola Hernan.

Con macros y suponiendo que el rango de 5 celdas es A1:A5 (en el módulo de
la hoja ):

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A5")) Is Nothing Then
Application.EnableEvents = False
Range("A1:A5").ClearContents
Target.Value = "X"
Application.EnableEvents = True
End If
End Sub

Saludos desde Tenerife: Antonio.
**********************************
"Hernan" escribió en el mensaje
news:

Hola a todos

Tengo 5 celdas consecutivas, la idea es marcar con una "x" en una de
ellas,
pero si por ejemplo la "x" esta en la primer celda y pongo la "x" en la
tercera, automaticamente se desmarque la primera, y luego si pongo la x
en la
2 se desmarque la anterior.es decir que solo haya una sola celda
marcad con la x.como se puede hacer eso???, si fuera posible sin
macro
mucho mejor, pero si toca con macros como se haria...

Gracias