Hallo

ik wil een pdf omzetten in een excel. Hiervoor heb ik de ingebouwde tool van excel geprobeerd: Gegevens importeren uit bestand en dan kiezen voor pdf. Deze methode lukt vrij aardig behalve voor 1 bestand. Zie bijlage.

Ik wil dus 2 kolommen: een kolom met een cijfer en daarnaast een kolom met de bijhorende tekst.

Kan iemand dit eens bekijken?

Dank bij voorbaat.

Ondertussen ook voor jou bezig geweest
Zie bijlage.

PDF geopend in Firefox.
De tekst in Firefox gekopieerd en geplakt in Notepad ++
De Notepad file opgeslagen als tekstbestand.
Dit tekstbestand geïmporteerd in Excel.
Daarna de cijfers en tekst gesplitst in 2 nieuwe kolommen.
Met volgende 2 functies.
Function GetNumber(CellRef As String)
Dim StringLength As Integer
StringLength = Len(CellRef)
For i = 1 To StringLength
If IsNumeric(Mid(CellRef, i, 1)) Then Result = Result & Mid(CellRef, i, 1)
Next i
GetNumber = Result
End Functionen
Function GetText(CellRef As String)
Dim StringLength As Integer
StringLength = Len(CellRef)
For i = 1 To StringLength
If Not (IsNumeric(Mid(CellRef, i, 1))) Then Result = Result & Mid(CellRef, i, 1)
Next i
GetText = Result
End FunctionDan de layout aangepast volgens het PDF bestand en wat schoonheidsfoutjes eruit gehaald.

Graag gedaan.