Advertir sobre Macros

puedes poner una hoja en la que indiques la advertencia y ocultar y mostrar
todas tus hojas al abrir y cerrrar ,por medio de codigo, de forma que si
abren sin macros solo vean la hoja de la advertencia

ejemplo.

si la hoja con la advertencia se llama "Hoja3", pon este codigo en
ThisWorkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim h As Worksheet
' primero hace visible la hoja3 ya que no puede ocultar todas
ThisWorkbook.Worksheets("Hoja3").Visible = xlSheetVisible
For Each h In ThisWorkbook.Worksheets
If h.Name <> "Hoja3" Then
h.Visible = xlSheetVeryHidden
End If
Next
End Sub

Private Sub Workbook_Open()
Dim h As Worksheet
For Each h In ThisWorkbook.Worksheets
h.Visible = xlSheetVisible
Next
'al final oculta la hoja 3, para que asegurar que exista al menos una
visible
ThisWorkbook.Worksheets("Hoja3").Visible = xlSheetVeryHidden
End Sub

podiras pedirle adicionalmente que te active la hoja de tu eleccion

otra forma seria firmar digitalmente tu libro, de forma que al instalarlo en
una maquina pedira que valide la firma digital, si el usuario acepta abrir
el libro con macros, todos los libros que incluyan tu firma se saltaran la
advertencia sobre las macros y siempre se abriran con macros, checa este
link

http://office.microsoft.com/es-es/a...23082.aspx

y utiliza la herramienta SELFCERT.EXE que se encuentra en la carpeta de
Microsoft Office\Office, de forma que tu mismo generes tu frma digital

aqui puedes localizar mas informacion al respecto
http://search.microsoft.com/search/...t=b&na‚&qu=firma+digital

Saludos
Carlos Durán



"Luis Caro" escribió en el mensaje
news:%

Saludos a todos.
En qué forma puedo advertir a quien vaya a utilizar un Programa con Macros
que debe hacer Clic en Habilitar Macros.
Tengo una Ayuda con Ventana Emergente para la apertura del Programa,pero
esta se muestra después del aviso para Habilitar Macros.
Mil Gracias por las respuestas.

Cordialmente
Luis Caro

No somos 3.Quitar NOSPAMEPM.Poner epm.y el resto
http://usuarios.lycos.es/maderascolombianas2/
http://www.geocities.com/maderascolombianas2002

Lo mas comun es cambiar el nivel de seguridad de las
macros, ponerlo en "Low", esto te evita el dialogo del
inicio, permitiendo habilitar las macros contenidas en el
libro de manera automatica, tiene su pros y contras,
espero te sirva

Saludos
Gil Romero

puedes poner una hoja en la que indiques la advertencia y

ocultar y mostrar

todas tus hojas al abrir y cerrrar ,por medio de codigo,

de forma que si

abren sin macros solo vean la hoja de la advertencia

ejemplo.

si la hoja con la advertencia se llama "Hoja3", pon este

codigo en

ThisWorkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim h As Worksheet
' primero hace visible la hoja3 ya que no puede ocultar

todas

ThisWorkbook.Worksheets("Hoja3").Visible = xlSheetVisible
For Each h In ThisWorkbook.Worksheets
If h.Name <> "Hoja3" Then
h.Visible = xlSheetVeryHidden
End If
Next
End Sub

Private Sub Workbook_Open()
Dim h As Worksheet
For Each h In ThisWorkbook.Worksheets
h.Visible = xlSheetVisible
Next
'al final oculta la hoja 3, para que asegurar que exista

al menos una

visible
ThisWorkbook.Worksheets("Hoja3").Visible =

xlSheetVeryHidden

End Sub

podiras pedirle adicionalmente que te active la hoja de

tu eleccion

otra forma seria firmar digitalmente tu libro, de forma

que al instalarlo en

una maquina pedira que valide la firma digital, si el

usuario acepta abrir

el libro con macros, todos los libros que incluyan tu

firma se saltaran la

advertencia sobre las macros y siempre se abriran con

macros, checa este

link

http://office.microsoft.com/es-

es/assistance/HP010446123082.aspx

y utiliza la herramienta SELFCERT.EXE que se encuentra en

la carpeta de

Microsoft Office\Office, de forma que tu mismo generes tu

frma digital

aqui puedes localizar mas informacion al respecto
http://search.microsoft.com/search/...x?view=es-

es&st=b&na‚&qu=firma+digital

Saludos
Carlos Durán



"Luis Caro" escribió en el

mensaje

news:%

Saludos a todos.
En qué forma puedo advertir a quien vaya a utilizar un

Programa con Macros

que debe hacer Clic en Habilitar Macros.
Tengo una Ayuda con Ventana Emergente para la apertura

del Programa,pero

esta se muestra después del aviso para Habilitar Macros.
Mil Gracias por las respuestas.

Cordialmente
Luis Caro

No somos 3.Quitar NOSPAMEPM.Poner epm.y el resto
http://usuarios.lycos.es/maderascolombianas2/
http://www.geocities.com/maderascolombianas2002

.

Hola Carlos.He colocado la instrucción que me enviaste para la advertencia
sobre Macros.
Te coloco otras instrucciones que tenía en ThisWorkBook,y al introducir la
que me enviaste me da un error de compilación.
Quedó así:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim h As Worksheet
' primero hace visible la hoja3 ya que no puede ocultar todas
ThisWorkbook.Worksheets("Hoja2").Visible = xlSheetVisible
For Each h In ThisWorkbook.Worksheets
If h.Name <> "Hoja2" Then
h.Visible = xlSheetVeryHidden
End If
Next
End Sub

Private Sub Workbook_Open()
Dim h As Worksheet
For Each h In ThisWorkbook.Worksheets
h.Visible = xlSheetVisible
Next
'al final oculta la hoja 2, para que asegurar que exista al menos una
Visible
ThisWorkbook.Worksheets("Hoja2").Visible = xlSheetVeryHidden
End Sub

Private Sub Workbook_Open()
Worksheets("Ayuda").Activate
Bienvenida
End Sub
Sub Bienvenida()
MsgBox "Autor: Luis Guillermo Uribe S. Ingeniero Industrial" & vbCrLf &
_
"Empresa: Programas en Computador" & vbCrLf & _
"Este Programa está Registrado y Protegido por las Leyes de Autor. Su
reproducción está prohibida sin el consentimiento del Autor" & vbCrLf & _
"Instrucciones: La Ayuda lo guiará para su manejo adecuado"
End Sub

Debe haber un error por la posición.
El error que me muestra es error de compilación,Se ha detectado un nombre
ambiguo Wokbook_Open
Yo no sé nada de Visual Basic,por lo que te solicito me expliques un poco
con respecto a lo anterior,para aprender un poco.
Mil Gracias.

Cordialmente
Luis Caro

No somos 3.Quitar NOSPAMEPM.Poner epm.y el resto
http://usuarios.lycos.es/maderascolombianas2/
http://www.geocities.com/maderascolombianas2002

Esto no es aconsejable, porque si uno abre un archivo de otra persona o
recibido por mail y no se está seguro que tiene virus macro, sería
peligroso. Siempre hay que dejarlo en nivel Medio y hacer lo que mencionó
Carlos.

Saludos.
Adriano

"Gilro" escribió en el mensaje
news:0a4901c50565$b74f4af0$
Lo mas comun es cambiar el nivel de seguridad de las
macros, ponerlo en "Low", esto te evita el dialogo del
inicio, permitiendo habilitar las macros contenidas en el
libro de manera automatica, tiene su pros y contras,
espero te sirva

Saludos
Gil Romero

puedes poner una hoja en la que indiques la advertencia y

ocultar y mostrar

todas tus hojas al abrir y cerrrar ,por medio de codigo,

de forma que si

abren sin macros solo vean la hoja de la advertencia

ejemplo.

si la hoja con la advertencia se llama "Hoja3", pon este

codigo en

ThisWorkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim h As Worksheet
' primero hace visible la hoja3 ya que no puede ocultar

todas

ThisWorkbook.Worksheets("Hoja3").Visible = xlSheetVisible
For Each h In ThisWorkbook.Worksheets
If h.Name <> "Hoja3" Then
h.Visible = xlSheetVeryHidden
End If
Next
End Sub

Private Sub Workbook_Open()
Dim h As Worksheet
For Each h In ThisWorkbook.Worksheets
h.Visible = xlSheetVisible
Next
'al final oculta la hoja 3, para que asegurar que exista

al menos una

visible
ThisWorkbook.Worksheets("Hoja3").Visible xlSheetVeryHidden
End Sub

podiras pedirle adicionalmente que te active la hoja de

tu eleccion

otra forma seria firmar digitalmente tu libro, de forma

que al instalarlo en

una maquina pedira que valide la firma digital, si el

usuario acepta abrir

el libro con macros, todos los libros que incluyan tu

firma se saltaran la

advertencia sobre las macros y siempre se abriran con

macros, checa este

link

http://office.microsoft.com/es-

es/assistance/HP010446123082.aspx

y utiliza la herramienta SELFCERT.EXE que se encuentra en

la carpeta de

Microsoft Office\Office, de forma que tu mismo generes tu

frma digital

aqui puedes localizar mas informacion al respecto
http://search.microsoft.com/search/...x?view=es-

es&st=b&na‚&qu=firma+digital

Saludos
Carlos Durán



"Luis Caro" escribió en el

mensaje

news:%

Saludos a todos.
En qué forma puedo advertir a quien vaya a utilizar un

Programa con Macros

que debe hacer Clic en Habilitar Macros.
Tengo una Ayuda con Ventana Emergente para la apertura

del Programa,pero

esta se muestra después del aviso para Habilitar Macros.
Mil Gracias por las respuestas.

Cordialmente
Luis Caro

No somos 3.Quitar NOSPAMEPM.Poner epm.y el resto
http://usuarios.lycos.es/maderascolombianas2/
http://www.geocities.com/maderascolombianas2002

.

Preguntas (ya leí en el google y siempre están las mismas respuestas por lo
que creo que no se puede hacer):

- Es posible distribuir la firma en una LAN de confianza en una Empresa???
Es decir, guarda un archivo el selfcert que se pueda instalar en una LAN?
- O en todo caso, es posible crear un editor del registro de Windows para
que ya quede instalada la firma de confianza (porque nosotros trabajamos en
la empresa y se confía en nosotros) y hacer poder distribuir la aplicación y
que se ejecute sin la pregunta???

Por el momento yo hace rato que hago lo de tener la hoja con la advertencia
y ocultar todo el resto con VeryHidden. Y hace poco por una sugerencia creo
de Héctor o de Fernando, antes de cerrar se oculta la ventana del libro y se
protege. Al abrir en el Open se muestra nuevamente. Si se abre sin Macros,
no se ve nada, y si se va a Ventana - Mostrar, entonces ahí aparece la hoja
protegida (para que no la toquen) y con la advertencia de hacerlo
habilitando macros.

Saludos.


"Adriano" escribió en el mensaje
news:#

Esto no es aconsejable, porque si uno abre un archivo de otra persona o
recibido por mail y no se está seguro que tiene virus macro, sería
peligroso. Siempre hay que dejarlo en nivel Medio y hacer lo que mencionó
Carlos.

Saludos.
Adriano

"Gilro" escribió en el mensaje
news:0a4901c50565$b74f4af0$
Lo mas comun es cambiar el nivel de seguridad de las
macros, ponerlo en "Low", esto te evita el dialogo del
inicio, permitiendo habilitar las macros contenidas en el
libro de manera automatica, tiene su pros y contras,
espero te sirva

Saludos
Gil Romero


>puedes poner una hoja en la que indiques la advertencia y
ocultar y mostrar
>todas tus hojas al abrir y cerrrar ,por medio de codigo,
de forma que si
>abren sin macros solo vean la hoja de la advertencia
>
>ejemplo.
>
>si la hoja con la advertencia se llama "Hoja3", pon este
codigo en
>ThisWorkbook
>
>Private Sub Workbook_BeforeClose(Cancel As Boolean)
>Dim h As Worksheet
>' primero hace visible la hoja3 ya que no puede ocultar
todas
>ThisWorkbook.Worksheets("Hoja3").Visible = xlSheetVisible
>For Each h In ThisWorkbook.Worksheets
> If h.Name <> "Hoja3" Then
> h.Visible = xlSheetVeryHidden
> End If
>Next
>End Sub
>
>Private Sub Workbook_Open()
>Dim h As Worksheet
>For Each h In ThisWorkbook.Worksheets
> h.Visible = xlSheetVisible
>Next
>'al final oculta la hoja 3, para que asegurar que exista
al menos una
>visible
>ThisWorkbook.Worksheets("Hoja3").Visible > xlSheetVeryHidden
>End Sub
>
>podiras pedirle adicionalmente que te active la hoja de
tu eleccion
>
>otra forma seria firmar digitalmente tu libro, de forma
que al instalarlo en
>una maquina pedira que valide la firma digital, si el
usuario acepta abrir
>el libro con macros, todos los libros que incluyan tu
firma se saltaran la
>advertencia sobre las macros y siempre se abriran con
macros, checa este
>link
>
>http://office.microsoft.com/es-
es/assistance/HP010446123082.aspx
>
>y utiliza la herramienta SELFCERT.EXE que se encuentra en
la carpeta de
>Microsoft Office\Office, de forma que tu mismo generes tu
frma digital
>
>aqui puedes localizar mas informacion al respecto
>http://search.microsoft.com/search/...x?view=es-
es&st=b&na‚&qu=firma+digital
>
>Saludos
>Carlos Durán
>
>
>
>"Luis Caro" escribió en el
mensaje
>news:%
>> Saludos a todos.
>> En qué forma puedo advertir a quien vaya a utilizar un
Programa con Macros
>> que debe hacer Clic en Habilitar Macros.
>> Tengo una Ayuda con Ventana Emergente para la apertura
del Programa,pero
>> esta se muestra después del aviso para Habilitar Macros.
>> Mil Gracias por las respuestas.
>>
>> Cordialmente
>> Luis Caro
>>
>> No somos 3.Quitar NOSPAMEPM.Poner epm.y el resto
>> http://usuarios.lycos.es/maderascolombianas2/
>> http://www.geocities.com/maderascolombianas2002
>>
>>
>
>
>.
>