Tag: pdf的一代

如何使用JavaScript存储Excel文件

我一直在尝试使用Javascript存储Excel文件，但是我无法在所有浏览器上使用它。 我使用的第一种技术是BASE64与数据URL结合使用。 这在Chrome和Firefox中运行正常，但IE浏览器不支持这种技术。 newlink = document.createElement('a'); newlink.setAttribute('href', 'data:application/vnd.openxmlformats-officedocument.spreadsheetml.sheet;base64,' + response.data); newlink.setAttribute('download', 'test.xlsx'); newlink.click(); 我也尝试了Blob的东西..但是，这似乎不能正常使用像PDF，Excel和MS Word的二进制文件。 var report = response; var str = atob(report.data); var blob = new Blob([str], { type: report.type}); saveAs(blob, 'report.csv'); 这工作正常的CSV文件，但是当我用Excel或Word做同样的事情文件已损坏。 我正在使用AngularJS进行REST调用，并通过标头使用令牌authentication，所以只需使用一个URL，并做window.open（url）将无法正常工作，因为您将无权执行该请求。 我试过$资源和$ http，但两者都有相同的结果。 REST API的工作原理是，当我把URL公开（不需要authentication），并直接到我的浏览器的URL，它正确地下载文件，我可以打开它。 所以当我创buildBlob时看起来有些问题。 有没有人有一个想法如何解决这个问题？

Excel VBA以选定数量的副本将所选工作表导出为PDF

该工作簿由4个隐藏的表单组成。 如果在pdf中包含A1，则每个表中的A1值为1，否则为0。 作为一个新手这是我到目前为止： Private Sub CommandButton21_Click() Application.ScreenUpdating = False Sheets("print1").Visible = True Sheets("print2").Visible = True Sheets("print3").Visible = True Sheets("print4").Visible = True ThisWorkbook.Sheets(Array("print1", "print2")).Select iPtr = InStrRev(ActiveWorkbook.FullName, ".") If iPtr = 0 Then sFileName = ActiveWorkbook.FullName & ".pdf" Else sFileName = Left(ActiveWorkbook.FullName, iPtr – 1) & ".pdf" End If sFileName = Application.GetSaveAsFilename(InitialFileName:=sFileName, FileFilter:="PDF Files (*.pdf), *.pdf") […]

C ++ ExportAsFixedFormat保存为PDF

我使用VS2010 C ++和Office 2010来创build基于Excel模板的报表。 C ++可以成功打开，插入值并将xlsx保存为其他内容，但是我希望它也可以将其另存为PDF。 尽pipe在VB，C＃和PowerShell中看到了一些示例，但我正在努力使用ExportAsFixedFormat（）函数的_variant_t参数。 任何人都可以提供示例代码？ 我的function的shell： Excel::_ApplicationPtr pXL; if (FAILED(pXL.CreateInstance("Excel.Application"))) { return FALSE; } pXL->Workbooks->Open("c:\\tempRep.xlsx"); pXL->PutVisible(0, FALSE); // Get the active worksheet Excel::_WorksheetPtr pWksheet = pXL->ActiveSheet; //… use the spreadsheet // Save the worksheet pWksheet->SaveAs("c:\\newRep.xlsx"); pWksheet->ExportAsFixedFormat(??const _variant_t &Filename, ….??) 谢谢，史蒂夫

Excel VBA，分页工作表，分页保存为PDF，以及基于值的自动调用

我刚刚开始掌握一些基本的vba，并已经使用下面的代码将一个大的工作表分成单独的xls文件，在这里find了一个分页符（已经使用小计函数插入）。 此代码还根据单元格中的值命名每个文件。 Sub Sample() Dim rowCurrent As Long, rowPrevious As Long, i As Long Dim oWB As Workbook, newWbk As Workbook Dim oWS As Worksheet Set oWB = ActiveWorkbook Set oWS = oWB.Sheets("Specials") rowPrevious = oWS.UsedRange.Row + oWS.UsedRange.Rows.Count – 1 For i = oWS.HPageBreaks.Count To 0 Step -1 If i = 0 Then oWS.Rows("1:" & […]

合并两个Excel VBA代码（另存为PDF +通过Outlook发送）

好心我有一个两个VBA代码之一是保存打印区域为与工作簿同名的PDF和保存文件位置是桌面，它工作正常，我有另一个代码，启动Outlook新消息，并采取一些特定的单元格价值作为主体，另一个价值体现。 问题是我想要新邮件的代码附加从代码1保存的PDF文件，并使主题相同的PDF文件名。 保存pdf代码是： Sub Save_as_pdf() Dim FSO As Object Dim s(1) As String Dim sNewFilePath As String Set FSO = CreateObject("Scripting.FileSystemObject") s(0) = "C:\Users\" & Environ("UserName") & "\Desktop\" & ThisWorkbook.Name If FSO.FileExists(ThisWorkbook.FullName) Then '//Change Excel Extension to PDF extension in FilePath s(1) = FSO.GetExtensionName(s(0)) If s(1) <> "" Then s(1) = "." & s(1) sNewFilePath […]

适用于Mac的Excel VBA：将工作表另存为PDF

我实际上正在处理一个简单的macros来将活动工作表保存为具有特殊名称的PDF文件。 我创build的macros正在工作，但是它将每张纸保存在多个PDF中，并将该工作表的名称放在文件名的末尾。 如果你能帮助我，这将是伟大的，我看不出有什么问题… 这是我的macros： Sub PrintPDF() Dim wksSheet As Worksheet Dim strFile As String Set wksSheet = ActiveSheet 'strFile = Format(Now(), "yyyymm") _ & ".pdf" strFile = "blabla" _ & "_" _ & Format(Now(), "yyyymm") _ & "_" _ & "name2" _ & " " _ & Replace(Replace(wksSheet.Cells(1, 2).Value, " ", ""), ".", "_") _ […]

导出为PDF时页面不会缩放，这会打乱打印

我已经在Excel工作表中创build分页符使用： ActiveSheet.HPageBreaks.Add 完成这些之后，我在Excel中打印输出，就像我想要的一样。 但是，如果我将Excel工作表导出为PDF，我将得到以下两种情况之一： 如果内容不需要缩放以适应页面，那么页面在PDF中看起来也很棒 如果内容需要缩放以适应页面，则不是缩放，而是在PDF中创build额外的分页符。 第二种情况是不需要的。 是否有可能将缩放页面发送到PDF？

从PDF文件中提取每个句子到Excel中的单独单元格？

正如标题所示，我有一个文件需要将每个句子提取到Excel中的单元格，每个单元格一个。 句子提取可以像find下一个". "一样简单，并提取到一个单元格。 问题是除了MATLAB之外，我真的不知道任何编程语言（我是机械工程师）。 如果它可以忽略表格/图片的真棒，如果没有，它可以很好，只要它遇到一个表/图片时不会搞砸。 我知道我没有给你很多工作，但任何帮助表示赞赏。

是否有可能从Excel创build可填写的PDF？

目前，我有一个Excel文件，启动时显示一个用户表单，用户可以填写几个文本框/combobox，然后按创build。 一旦按下创build，它会收集存储的数据，并创build一个我们发送给供应商的PDF。 这本质上是一个发票。 收到此PDF的供应商必须填写几行，然后将其返回给我们。 现在，如果他们没有acrobat / reader的经验，他们正在打印PDF，然后扫描并返回给我们。 我希望供应商能够在PDF上input几个区域并将其返回给我们。 我的问题是，我可以从Excel创build一个可填写的PDF？ 有谁知道如何使用Excelfunction或使用VBA做到这一点？ 或者其他方法？ 谢谢！ 布兰登

在VBA中过滤并保存为pdf

我想移动一个filter，并在移到下一个filter项目之前，将过滤后的页面上显示的内容打印到一个pdf文件中。 推动这个想法是，我需要报告我所在州的每个学区的学校build筑信息。 我现在有数据坐在一张桌子（如果代码能够更好地工作，可以很容易地与一个切片机一起使用），并根据需要设置滤镜。 列的长度将随着分区的变化而变化以适应不同的尺寸。 目前，我的代码不起作用。 我需要帮助找出原因。 Sub ShiftandPrint() Dim i As Integer i = 1 For cl = 1 To Columns.Count n = WorksheetFunction.CountA(Columns(cl)) Next Do While Cells(3, i).Value <> "" With Sheet1 .AutoFilterMode = False .Range("n").AutoFilter .Range("n").AutoFilter Field:=1, Criteria1:=Cell(3, i) End With Dim fName As String With ActiveSheet fName = .Range("A1").Value & .Range("A2").Value .ExportAsFixedFormat […]