Como bloqueo worksheets para que no puedan imprimirse?

26/10/2004 - 17:03 por argus02 | Informe spam
Necesito compartir planillas con otros usuarios pero que no puedan
imprimirse. Hay algun comando o alguna opcion en VB que pueda ayudarme?
 

Leer las respuestas

#1 Lisandro
26/10/2004 - 17:31 | Informe spam
Hola Argus02!
Este fue expuesto con anterioridad y funciona
perfectamente pruebalo..
Alt+F11 ve al Thisworbook y copia lo siguiente.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Select Case InputBox( _
"Indica por favor tu clave de acceso.", _
"Privilegios del impresor...")
Case "132", "156"
MsgBox "Clave aceptada. Iniciando proceso..."
Case Else
MsgBox "Por favor, llama al operador
correspondiente.", , _
"Clave rechazada..."
Cancel = True
End Select
End Sub

'Puedes cambiar los Nros "132" y "156" y colocar los de tu
preferencia. Este es la clave asignada hasta ahora.
'Cualquier duda comenta.
'Saludos
'Lisandro



Necesito compartir planillas con otros usuarios pero que


no puedan
imprimirse. Hay algun comando o alguna opcion en VB que


pueda ayudarme?
.

Preguntas similares