Ocultar celta al momento de imprimir una hoja
Hola tengo una hoja en la cual hay una celda que contiene el total de personas, esta celta esta en el encabezado y no quiero que me salga al momento de imprimir la hoja
Gracias por la atención.
1 respuesta
Con esta opción harás que el texto que contiene tu celda se pinte de blanco. Con ello, lograr hacer que al momento de imprimir se oculte el valor.
Debes poner las siguientes lineas en el ThisWorkbook de tu libro. En este ejemplo lo hago sobre la celda A1.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Range("A1").Select
With Selection.Font
.ThemeColor = xlThemeColorDark1
.TintAndShade = 0
End With
End Sub
Gracias por la respuesta
Aun me queda una duda, el problema es que después de imprimir necesito que se restablezca al color original ya que esta celda la tengo bloqueada y después de imprimir se queda en blanco.
Saludos
La reversa a esto seria crear un botón que tenga el siguiente código.
Sub Macro1()
'
' Macro1 Macro
'
'
Range("A1").Select
With Selection.Font
.ColorIndex = xlAutomatic
.TintAndShade = 0
End With
End Sub
