Tag: acrobat

没有看到Excel VBA的PDF字段

我的任务是创build一个Excel工具,将数千个PDF数据导入到Excel中。 我已经安装了Adobe Acrobat X Professional,它似乎工作正常。 我正在使用Excel 2007。 我在这里find示例代码: http : //khkonsulting.com/2010/09/reading-pdf-form-fields-with-vba/ 并稍微修改它,以提示我浏览到PDF文件,并设置“Adobe Acrobat 10.0types库”的引用,我想这个代码: Sub Main() Dim AcroApp As Acrobat.CAcroApp Dim theForm As Acrobat.CAcroPDDoc Dim jso As Object Dim text1, text2 As String Set AcroApp = CreateObject("AcroExch.App") Set theForm = CreateObject("AcroExch.PDDoc") Dim strFullPath As String strFullPath = Application.GetOpenFilename() theForm.Open (strFullPath) 'theForm.Open ("C:\temp\sampleForm.pdf") Set jso = […]

从数据库生成多个pdf

我想一次生成多个PDF文件。 这些pdf应该从数据库中提取数据。 它可以是一个Excel表或关系数据库,无所谓,我可以创build任何东西。 在adobe acrobat pro中使用excel和javascript我设法将数据拉到模板pdf中,但是对于excel表格中的每个logging(行),我必须手动生成一个pdf,然后是另一个,等等..还有一个很多的logging,所以我想尽可能自动做到这一点。 有没有办法做到这一点? 有什么build议么? 我添加了一个图像来更好地解释它…

Excel – VBA – ExportAsFixedFormat PDF文件太大

使用macros将工作表的副本保存为PDF到我的桌面。 但是,使用我的macros时,实际的文件大小会导致文件大小增加两到三倍,而如果我手动使用Excel,请转到Acrobat选项卡并创buildPDF。 我需要进一步缩小pdf的文件大小。 我已经设置了一个小的打印区域,尝试使用最低的质量,减less图像大小之前,手等。有更好的select打印一个较小的文件大小的工作表的PDF格式? 文件之间的差异是100kb,而280kb。 ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Quality:=xlQualityMinimum, IgnorePrintAreas:=False, Filename:="C:\

将数据从Excel导出为pdf格式,而不保存为.csv或其他文件

我有一个非常复杂的Excel工作簿,在工作表中的一个工作表上,我的老板希望将一些值放在Acrobat表单中。 我能够find并编辑一个macros(我在这里find),将打开一个空白版本的表单。 我被要求find一种方法,然后在Acrobat模板自动填充表格字段从Excel工作表中的匹配标题(提供一个字段被填写为起点),但没有将Excel工作表保存到.csv到标签划定或任何一个间歇的步骤。 或者相反,在Excel工作表中创build一个macros,它将从当前行取得值并打开,然后填充Acrobat表单。 这可以在Excel或Acrobat Pro中使用吗? 我不太了解java或Visual Basic,所以请耐心等待。 任何帮助你可以提供将不胜感激。 谢谢。

如何在LiveCycle中计算多个页面到总计?

我不是程序员,但我必须创build一个旅行费用表。 它必须是PDF格式(最好是Adobe Acrobat编辑)。 我用Excel创build了表单并将其导出到Adobe,但是当然,这些公式不会传输。 我有3页是相同的计算旅行费用,唯一的区别是第一页上有一个额外的单元格计算总计从每页到总计。 听起来很容易。 所有的页面都单独计算,没有问题,但是我不能从总页数到总页数的总页数。 我使用的是Adobe LiveCycle,因为它“简化”像我这样的人的编程过程。 到目前为止它已经工作得很好,但这是我唯一遇到的问题,也是唯一让我无法使用表单的问题。 这三个页面都在同一个文档中。 当我使用FormCalc在每个页面内的总数,它很好: topmostSubform.Page1.P1TotalGrand :: calculate – (FormCalc,client)$ = P1MileageTotal + P1TransAirTotal + P1CarRenTotal + P1HotelTotal + P1AllowTotal + P1PhoneTotal + P1MIETotal + P1BusMealTotal + P1OtherTotal 如果我进入下一页,看起来像这样: topmostSubform.Page2.P1TotalGrand :: calculate – (FormCalc,client)$ = P1MileageTotal + P1TransAirTotal + P1CarRenTotal + P1HotelTotal + P1AllowTotal + P1PhoneTotal + P1MIETotal […]

closures最后一个文档后closures应用程序(Acrobat,Word,Excel)

我有一些生成Word,Excel或PDF文档的function。 例如,我正在处理的是将报告导出到PDF文件。 closures报告后,它将打开使用LiveCycle ES 8.2创build的另一个PDF表单,并使用数据库中的数据填充该表单。 在此之后,文档被closures,但由于某种原因,Acrobat的实例仍然在前台打开,没有打开任何文档。 这里是代码: DoCmd.OpenReport "myReport", acViewPreview DoCmd.OutputTo acOutputReport, "", acFormatPDF, "C:\myReport.pdf", False DoCmd.Close acReport, "myReport" Dim gApp, avDoc, pdDoc, jso Set gApp = CreateObject("AcroExch.app") Set avDoc = CreateObject("AcroExch.AVDoc") If avDoc.Open(exprPDF, "") Then Set pdDoc = avDoc.GetPDDoc() Set jso = pdDoc.GetJSObject '[…] pdDoc.Save PDSaveIncremental, FileNm 'Save changes to the PDF document pdDoc.Close […]

复杂的Adobe Acrobat计算

我在Excel中创build了一个复杂的定价表单,用于我所有的引用,但引用变得越来越耗时,我想创build一个PDF版本,人们可以调整选项以适应他们的预算。 我试图找出Javascript,但格式是外星人,我找不到任何人谁已经创造了类似的计算,是有人能够帮助? 将有多个“部分”,其中每个部分的总计将被计算为总计,但是每个“部分”基本相同。 但诀窍是,我希望每个“部分”的基本成本只有在input有效数量后才显示(例如25+)。 每个单选button“select”也必须具有唯一的值, 例如 。 SizeChoice1 = 1,SizeChoice2 = 2,SizeChoice3 = 3。 所以内容摘要(excel风格)是: 如果QTY> 25(250+(SizeChoice(1,2或3)* QTY)+(ColourChoice(1,2或3)* QTY)+ StockChoice(1,2或3)* QTY),如果QTY <25 = 0 如果可能的话,还最好总计四舍五入。

Acrobat无法读取使用Excel VBA编写的.FDF

我用FDF中的表单字段导出了一个PDF,并写了一个子expression式来输出另一个FDF,字段值为表单字段值。 如果我在文本编辑器中编辑FDF并更改值,Acrobat可以很好地读取文件,但是使用VBA输出的文件会引发错误: Adobe无法打开任何 .fdf文件,因为它不是支持的文件types,或者是因为文件已损坏 我已经尝试了两种不同types的换行符,我尝试了一个与xfdf格式相似的子类,它与相同的结果略有不同。 Sub something() Dim sht As Worksheet Set sht = Sheets("owssvr") Dim lastrow As Integer lastrow = sht.Cells(sht.Rows.Count, "A").End(xlUp).Row Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") Dim Fileout As Object Dim x As Integer For x = 2 To lastrow Set Fileout = fso.CreateTextFile("C:\Users\blabla\" & x & ".fdf", True, True) […]

如何将多个范围导出到单个PDF?

我想从同一张纸上输出多个范围到一个pdf。 帐户1在列A中开始,帐户2在列C中开始,帐户3在列E中开始,依此类推。 每个帐户可以是n行,但是我只希望在pdf中的每个帐户上最多有50行,例如 Account 1 = 100 rows long Account 2 = 32 rows long Account 3 = 56 rows long 在这种情况下,我希望我的pdf看起来像这样: Sheet 1 = first 50 rows of account 1 Sheet 2 = next 50 rows of account 1 Sheet 3 = first 32 rows of account 2 Sheet 4 = first 50 rows […]

通过Excel VBA引用Acrobat Javascript全局variables所需的语法是什么?

我有一个Acrobat .pdf文件,其中包含一个Javascript全局variables。 我正在试图从VBA中获取代码,它将从Acrobat中引用这个全局的值,但是我不能完全弄清楚这样做的必要语法。 我认为这是一个微不足道的简单问题,但它却让我难住了。 基本上,在我的Acrobat / .pdf文件中,我有一些非常简单的Javascript定义: global.ReturnString = "Arbitrary String"; 然后我有另一个非常简单的button,显示返回string作为应用程序警报: app.alert(global.ReturnString); 我想要做的就是能够通过Excel消息框重现这个非常简单的function。 换句话说,我只想编写一些可以在Excel中成功执行的工作VBA代码: MsgBox (SomeSortOfPointerToAcrobat.Global.ReturnString) 到目前为止,我还没有能够得到这个工作。 我试过使用GetJSObject作为构造在Acrobat和Excel之间传递信息(下面的VBA代码)。 我正在打开Excel用户窗体中的.pdf文件,当时我试图在Excel VBA中引用JavaScript全局variables: Dim gAPP As Acrobat.CAcroApp Dim gPDDOC As Acrobat.CAcroPDDoc Dim jso As Object Set gAPP = CreateObject("AcroExch.App") Set gPDDOC = CreateObject("AcroExch.PDDoc") If gPDDOC.Open("C:\path\testdoc.pdf") Then Set jso= gPDDOC.GetJSObject MsgBox (jso.Global.ReturnString) End If 但是这总是会导致运行时错误'438':对象不支持这个属性或方法。 我有添加到我的VBA项目的Adobe Acrobat 10.0types库。 […]