Como se hace ?

En la celda de la columna "K" mete una validacion . Datos

Validacion> personalizadas , mete una formula condicional

tal q =SI(Lx>0;;) donde x sera la correspondiente fila ,
esto hara q en el caso de que esa celda este rellena se
active el error de validacion , rellena en la pestaña de
mensaje de error el titulo y el texto del mensaje que
quieras q te aparezca y ya lo tienes , creo q eso era lo q
necesitabas .

Hola Grupo

Narro rapidamente tengo una hoja donde se registran pagos

y devoluciones bien el caso

es este, de que forma pormedio de codigo se puede hacer

de que cuando uno escriba en

la [columna (K) = Pagos] y este acupada la [columna (L) =

Devoluciones] made un

mensaje diciendo o algo asi : No esposible escribir ya

que ya fue Devuelto. o a la

inversa si fuera alrez si fue Pagado que salga de que No

se puede devolver. doy mas

datos tengo una barra de titulos y termina apartir de la

fila 1 a la 11.

Gracias por adelntado

Daniel.


.

Prueba con el siguiente código, que va en el módulo de la hoja (click derecho sobre su etiqueta->Ver código):

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [K12:L65536]) Is Nothing Then Exit Sub
If Target.Column = 11 Then 'Columna k
If Target.Offset(0, 1) <> "" Then
MsgBox "No es posible escribir ya que fue pagado."
Application.EnableEvents = False
Target = ""
Application.EnableEvents = True
End If
Else
If Target.Offset(0, -1) <> "" Then
MsgBox "No es posible escribir ya que fue devuelto."
Application.EnableEvents = False
Target = ""
Application.EnableEvents = True
End If
End If
End Sub

Un saludo.


Fernando Arroyo
MS MVP - Excel


"Daniel S.L." escribió en el mensaje news:

Hola Grupo

Narro rapidamente tengo una hoja donde se registran pagos y devoluciones bien el caso
es este, de que forma pormedio de codigo se puede hacer de que cuando uno escriba en
la [columna (K) = Pagos] y este acupada la [columna (L) = Devoluciones] made un
mensaje diciendo o algo asi : No esposible escribir ya que ya fue Devuelto. o a la
inversa si fuera alrez si fue Pagado que salga de que No se puede devolver. doy mas
datos tengo una barra de titulos y termina apartir de la fila 1 a la 11.

Gracias por adelntado

Daniel.

Mil gracias Tamariz

Funcional, nunca se me ocurrió

Un saludo,
Daniel.

Hola Fernando Arroyo !!!

Esta súper y funciona al 100%

Un saludo,
Daniel