Borrar auto shapes dejando los combobox de validación
Hola experto,
Tengo el siguiente código:
Dim autoforma As Shape
For Each autoforma In ActiveSheet.Shapes
autoforma.Delete
Next autoforma
Range("A1").Select
Pero resulta que en donde tengo que borrar las formas, tengo celdas en donde hay validación de datos y cuando quiero seleccionar una de las opciones de la lista, no puedo porque esa forma también se borro.
Espero haberme explicado bien y gracias de antemano por la respuesta
Tengo el siguiente código:
Dim autoforma As Shape
For Each autoforma In ActiveSheet.Shapes
autoforma.Delete
Next autoforma
Range("A1").Select
Pero resulta que en donde tengo que borrar las formas, tengo celdas en donde hay validación de datos y cuando quiero seleccionar una de las opciones de la lista, no puedo porque esa forma también se borro.
Espero haberme explicado bien y gracias de antemano por la respuesta
1 respuesta
Respuesta de calvuch
1
Mmmm a ver el script que tienes elimina autoformas... controles activex incluidos.
Por shape entiendo figuras insertables como recuadros de la opción autoformas.
¿Debes necesariamente eliminar los shapes?, ¿No tre bastaría con hacerlos No_visibles?
Trata de subir una imagen para ver de que se trata
Si decides hacerlos NO_visibles prueba con esta linea:
autoforma.Visible = msoFalse
Pd: no recibo planilla vía mail
Por shape entiendo figuras insertables como recuadros de la opción autoformas.
¿Debes necesariamente eliminar los shapes?, ¿No tre bastaría con hacerlos No_visibles?
Trata de subir una imagen para ver de que se trata
Si decides hacerlos NO_visibles prueba con esta linea:
autoforma.Visible = msoFalse
Pd: no recibo planilla vía mail
