Este fórum está sendo desativado

[topscore]

Pessoal, seguinte:

Por algum motivo não consigo anexar imagem, todas extensões são "inválidas", acho que é falha temporária do site. Mesmo assim, vamos lá:
Via botão no formulário, crio um PDF. As linhas, que no meu excel são pontilhadas, aparecem contínuas, grossas e desconfiguradas no PDF. Se eu deixar minhas linhas da tabela finas, simples, no PDF aparecem ainda mais grossas e irregulares.
Parece ser um problema recorrente do PDF.

Alguém sabe como arrumar isso? Segue parte do código que uso para criar o PDF. (O nome do arquivo está na B233, o local do arquivo é ThisWorkbook.Path)

Código: Selecionar todos

Dim NomePDF As String
NomePDF = Range("B233").Value

Application.DisplayAlerts = False
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
ThisWorkbook.Path & "\" & NomePDF _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True
Application.DisplayAlerts = True

Eu imaginei implementar esse código para configurar algo no PDF criado para manter a resolução das linhas. Ou algo totalmente diferente.
Se alguém puder ajudar, desde já, obrigado.