选择单元格并另存为PDF时,将工作表另存为单元名称

时间:2017-05-22 10:11:34

标签: excel vba excel-vba

这可能是基本的,我已经尝试了很多建议的答案,但我无法做到正确,可能是因为我指定了某些单元格进行保存(因为我每次都想要保存更多)。

我正在尝试将工作表保存为单元格C20,但如果我在文件名范围(“C20”)之后添加,则会赢得接受....

到目前为止,这是我的代码(正如您现在可以在测试9中看到的那样,并且可以绕圈子看到)

Sub Testsave9()
'
' Testsave9 Macro
'

'
    ActiveWindow.SmallScroll Down:=33
    Range("A1:J46").Select
    Range("A46").Activate
    Selection.ExportAsFixedFormat Type:=xlTypePDF, filename:= 
        "L:\Liberty 2017\Luke\Despatch Test\Despatch Save Location\NameHere.pdf", _
        Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
        :=False, OpenAfterPublish:=True
End Sub

在这段代码中,我在保存为框中将其保存为“NameHere”。如何告诉Excel将其保存为单元格C20中的值,同时保持打印规格?

由于

1 个答案:

答案 0 :(得分:0)

你应该可以使用:

Selection.ExportAsFixedFormat Type:=xlTypePDF, filename:= _
    "L:\Liberty 2017\Luke\Despatch Test\Despatch Save Location\" & Range("C20").Text & ".pdf", _
    Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
    :=False, OpenAfterPublish:=True

但是,您需要确保C20仅包含可在文件名等中使用的字符。