............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Ingresar y eliminar X en rango celdas combinadas

Ver el tema anterior Ver el tema siguiente Ir abajo

Ingresar y eliminar X en rango celdas combinadas

Mensaje por Milton Cordova el Lun Dic 18, 2017 3:37 am

Muy comedidamente solicito ayuda para la macro
Necesito ingresar “X” en un rango
Esta macro funciona solo para celdas independientes del rango C68:C79, cuando tengo celdas combinadas no funciona
Por ejm. Para las celdas C68:C69, C70:C71, C72:C73, C75:C76, C77:C78 no funciona.
En este caso solo aplica para la celda C79 que esta individual

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("C77:C79")) Is Nothing Then
Range("C77:C79").ClearContents
Target = IIf(Target = "X", "", "X")
Target.Offset(0, 1).Select
End If
End Sub

Milton Cordova

Masculino Cantidad de envíos : 25
Edad : 62
Ciudad - Pais : Quito - Ecuador
Version de Excel : 2003
Fecha de inscripción : 31/12/2009

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.