Macro guardar como pdf relacionada a un botón

Necesito una macro relacionada a un botón. La idea es que al presionar dicho botón, se abra la ventana Guardar Como y permita guardar automáticamente en formato PDF.

El botón se encuentra en la misma hoja a guardar, por lo que al guardar en PDF se elimine dicho botón y se guarde la hoja 'limpia' sin el botón, el botón en el archivo excel debe quedar, solo se debe eliminar el botón al guardar la hoja en PDF.

1 respuesta

Respuesta
2

Para que no se imprima el botón, realiza lo siguiente:

1. Presiona click derecho del mouse sobre el botón.

2. Del menú que despliega selecciona la opción: "Tamaño y propiedades"

3. En la ventana "Propiedades", desactiva la casilla "Imprimir objeto"


Ahora pon el siguiente código en tu botón:

Sub Guardar_Pdf()
  Dim arch As Variant
  arch = Application.GetSaveAsFilename("nombre", "PDF Files (*.pdf), *.pdf")
  If arch <> False Then ActiveSheet.ExportAsFixedFormat xlTypePDF, arch, xlQualityStandard, True, False, , , False
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas