Como hacer que no se impriman labels con vba

Tengo un formulario en excel el cula tiene algunos label los cuales no quiero que se impriman, se que puedo cambiar la propiedad una a la vez, pero lo que quiero es aprender y agilizar trabajo. Gracias por la atención prestada

Ejemplo de como lo estoy intentando:

Sub NoImprimir ()
Dim Control As Object
For i = 1 To 17
Control = "Label" & i
    Hoja1.Control.PrintObject = False
Next
End Sub

1 Respuesta

Respuesta
2

Prueba así:

Sub RecorrerLabels()
Dim Etiqueta As OLEObject
  For Each Etiqueta In Worksheets("Hoja1").OLEObjects
    If Etiqueta.progID = "Forms.Label.1" _
    Then Etiqueta.PrintObject = False
  Next
End Sub

Comentas

Abraham Valencia

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas