1. #1

    Registriert seit
    17.09.2012
    Beiträge
    1.865
    Thanked 384 Times in 258 Posts

    Standard [Excel]Makro gesucht

    Hey ich suche ein Makro welches mir Infos aus einer PDF liest.
    Genauer gesagt suche ich die Seitengröße .

    Mit XPDF pdfinfo.exe hab ich das ganze schon mal via Batch gelöst, und wäre in Excel soweit das er mir ein Ergebnis in die Tabelle wirft aber leider nur für EINE vorher von Hand festgelegte PDF

    Das ganze sollte basierend auf Hyperlink Verknüpfung funktionieren (Datei Speicherort der PDFs).


    Irgendwer zufällig eine Idee?

  2. #2

    Registriert seit
    03.09.2015
    Beiträge
    135
    Thanked 55 Times in 40 Posts

    Standard AW: [Excel]Makro gesucht

    Die Library IText (verfügbar für das .NET Framework) kann die Pagesize auslesen. Hier sind einige Beispiele: https://kb.itextpdf.com/home/it7kb/f...a-pdf-document

    IText 5 Installations-Guid: https://kb.itextpdf.com/home/it5kb/i...net-developers
    Mfg

    .\

  3. #3

    Registriert seit
    17.09.2012
    Beiträge
    1.865
    Thanked 384 Times in 258 Posts

    Standard AW: [Excel]Makro gesucht

    Leider geht etwas installieren nicht


    Hier mal mein Code


    Option Explicit

    Private Function GetPDFText(ByVal strPath As String) As String
    Dim objShell As Object, objExec As Object
    Const cstrPDFInfo = "c:\1\pdfinfo.exe "

    Set objShell = CreateObject("WScript.Shell")
    Set objExec = objShell.Exec(cstrPDFInfo & strPath)
    GetPDFText = objExec.StdOut.ReadAll
    Set objExec = Nothing
    Set objShell = Nothing
    End Function

    Sub TestIt()
    Dim arInfos, arInfo, i As Long, j As Long

    arInfos = Split(GetPDFText("c:\1\1.pdf"), vbNewLine)
    j = 1
    For i = 0 To UBound(arInfos)
    arInfo = Split(arInfos(i), ":", 2)
    If UBound(arInfo) = 1 Then
    Cells(j, 1).Value = arInfo(0)
    Cells(j, 2).Value = Trim(arInfo(1))
    j = j + 1
    End If
    Next
    End Sub

    Er soll den Speicherort der PDF-Datei aber immer aus einer anderen Zelle nehmen und das Ergebnis immer in der ausgewählten Zelle auswerfen.

    Jemand einen Tipp ?

Ähnliche Themen

  1. Antworten: 2
    Letzter Beitrag: 29.09.2014, 02:20
  2. Gamer Tastatur inkl. Makro?
    Von ZarneXxX im Forum Kaufberatung
    Antworten: 2
    Letzter Beitrag: 22.04.2014, 21:22
  3. Auf Teamspeak 3 Server connecten per Makro
    Von Roxithro im Forum Hardware
    Antworten: 1
    Letzter Beitrag: 14.11.2012, 17:03
  4. VBA in Excel 2007
    Von Dennis170 im Forum Hochsprachen
    Antworten: 10
    Letzter Beitrag: 04.05.2011, 11:54
Diese Seite nutzt Cookies, um das Nutzererlebnis zu verbessern. Klicken Sie hier, um das Cookie-Tracking zu deaktivieren.