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

Ingresar y eliminar X en rango celdas combinadas[Solucionado]

Ir abajo

Ingresar y eliminar X en rango celdas combinadas[Solucionado]

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 : 26
Edad : 63
Ciudad - Pais : Quito - Ecuador
Version de Excel : 2003
Fecha de inscripción : 31/12/2009

Volver arriba Ir abajo

Re: Ingresar y eliminar X en rango celdas combinadas[Solucionado]

Mensaje por Toldeman el Vie Feb 09, 2018 6:20 am

Hola.
Preuba asi:

Código:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("C77:C79")) Is Nothing Then


Target = "X"
If Target(1, 1) = "X" Then Target.Offset(0, 1).Select: Exit Sub
Target.Offset(0, 1).Select
End If
End Sub

Un saludo.

Toldeman
Moderador
Moderador

Masculino Cantidad de envíos : 65
Edad : 53
Ciudad - Pais : España
Version de Excel : 2007
Fecha de inscripción : 05/04/2009

Volver arriba Ir abajo

Re: Ingresar y eliminar X en rango celdas combinadas[Solucionado]

Mensaje por Milton Cordova el Dom Feb 11, 2018 11:54 pm

Gracias por la ayuda excelente
tema cerrado solucionado

Milton Cordova

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

Volver arriba Ir abajo

Re: Ingresar y eliminar X en rango celdas combinadas[Solucionado]

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Volver arriba


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