Dr Hyde
-
Contador de contenido
498 -
Unido
-
Última visita
-
Días con premio
16
4 Seguidores
Visitantes recientes del perfil
4441 visitas de perfil
Dr Hyde's Achievements
Novato (1/14)
230
Reputación de la comunidad
Actualización simple de estatus
Ver todas las actualizaciones por Dr Hyde
-
Tengo estas líneas, solo quiero que al final el archivo pdf que se genera, se guarde en el escritorio de mi pc. Ahora mismo se guarda por defecto en mis documentos.
ActiveSheet.Select
Range("B1:AB" & uf).Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ru & Range("C9") & " - " & Format(Range("C6"), "dd-mm-yyyy") & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub
