繁体   English   中英

将 PDF 导入 Excel

Import PDF to Excel

提示:本站收集StackOverFlow近2千万问答,支持中英文搜索,鼠标放在语句上弹窗显示对应的参考中文或英文, 本站还提供   中文繁体   英文版本   中英对照 版本,有任何建议请联系yoyou2525@163.com。

我有一个程序,用于搜索 Excel 工作表并将其导入 Excel 工作簿。 想知道我是否可以使用相同的代码,并进行一些修改以在文件夹中搜索 PDF 并将它们导入到 Excel 工作簿中。

Sub Merge_Excel_Files_Created_By_CMM() Dim fnameList, fnameCurFile As Variant Dim countFiles, countSheets As Integer Dim wksCurSheet As Worksheet Dim wbkCurBook, wbkSrcBook As Workbook ChDrive "I" ChDir "I:\\Quality\\CMM Data" Dim = Range Application.GetOpenFilename(FileFilter:="Microsoft Excel 工作簿 ( .xls; .xlsx; .xlsm), .xls; .xlsx; .xlsm", Title:="选择要合并的 Excel 文件", MultiSelect:=True)

If (vbBoolean <> VarType(fnameList)) Then

    If (UBound(fnameList) > 0) Then
        countFiles = 0
        countSheets = 0

        Application.ScreenUpdating = False
        Application.Calculation = xlCalculationManual

        Set wbkCurBook = ActiveWorkbook

        For Each fnameCurFile In fnameList
            countFiles = countFiles + 1

            Set wbkSrcBook = Workbooks.Open(Filename:=fnameCurFile)

            For Each wksCurSheet In wbkSrcBook.Sheets
                countSheets = countSheets + 1
                wksCurSheet.Copy after:=wbkCurBook.Sheets(wbkCurBook.Sheets.Count)
            Next

            wbkSrcBook.Close SaveChanges:=False

        Next

        Application.ScreenUpdating = True
        Application.Calculation = xlCalculationAutomatic

        MsgBox "Processed " & countFiles & " files" & vbCrLf & "Merged " & countSheets & " worksheets", Title:="Merge Excel files"
    End If

Else
    MsgBox "No files selected", Title:="Merge Excel files"
End If
 s.Parent.Activate
 s.Select

结束子

问题暂未有回复.您可以查看右边的相关问题.
1 以精确格式将pdf导入excel

我有这段代码,但是我想以精确的格式复制和粘贴PDF文件以使Excel不在单行或单列中表现出色,我的意思是说如果我有一个包含两列和16行的PDF格式的表,我想将其精确地粘贴使用vba格式化为excel。 下面的代码无法正常工作,它正在选择但没有将数据粘贴到excel,也无法将其以PDF的确切格式 ...

2 RDLC从Excel或PDF导入数据

我有一个Excel和PDF文件,其中包含一个具有多列和许多行的表,这些表具有粗体文本和背景颜色样式。 我想做的是找到一种将其导入RDLC报表的方法,这样我就不必创建表并手动键入所有内容,而这将需要几个小时。 我不想将其另存为图像并以这种方式扔掉,因为缩放后的文本将不清楚。 我问制作原始 ...

3 Python合并2个excel文件并将excel图表导入pdf文件

我一直在使用下面的 pandas 和 pdfkit python 代码作为将 excel 文件转换为 pdf 格式的基础。 对于它的设计目的,它对我很有帮助。 然而,最近我被要求在上面的代码中添加 2 个主要功能 将 2 个 Excel 文件合并为一个单独的 Excel 文件(不覆盖第一个文 ...

4 从PDF提取数据并导入到Excel .NET

是否有示例代码或实用程序可用于读取PDF文档并将数据转换或导出为Excel文档? 我在搜索时看到的大多数示例代码都是将Excel转换为PDF。 ...

8 Excel到PDF转换的宏

我正在编写下面的代码,将文件夹中的多个excel文件转换为PDF,但在第一行收到错误。 38是“无效的过程调用或参数” 我是VBA的新手,所以无法捕获该错误,请帮助... ...

2019-03-17 17:53:10 1 45   vba
9 Excel 到 PDF 的转换

我有一个包含许多工作表的 Excel 工作簿。 数据需要转换为PDF。 现在的问题是,PDF 的页眉和页脚中必须存在一些图像。 还需要打印页码。 你能建议最好的方法来处理这个问题吗? 我在 VBA 上工作。 谁能告诉这是否可以使用 Excel - VBA 来实现? 非常感谢。 ...

10 Excel转PDF问题

因此,我有以下简单的小代码可以在Excel工作表上的命令按钮上将Excel工作表转换为PDF: 问题是我必须先手动执行步骤(另存为,然后是PDF等),才能使按钮在我首先执行手动步骤后起作用。 我想将其保存在任何地方,只需单击按钮即可创建PDF,而无需先完成所有初始手动步骤。 可以 ...

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2021 STACKOOM.COM