Criar botão exportar userform em PDF & enviar por e-mail

[Jtruculo]

Boa tarde pessoal!

Apliquei um código para imrimir um userform, mas surgiu uma demanda diferente,
preciso agora de um código para salvar um userform em PDF e ou enviar por email em PDF.
Pelo menos salvar o userform em PDF, já ajuda.
Alguém tem um script VBA para realizar esta operação?
Desde já obrigado.

[webmaster]

Colega,

Fiz uma busca rapida no forum por "exportar para PDF" e retornou varios resultados:

search.php?keywords=exportar+para+pdf

Um deles deve ajudar

[Jtruculo]

Boa noite!

Negativo amigão, não achei nada.
Em buscas por ai consegui este código super simples que salva em PDF, mas preciso que ele salve o userform, lá onde tá a Plan2

Sub SALVAR_PDF()
Application.DisplayAlerts = False
Dim EU
EU = "Daily Report"
template_file = ActiveWorkbook.FullName


fileSaveName = Application.GetSaveAsFilename( _
InitialFileName:=VBA.Strings.Format(EU) + ".PDF", _
fileFilter:="Arquivo PDF (*.pdf), *.pdf")

If fileSaveName <> False Then


Plan2.ExportAsFixedFormat Type:=xlTypePDF, Filename:=fileSaveName, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True


Exit Sub
End If



End Sub