Question

我在使用Excel（VBA）中的按钮创建PDF时遇到问题。

我们有这段代码：

Sub pdf_drucken2()
ChDir "C:\Users\Name"
Worksheets("LaptopReport").ExportAsFixedFormat Type:=x1TypePDF, Filename:= _
    "C:\Users\Name\test213.pdf", Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
    True
End Sub

我想在每台计算机上创建此PDF。当我将此Excel工作表发送给某人时，他也应该能够创建PDF。那么有没有一种方法可以创建PDF而无需指定像“C：\ Users \ Name \ test.pdf”这样的路径？

Answer 1

您可以使用环境变量来获取用户名：

Filename:= "C:\Users\" & Environ$("UserName") & "\Desktop\test213.pdf"

创建一个可由具有不同路径的每个人使用的文件名

1 个答案: