Existe la manera de que cuando se ejecute una macro se borre todo el código
que se encuentra en el modulo???
Cómo se puede hacer, ya que no quiero que el usuario vea el código que ha generado la macro...
Gracias
Un saludo
|
|
#1 (permalink) |
![]() Fecha de Ingreso: marzo-2007
Mensajes: 82
|
Existe la manera de que cuando se ejecute una macro se borre todo el código que se encuentra en el modulo??? Cómo se puede hacer, ya que no quiero que el usuario vea el código que ha generado la macro... Gracias Un saludo
__________________
StephenQ |
|
|
|
|
|
#2 (permalink) |
![]() Fecha de Ingreso: marzo-2007
Mensajes: 82
|
Re: Modulo de VBA Excel
Ya encontré la forma de hacerlo, por si le sirve alguno...
Primero se carga la referencia "Microsoft Visual Basic for APlication Extensibilty 5.3" y luego se escribe el siguiente código en el modulo Sub BorrarTodoElCodigo() Dim VBProj As VBIDE.VBProject Dim VBComp As VBIDE.VBComponent Dim CodeMod As VBIDE.CodeModule Set VBProj = ActiveWorkbook.VBProject For Each VBComp In VBProj.VBComponents If VBComp.Type = vbext_ct_Document Then Set CodeMod = VBComp.CodeModule With CodeMod .DeleteLines 1, .CountOfLines End With Else VBProj.VBComponents.Remove VBComp End If Next VBComp End Sub Despues lo llamamos cuando termine de ejecutar la macro Sub botton_1 'todo el código a ejecutar Call BorrarTodoElCodigo End sub Y listo
__________________
StephenQ |
|
|
|
|
|
#3 (permalink) |
![]() ![]() Fecha de Ingreso: agosto-2004
Mensajes: 714
|
Re: Modulo de VBA Excel
Protege con contraseña la macro...
En el editor de macros (con la macro abierta, visible) haz click en herramientas>Propiedades de VBAProject y selecciona la pestaña "Protección"; marca la casilla "Bloquear proyecto para visualización" y escribe tu contraseña. Cuándo intenten abrir la macro, el programa preguntará por la contraseña. Saludos.... |
|
|
|
|
|
#4 (permalink) |
![]() Fecha de Ingreso: marzo-2007
Mensajes: 82
|
Re: Modulo de VBA Excel
Gracias uzziber
Pero el problema es que la macro la ejecuto desde C#.NET y no quiero que cualquiera pueda ver la información, por esa razón la borro, pero muchas gracias por tu información. Un saludo ![]()
__________________
StephenQ |
|
|
|