Excel - macro para guardar pdf

holaa todos , tengo una macro que me permite crear y enviar un archivo en pdf , pero no me deja poder configuarlo en forma horizontal , al darle orientation=xllandscape en los atributos del pdf , me dice que no encuentra en archivo y si lo quito me la guarda pero de forma vertical , espero me pueda colocaborar , manejo 2 impresoras en mi pc unoa de punto de venta y otra normal , por eso necesito ese cambio de impresora al enviar el archivo

anexo el codigo de la macro

alguna sugerencia seria de mucha ayuda

gracias

• codigo-macro.rar(1,1 KB)

No veo el parámetro orientation en la ayuda de office para el objeto.
Prueba entonces a configurar primero tu hoja:
Sheets(nombreHojaAqui).PageSetup.Orientation = xlLandscape

Espero te funcione.