bloquear o eliminar userform desde una macro

[juanc62]

Hola amigos necesito syuda en mi trabajo de excel.

Lo que pasa es q quiero eliminar o bloquear una userform,

O iliminar modulo desde una macro de ante mano muchas graciad

 

[Macro Antonio]

.


Te dejo 2 macros, una elimina todas las líneas de código de un componente y la otra elimina el componente.

Se entiende por componente, unmódulo normal, un módulo de clase o un formulario...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[juanc62]

Buenas he provado y no me borra el modulo 1
Pero te adjunto mi trabajo para q me ayudes.

De ante mano gracias

 

[juanc62]

Perdon aqui esta el trabajo

 

[Macro Antonio]

Módulo1 va con tilde en la ó.

 

[Macro Antonio]

Tu archivo tiene el proyecto protegido.

 

[juanc62]

La contraseña es jklquit

Perdon por responder varias veces es q estoy en mi celu

 

[juanc62]

La idea es que al dar click en una macro no me abra el primer bimestre.

La unica forma que veo es eliminando la userform o el modulo.

Ahora si se puede eliminar el cuadro del bimestre mucho...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Macro Antonio]

.

Para ocultar el botón PRIMER BIMESTRE:

ActiveSheet.Shapes(1).Visible = False

Para volver a visualizarlo:

ActiveSheet.Shapes(1).Visible =...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[juanc62]

Pero desde otra hoja que haga la misma funcion
Q el codigo q mr enviaste GRACIAS

 

[juanc62]

Ya encontre pero quiero eliminar shapes 1,2,3 o mas
Como pudiera hacer PORFAVOR

 

[Macro Antonio]

Por el número, si conoces el orden de creación, o por el nombre.(Cuadro de nombres en la esquina superior izquierda de la barra de fórmulas.

<i>
</i>
ActiveSheet.Shapes(1).Delete...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[juanc62]

Lo q pasa es q quiero eliminar varias shapes con un solo macro MAS O MENOS ASI
ActiveSheet.Shapes(1,2,3).Delete
pero esa funcion me sale error