Actividad pública reciente
Ha valorado "Buena" la respuesta
Botón para Guardar e Imprimir
Espero te sirva. Sub Macro1() Sheets("Hoja2").Activate ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Documents and Settings\UdeA\Mis documentos\" & _ Sheets(1).Range("B4").Value & ".pdf", Quality:= _ xlQualityStandard,...