Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo usar el botón de comando para guardar la hoja de trabajo activa como archivo PDF en Excel?

Mientras trabaja en Microsoft Excel, puede enfrentar el problema de guardar la hoja de trabajo activa como archivo PDF. En este artículo, puede aprender cómo guardar la hoja de trabajo activa como archivo PDF con código VBA a través de un botón de comando. Y si también desea guardar un rango o cada hoja de trabajo en el libro de trabajo activo como archivo PDF individual, este artículo también puede ayudarlo.

Utilice el botón de comando para guardar la hoja de cálculo activa como archivo PDF con código VBA

Guarde un rango de celdas seleccionadas como archivo PDF con Kutools for Excel

Guarde cada hoja de cálculo como archivo PDF individual del libro activo con Kutools para Excel


Guarde fácilmente la selección como archivo PDF en Excel:

Haz click Empresa > Import / Export > Exportar rango a archivo. El Kutools for Excel's Exportar rango a archivo utilidad le ayuda a exportar fácilmente la selección como archivo PDF en Excel. Ver la siguiente captura de pantalla:

Kutools for Excel incluye más de las útiles herramientas de Excel de 300. Gratis para probar sin limitaciones en los días 30. Descargue la versión de prueba gratuita ahora

selección de doc. a pdf

Ficha Office Habilite la edición y navegación con pestañas en Office y haga su trabajo mucho más fácil ...
Kutools for Excel trae las características avanzadas de 300 a Excel y aumenta su productividad en 80%
  • Super Formula Bar (edite fácilmente múltiples líneas de texto y fórmulas); Diseño de lectura (lea y edite fácilmente un gran número de celdas); Pegar en rango filtrado ...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combine filas duplicadas y suma / promedio ... Prevenga celdas duplicadas; Comparar rangos ...
  • Seleccione Filas duplicadas o únicas; Seleccione Filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta de varias celdas sin cambiar la referencia de fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, casillas de verificación y más ...
  • Favorito e inserte rápidamente fórmulas, rangos, gráficos e imágenes; Cifrar celdas con contraseña; Crear lista de correo y enviar correos electrónicos ...
  • Extraer texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios ...
  • Super filtro (guardar y aplicar esquemas de filtro a otras hojas); Avanzado Ordenar por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF ...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.

Utilice el botón de comando para guardar la hoja de cálculo activa como archivo PDF con código VBA


Puede ejecutar el siguiente código de VBA para guardar una hoja de cálculo activa como archivo PDF haciendo clic en un botón de comando. Por favor haz lo siguiente.

1. En primer lugar, debe crear una carpeta llamada PDF para guardar su nuevo archivo PDF convertido. Aquí creo esta carpeta en mi disco local (C :).

2. Por favor inserte un botón de comando haciendo clic Desarrollador > recuadro > Botón de comando (control ActiveX). Ver captura de pantalla:

2. Luego, dibuje un Botón de Comando en la hoja de trabajo que necesita para agregar nuevas filas, haga clic con el botón derecho en el Botón de Comando y haga clic Propiedades desde el menú contextual.

3. En el Propiedades cuadro de diálogo, ingrese el texto del botón de comando en el Subtítulo caja debajo del En la Categoría pestaña, y luego cierre el cuadro de diálogo.

Puede ver que el texto que se muestra del botón de comando se modifica como se muestra a continuación.

4. Haga clic derecho en el botón de comando nuevamente y luego haga clic Ver código desde el menú contextual.

5. En la apertura Microsoft Visual Basic para aplicaciones ventana, reemplace el código original en la ventana Código con el siguiente código VBA.

Código VBA: botón de comando para guardar la hoja de cálculo activa como PDF

Private Sub CommandButton1_Click()
    Application.ScreenUpdating = False
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
            Filename:="C:\PDF\Export.pdf", _
            OpenAfterPublish:=False
    Application.ScreenUpdating = True
End Sub

Nota: En el código, CommandButton1 es el nombre del botón de comando que usará para guardar la hoja activa como archivo PDF. "C: \ PDF \ Export.pdf" es la ruta y el nombre de su archivo PDF de guardado.

6. presione el otro + Q llaves al mismo tiempo para cerrar el Microsoft Visual Basic para aplicaciones ventana. Luego apaga el Modo de diseño bajo la Desarrollador lengüeta.

Ahora, haga clic en el botón de comando, la hoja de trabajo activa se guardará como un archivo PDF llamado Exportar y ubicado en la ubicación especificada.


Guarde un rango de celdas seleccionadas como archivo PDF con Kutools for Excel

Si solo desea guardar un rango de celdas seleccionadas como un archivo PDF, puede intentar Exportar rango a archivo utilidad de Kutools for Excel. Por favor haz lo siguiente.

1. Seleccione el rango que necesita guardar como archivo PDF, luego haga clic Empresa > Import / Export > Exportar rango a archivo. Ver captura de pantalla:

2. En el Exportar rango a archivo cuadro de diálogo, necesita:

2.1 Seleccione el PDF opción en la sección Formato de archivo;

2.2 Especifique una carpeta para guardar su archivo PDF en el Guardar dirección sección;

2.3 Haga clic en OK botón.

2.4 Asigne un nombre a su archivo PDF en el segundo cuadro de diálogo Exportar rango a archivo y luego haga clic en OK botón. Ver captura de pantalla:

Nota: Puede verificar cualquiera de los formatos Conservar, Conservar alturas de fila y Conservar anchos de columna en la sección Opciones de libro según lo necesite. Y puede abrir el archivo PDF exportado automáticamente al marcar Abra el archivo después de exportar encajonar.

Ahora el rango seleccionado se guarda como archivo PDF.

Propina.Si desea tener una versión de prueba gratuita de esta utilidad, vaya a descarga el software libremente primero, y luego vaya a aplicar la operación de acuerdo a los pasos anteriores.


Guarde cada hoja de cálculo como archivo PDF individual del libro activo con Kutools para Excel

Puede utilizar el Libro de trabajo dividido utilidad de Kutools for Excel para guardar cada hoja de trabajo en el libro de trabajo activo como archivo PDF individual fácilmente.

Kutools for Excel : con más de 300 útiles complementos de Excel, gratis para probar sin limitaciones en los días 60.

1. En el libro de trabajo, debe guardar cada hoja de trabajo como archivo PDF individual, luego haga clic Empresa > Libro de trabajo > Libro de trabajo dividido. Ver captura de pantalla:

2. En el Libro de trabajo dividido cuadro de diálogo, puede ver todas las hojas de trabajo se enumeran en el interior, seleccione PDF (* .pdf) Opción de la Guardar como tipo lista desplegable, y luego haga clic en Mini Split botón. Y en el estallido Busca por carpetas cuadro de diálogo, especifique una carpeta donde desea guardar los archivos PDF y luego haga clic en OK botón. Ver captura de pantalla:

Luego, todas las hojas de trabajo en el libro de trabajo activo se guardan de forma individual en un archivo PDF.

Propina.Si desea tener una versión de prueba gratuita de esta utilidad, vaya a descarga el software libremente primero, y luego vaya a aplicar la operación de acuerdo a los pasos anteriores.


Demostración: guarde la selección o cada hoja de trabajo como PDF con Kutools para Excel

Kutools for Excel incluye más de las útiles herramientas de Excel de 300. Gratis para probar sin limitaciones en los días 60. ¡Descargue la versión de prueba gratuita ahora!


Artículos relacionados:


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    atul tailor · 2 months ago
    plz paste coding for save as pdf button in microsoft excel
  • To post as a guest, your comment is unpublished.
    Nzee · 8 months ago
    IT SHOWS Run-Time error '1004'
    • To post as a guest, your comment is unpublished.
      crystal · 7 months ago
      Hi Nzee,
      I need to know your Excel version. Thank you for your comment.
  • To post as a guest, your comment is unpublished.
    Randy · 1 years ago
    I can convert my files to PDF now with a command button, but can I also get that same function to allow a different name to each file; based on an existed number structure?
  • To post as a guest, your comment is unpublished.
    Jo Colenso · 1 years ago
    I have a similar request I want the file to be named the same as a particular cell in the tab , IE: G19 ( This is the invoice number and I want the file to save as PDF with that name) ? . I have managed to get the export.pdf working but this isn't going to work on multiple saves.Any thoughts thanks
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Good Day,
      The following VBA code can help you solve the problem. Please select cell G19 in the popping up Kutoos for Excel dialog box after running the code. Thank you for your comment.

      Private Sub CommandButton1_Click()
      Dim xRg As Range
      Dim xName As String
      On Error Resume Next
      Application.ScreenUpdating = False
      Set xRg = Application.InputBox("Select the cell you will name the PDF with the cell value:", "Kutools for Excel", Selection.Address, , , , , 8)
      If xRg Is Nothing Then Exit Sub
      xName = xRg(1).Value
      ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
      Filename:="C:\PDF\" & xName & ".pdf", _
      OpenAfterPublish:=False
      Application.ScreenUpdating = True
      End Sub
  • To post as a guest, your comment is unpublished.
    Ian · 2 years ago
    Hi,
    How would one allow the user to enter the file name as opposed to "Export.pdf"?
    Thanks,
    Ian
    • To post as a guest, your comment is unpublished.
      Mayur · 1 years ago
      Sub SaveAsPDF()
      Application.Screen Updating = False
      ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
      Filename:=Application.InputBox("Enter File Name")

      strExcelPath = "H:\My Documents"

      Application.ScreenUpdating = True
      End Sub