我有一个vba代码,导出excel表格为pdf的文件名为基础。如果"File Name“是相同的,我想将pdf附加到一个文件中。即。图纸2和图纸3将位于一个名为Overflow的文件中。
我目前的代码不附加,它只做单个pdf页面。有没有办法做一些IF语句where file Name >1,然后将它们附加到一个pdf文件中?
Sub CreatePDF_Button_Click()
Dim SheetName As String
With Worksheets("PDF Management")
LastRow
我有一个单表电子表格,在前几行和前几列中有一些数据。我的最终目标是拍摄特定图纸的快照,并将其导出为PDF。下面的函数正确地导出了一个PDF,但是对getDataAsString()的调用返回一个空的PDF。
function export() {
var spreadsheet = SpreadsheetApp.openById(SOURCE);
var exportFile= DriveApp.getFileById(PDF_EXPORT_FILE);
var pdfContent = spreadsheet.getBlob().getAs('application/
所以我一直在做这个简单的程序来查找图纸的规格。其中一个等级库是图形的缩略图图像。我不想尝试管理数据库中可能有1000张图像(可以随时更改)的内容,所以我创建了一个true/false字段。如果对于该记录为真,则在图片框中显示相应缩略图。
它工作得很漂亮..。如果我在代码中输入整个路径。但是如果我把程序给一个朋友呢?因此,我一直在尝试寻找一种方法,使程序可以找到无用的图像。我一整天都在寻找答案,终于到了这一步……寻求帮助。
If CBool(db.getField("PDF")) = True Then
'pbxPDFThumb.ImageLocat