Macro imprimir hojas
Tengo un libro excel con 40 hojas. No siempre se rellenan todas. Como podría mediante una macro o vba imprimir solo aquellas que tengan datos. O imprimir desde la ultima escrita hasta la primera. Mediante una casilla de verificación o similar. O ya puestos una caja de dialogo que me pregunte que hojas quiero imprimir.(El rango de impresión ya está definido en todas)
Respuesta de vorkosigan
1
Puedes usar algo como:
sub imprimir()
s1 = InputBox("inicio")
s2 = InputBox("final")
Application.ActivePrinter = "Adobe PDF en Ne06:"
Selection.PrintOut From:=s1, To:=s2, Copies:=1, ActivePrinter:="Adobe PDF en Ne06:", Collate:=True
end sub
sub imprimir()
s1 = InputBox("inicio")
s2 = InputBox("final")
Application.ActivePrinter = "Adobe PDF en Ne06:"
Selection.PrintOut From:=s1, To:=s2, Copies:=1, ActivePrinter:="Adobe PDF en Ne06:", Collate:=True
end sub
