我需要将Excel工作表导出为pdf或word doc,这并不重要。我知道该怎么做。
真正的问题是:所讨论的Excel工作表正在显示不同员工的姓名。在这些名称下,我们可以看到他们曾经工作过的每个公司的列表。名单很长。
我希望能够在提取发生时修改工作表的格式。
由于名称很多,我希望能够修改字体,间距,将它们绑起来一点,以便所有内容都可以放在一页中。
谢谢!
Sub MakePDF()
'
' MakePDF Macro
'
'
ChDir "C:\Users\charle\Desktop"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\charle\Desktop\EXCEL2PDF.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True
End Sub