用vba把excel文件发布转化为pdf格式文件

2021-07-03 11:06

阅读：1122

标签：filename pre eth vba .com PDF文件转化 ali each

将工作薄每一个工作表导出为PDF文件。

Sub aliensky()
 Dim asy As Worksheet
 Dim spath As String
 spath = Excel.ThisWorkbook.Path
 For Each asy In Excel.ThisWorkbook.Worksheets
 sName = spath & "\" & asy.Name & ".pdf"
 asy.ExportAsFixedFormat Type:=xlTypePDF, Filename:=sName
 Next
End Sub

将当前工作表导出为PDF文件。

Sub aliensky1()
spatch = Excel.ThisWorkbook.Path
sName = spatch & "\" & ActiveWorkbook.Name & ".pdf"
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=sName
End Sub

VBA 参考文档

https://msdn.microsoft.com/zh-cn/VBA/Excel-VBA/articles/workbook-exportasfixedformat-method-excel

用vba把excel文件发布转化为pdf格式文件

标签：filename pre eth vba .com PDF文件转化 ali each

原文地址：https://www.cnblogs.com/aliensky/p/9622682.html

上一篇：-实现 LFU 缓存算法

下一篇：SpringBoot集成Redis分布式锁以及Redis缓存

文章来自：搜素材网的编程语言模块，转载请注明文章出处。
文章标题：用vba把excel文件发布转化为pdf格式文件
文章链接：http://soscw.com/index.php/essay/101236.html

亲，登录后才可以留言！

用vba把excel文件发布转化为pdf格式文件

评论

热门文章

推荐文章

最新文章

置顶文章