Question

我想要从Access报告导出到pdf，其名称由报告中的数据管理。

我已经创建了下面的代码，但它只将文件保存为_.pdf而不是我想要的值。

我破坏了这个报告。看起来报告中的数据似乎没有通过代码，但我不确定如何以及是否正确。

有人可以用尽可能简单的英语帮助我。非常感谢

Sub outputpdf()

    Dim myPath As String
    Dim strReportName As String
    Dim stritem As String
    Dim strcont As String
    Dim strid As String
    Dim struniq As String

    DoCmd.OpenReport "outputreport", acViewPreview

    myPath = "D:\simon\test\"

    strReportName = stritem + strcont + ".pdf"
    'strReportName = Item + contract_number + "_"+ ".pdf"

    DoCmd.OutputTo acOutputReport, "", acFormatPDF, myPath & strReportName, False

    DoCmd.Close acReport, "outputreport"

End Sub

Answer 1

访问和VBA连接使用&运算符而非+使用C语言。

strReportName = stritem + strcont + ".pdf"

要

strReportName = strItem & strcont & ".pdf"

你觉得在底部是正确的，我认为......

编辑：

构建它

Sub ObjectBuilder()
Dim item As String, cont As String

item = InputBox("Enter Item", "Item", "12345")
cont = InputBox("Enter Container?", "Container", "Shipping Crate")

OutputPdf item, cont

End Sub

然后使用它

Sub OutputPdf(item As String, cont As String)
'your code
 strItem = item
 strCont = cont
End Sub

从具有数据名称的访问报告导出为pdf

1 个答案: