Jump to content

Search the Community

Showing results for tags 'pdf'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • ¿Eres nuevo? Lee las Normas y Reglas del Foro
    • Presentaciones
  • Dudas y consultas sobre Excel
    • Excel General
    • Macros y programación VBA
    • Power BI
    • Access, Word, Power Point, Outlook etc...
    • Comparte tus aportes
  • Sobre ayudaexcel.com
    • Solicitud proyectos
    • Blog
    • Plantillas
    • Productos de ayudaexcel
    • Megaguías
  • Otras aplicaciones de Microsoft Office
  • Variedades
    • Cafeteria Ayuda Excel
    • Temas resueltos
    • Temas Abandonados
  • Archive
  • Resources
    • Ideas y aportes

Categories

  • Tools
  • Add-ins
  • Store
  • Finance
  • Dpto. Admin
  • Purchasing
  • Agendas
  • Data registry

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


AIM


MSN


Website URL


ICQ


Yahoo


Skype


Facebook


Twitter


Localización:


Interests

Found 2 results

  1. Muy buenos días, tardes, noches compañeros expertos en VBA. Quisiera molestarlos con algo que necesito hacer, pero no logro encontrar la documentación adecuada para llevar a cabo mi propósito. El tema es el siguiente: Tengo una macro, la cual funciona perfectamente, ya que me genera un PDF de la hoja en Excel activa. La cuestión es que lo que necesito es que la macro me genere el PDF únicamente del área de impresión, sin que se vea el resto de la hoja en blanco, tal como se ve en el ejemplo que adjunto. La macro que uso es la siguiente: Sub HojaEnPDF() Application.ScreenUpdating = False Dim Hoja As Worksheet Dim Nombre As String Dim Original As String, Nuevo As String Dim Ruta As String Set Hoja = ActiveSheet Original = ActiveWorkbook.Name Nuevo = Left(Original, InStrRev(Original, ".") - 1) Nombre = Nuevo & "-" & Hoja.Name & ".pdf" Ruta = ActiveWorkbook.Path Hoja.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Ruta & "\" & Nombre, quality:=xlQualityStandard, _ includedocproperties:=True, ignoreprintareas:=False, openafterpublish:=True Application.ScreenUpdating = True End Sub Por si alguien me pudiera ayudar, se lo voy a agradecer. Recibo AE.xlsx Recibo AE-Hoja1.pdf
  2. Amigos, tengo un problema. Tengo una macro que guarda un archivo pdf en un fichero X, cuando en Filename escribo el nombre con el que se guardara no tengo problema, se guarda de manera correcta, pero cuando uso la variable para que guarde con un nombre distinto cada vez, me envía un error en tiempo de ejecución y no se guarda el documento. No hay problema con la ruta, la variable funciona bien, pero la variable que contiene el nombre envía el error. Les dejo el codigo. Dim Ruta As String Dim Nombre As String Ruta = Sheets("portada").Range("O2") & "\" Nombre = "Comprobante:" & Range("E7").Value & "-" & Range("L14").Value & ".pdf" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=Ruta & Nombre, _ quality:=xlQualityStandard, includedocproperties:=False, _ ignoreprintareas:=False, openafterpublish:=True Application.Dialogs(xlDialogPrintPreview).Show espero puedan ayudarme,muchas gracias.
×
×
  • Create New...

Important Information

Privacy Policy