|
1.我想在点击打印按钮之后,输出文件名为 时间+客户名称
2.输出文件位置能自定义到指定文件夹
附录代码:
Sub 打印PDF()
Sheet1.Range("F7:P34").ExportAsFixedFormat xlTypePDF, ThisWorkbook.Path & "\" & Sheet1.Range("H11").Value & ".pdf", , , False
End Sub
这是一点VBA不会呀 ![](static/image/smiley/default/funk.gif)
Sheet1.Range("F7:P34").ExportAsFixedFormat xlTypePDF, "E:\订单保存\" & format(Sheet1.Range("o11").Value,"YYYY-MM-DD") & Sheet1.Range("H11").Value & ".pdf", , , False
|
|