Buenas a todos, Estoy intentando realizar una macro que me imprima el excel en pdf todas las hojas que tengan en la casilla E1="ACTIVA", y que no se impriman las que en la casilla contenga el valor "NO ACTIVA". La idea es que se imprima todo como un único documento que contenga todas las hojas activas. He estado probando con esta macro pero al seleccionar la hoja siguiente se me anula la selección de la anterior y solo se imprime la útima. Sub PrintPDF1() For Each current In Worksheets If Sheets(current.Name).Cells(1, 5) = "ACTIVA" Then Sheets(current.Index).Select End If Next ChDir "C:\Users\p17q60\Desktop" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\p17q60\Desktop\IMPRIMIRPDF.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ True End Sub Tambien he probado hacer la selección con una matriz pero cuando incorporo a la matriz A() todas las hojas no se como seleccionarlas todas Sub PrintPDF2() Dim A() As Variant ReDim A(Sheets.Count) For Each current In Worksheets If Sheets(current.Name).Cells(1, 5) = "ACTIVA" Then A(current.Index - 1) = current.Name End If Sheets(a("NO SE COMO HACERLO)").Select Sheets(A(0)).Activate ChDir "C:\Users\p17q60\Desktop" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\p17q60\Desktop\IMPRIMIRPDF.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ True Next End Sub Muchas gracias por su tiempo

Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis Ingresar

JavaScript está desactivado. Para una mejor experiencia, por favor active JavaScript en su navegador antes de continuar.

Macro para imprimir

Autor del tema Sergio González1
Fecha de inicio 23 Sep 2016

Sergio González1

New member

23 Sep 2016

Buenas a todos,

Estoy intentando realizar una macro que me imprima el excel en pdf todas las hojas que tengan en la casilla E1="ACTIVA", y que no se impriman las que en la casilla contenga el...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

Iniciar sesión o registrarme para responder aquí.

Temas similares

Resuelto

Macro para poder imprimir código de barra

Respuestas: 5

10 Nov 2025

jcvelez

Resuelto

Como modificar macro para imprimir etiquetas

Respuestas: 8

26 Ago 2025

jcvelez

Pregunta

macro para imprimir en formato continuo 9 7/8 x 11 x 1 (carta)

Respuestas: 12

1 Jun 2025

Héctor Miguel

Pregunta

Macro elegir número de página a imprimir.

Respuestas: 8

9 Nov 2024

Julioma123

Pregunta

Ayuda para una macro imprimir pases de acuerdo al listado personas

Respuestas: 1

26 Oct 2024

Erik Lopez

Resuelto

ayuda imprimir label macro

Respuestas: 6

9 Jun 2024

kehaces

Pregunta

Macro para imprimir con saltos de página

Respuestas: 3

11 Mar 2024

Cazurro

Pregunta

Macro para imprimir solo celdas activas

Respuestas: 3

3 Mar 2024

Abraham.Valencia

Resuelto

Macro para imprimir

Respuestas: 9

29 Ene 2024

lula

Pregunta

Macro imprimir filas con condiciones

Respuestas: 2

20 Ene 2024

alejandroro81

Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Correo electrónico Enlace

Bienvenido a nuestro foro Excel 👋

Tenemos 135.000 usuarios registrados,
y 240.000 preguntas y respuestas Excel.

Primero 👉 regístrate gratis aquí 👈
para ver contenidos y descargas
sin restricciones!

Este sitio usa cookies para ayudar a personalizar el contenido, adaptar su experiencia y mantenerlo conectado si se registra.
Al continuar usando este sitio, usted está consintiendo nuestro uso de cookies.

Aceptar Saber más…

Volver

Arriba