Red de conocimiento informático - Problemas con los teléfonos móviles - tutorial vba pdf

tutorial vba pdf

Sub Macro1()

<'

If MsgBox("¿Está seguro de que desea guardar como PDF", vbOKCancel) = vbOK Entonces

ActiveSheet.ExportAsFixedFormat Tipo:=xlTypePDF, Nombre de archivo:=_

"D:\" & Formato(Now(), "aaaammdd-hhmmss") & ".pdf"

Finalizar si

Fin Sub