Question

我发现了一些可以工作的VBA脚本：

Sub ExportToPDF()

    With Sheets("Results").Range("B10:J100")
        .ExportAsFixedFormat _
            Type:=xlTypePDF, _
            FileName:="C:\Export.pdf", _
            Quality:=xlQualityStandard, _
            IncludeDocProperties:=True, _
            IgnorePrintAreas:=False, _
            OpenAfterPublish:=True
    End With

End Sub

我仍在学习VBA，我实际上不需要将范围另存为单独的文件，我只希望选择的范围以打开的PDF形式发布。

我不确定如何修改上面的代码

Answer 1

之后

<div>
  <table id="tabletodownload" ng-show="auditoriums === 'none'" style="border:1px solid #000;">

    <tr> 
        <th> Customer Name </th> 
        <th> Order Value </th> 
        <th> Ordered On</th> 
    </tr>

    <tr ng-repeat="audit in auditoriums| limitTo: 1 - auditoriums.length">
         <td>{{audit.NAME}}</td>
         <td>{{audit.ADDRESSBLOCKHOUSENUMBER}}</td>
         <td>{{audit.ADDRESSPOSTALCODE}}</td>
         <td>{{audit.ADDRESSSTREETNAME}}</td>
    </tr>
  </table>
  <br/>
</div>
<button type="button" id="btnDownload"> Download as CSV</button>

在您的代码中，您可以添加

End With

该代码对我有用。

祝你好运！

Answer 2

要导出为PDF，必须将文件保存到驱动器。对于将由多个用户使用的电子表格，VBA脚本中的FileName必须是所有用户都可以访问的通用驱动器。

将范围导出为PDF而不保存

2 个答案: