Macros en Excel 2003

13/11/2007 - 22:20 por Giancarlo | Informe spam
He creado un codigo dentro del editor de visual en macros, que encontre en
una página, sin embargo no logro hacer que funcione, debo hacer alguna
activación de los eventos o algo así?, el codigo es el siguiente:

Sub Worksheet_BeforePrint(ByRef Cancel As Boolean)
Dim rsp
rsp = MsgBox("Va a imprimir", vbYesNo)
If rsp = vbYes Then
MsgBox "Dijo si"
End If
Cancel = True
End Sub

La idea es que no puedan imprimir el contenido de las hojas dentro del
libro. Gracias por la ayuda.
 

Leer las respuestas

#1 Giancarlo
13/11/2007 - 23:05 | Informe spam
Encontre el problema, la situacion es que estaba colocando el código en la
hoja y no en el libro, sin embargo, es posible hacerlo para una hoja?, es
posible hacerlo de otra forma, sin que el usuario pueda inhabilitar los
macros?. Gracias.

"Giancarlo" wrote:

He creado un codigo dentro del editor de visual en macros, que encontre en
una página, sin embargo no logro hacer que funcione, debo hacer alguna
activación de los eventos o algo así?, el codigo es el siguiente:

Sub Worksheet_BeforePrint(ByRef Cancel As Boolean)
Dim rsp
rsp = MsgBox("Va a imprimir", vbYesNo)
If rsp = vbYes Then
MsgBox "Dijo si"
End If
Cancel = True
End Sub

La idea es que no puedan imprimir el contenido de las hojas dentro del
libro. Gracias por la ayuda.

Preguntas similares