Hola:
Para cerrar datos de un ejercicio anual he querido utilizar este código
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A3:W230")) Is Nothing Then Exit Sub
If [C1] = "CERRADO" Then
Application.Undo
End If
End Sub
Pero como podéis comprender, ( dado que pregunto), no funciona, produce un
"bucle" el Application.Undo y cuando se "cansa" pues queda como yo quiero.
¿Que opináis?
¿Es posible? ¿Qué tengo que cambiar? ¿Lo tiro directamente a la basura?
Un saludo,
Juan Español.
Leer las respuestas