{"id":55000420,"date":"2006-12-01T00:00:00","date_gmt":"2021-02-11T21:07:12","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=420"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Texterkennung_mit_OCR_und_VBA","status":"publish","type":"post","link":"https:\/\/access-im-unternehmen.de\/Texterkennung_mit_OCR_und_VBA\/","title":{"rendered":"Texterkennung mit OCR und VBA"},"content":{"rendered":"

\"\"<\/p>\n

\n
\n

Wer sich die Mühe macht, Dokumente wie etwa seine Geschäftskorrespondenz zu scannen, möchte möglicherweise auch auf die darin enthaltenen Texte zugreifen. Mit Access, VBA und der passenden Bibliothek ist das ein Kinderspiel: Access im Unternehmen zeigt, wie Benutzer von Access 2003 ihre Anwendung kostenlos um ein VBA-gesteuertes OCR-Tool zur Texterkennung erweitern.<\/b><\/p>\n<\/p><\/div>\n

\n

Seit Office XP liefert Microsoft mit seinen Paketen ein Steuerelement namens Microsoft Office Document Imaging Viewer <\/b>aus, das zusammen mit der Microsoft Office Document Imaging x.0 Type Library <\/b>ein interessantes Gespann zur Anzeige und Verarbeitung von gescannten Dokumenten liefert. Damit kann man ins digitale Format überführte Dokumente erst richtig wertvoll machen: Die Methoden der genannten Bibliothek ermöglichen nämlich das Erkennen der in den Dokumenten enthaltenen Texte.<\/p>\n

Interessant ist das für viele Anwendungen: In einer Vertragsverwaltung etwa kann man es sich sparen, Vertragsinhalte zusammengefasst in Text- oder Memofeldern einer Tabelle zu speichern, um später danach zu suchen – stattdessen liest man einfach den kompletten Vertragstext in ein Memofeld ein. Oder man erzeugt direkt eine Tabelle mit den enthaltenen Wörtern und verknüpft diese mit dem jeweiligen Vertragsdatensatz – so lässt sich gar eine Volltextsuche realisieren.<\/p>\n

Hilfe herunterladen<\/b><\/p>\n

Die Hilfe zur Bibliothek Microsoft Office Document Imaging 11.0 Type Library<\/b> wird nicht standardmäßig mitinstalliert. Sie können diese aber unter [1] herunterladen und dann im Verzeichnis C:\\Program Files\\Microsoft Office 2003 Developer Resources\\MODI <\/b>speichern.<\/p>\n

Die Hilfe ist leider nicht im VBA-Editor integriert; Sie müssen Informationen zu den Objekten, Methoden, Eigenschaften und Ereignissen also von Hand statt per F1<\/b> heraussuchen.<\/p>\n

Dokumente anzeigen<\/b><\/p>\n

Vor der Texterkennung sieht man immer gerne, ob man aktuell überhaupt das richtige Dokument beackert. Daher fügen Sie einem neuen Formular namens frmOCR <\/b>zunächst den Microsoft Office Document Imaging Viewer <\/b>hinzu (siehe Bild 1) und ändern seinen Namen auf ctlMODI<\/b>. Legen Sie dann eine Schaltfläche namens cmdDokumentOeffnen<\/b> hinzu, die folgende Ereignisprozedur auslöst. Die hier verwendete Funktion OpenFileName <\/b>zum Anzeigen des Datei-Dialogs finden Sie im Modul mdlTools <\/b>der Beispieldatenbank (s. Listing 1).<\/p>\n

Listing 1: Dokument öffnen<\/p>\n

Private Sub cmdDokumentOeffnen_Click()\r\n     Me.ctlMODI.FileName = OpenFileName(CurrentProject.Path, _
 \"Dokument öffnen:\", \"Tagged Image File (*.tif)\")\r\nEnd Sub<\/pre>\n
\n            \"pic001.tif\"\n        <\/div>\n
\n
Bild 1: Hinzufügen des Steuerelements zum Anzeigen von Dokumenten<\/span><\/b><\/p>\n<\/p><\/div>\n
Damit haben Sie auch schon die erste Methode des MODI-Steuerelements kennen gelernt – nämlich die zum Anzeigen eines im Dateisystem gespeicherten Dokuments.<\/p>\n
Obige Routine greift direkt über Me!ctlMODI <\/b>auf das Steuerelement zu, was nicht von IntelliSense unterstützt wird, aber letztendlich zuverlässiger ist. Möchten Sie IntelliSense bei der Programmierung einsetzen, legen Sie eine passende Objektvariable für den Verweis auf das Steuerelement an und weisen Sie der Variablen in der Ereignisprozedur Beim öffnen <\/span>des Formulars das Steuerelement über dessen Object<\/b>-Eigenschaft zu. In der Folge verwenden Sie dann die Objektvariable objMODI<\/b> für den Zugriff auf das Steuerelement (siehe Bild 2).<\/p>\n
\n            \"pic002.tif\"\n        <\/div>\n
\n
Bild 2: Original und Fälschung<\/span><\/b><\/p>\n<\/p><\/div>\n
<\/p>\n
Das Laden eines Dokuments funktioniert nun, doch leider nur einmal: Das öffnen eines weiteren Dokuments ist nicht möglich; erst nach Beenden und Neustarten der Anwendung geht dies wieder. Allerdings hilft ein kleiner Umweg, der gleichzeitig weitere Elemente der Bibliothek offenbart. Die folgende Routine erzeugt zunächst ein Document<\/b>-Objekt und füllt es über die Create<\/b>-Methode mit der gewählten Datei. Schließlich weist sie die so geladene Datei dem Steuerelement ctlMODI <\/b>zu.<\/p>\n
Nun funktioniert das Laden von Dokumenten, aber die Ansicht weiß noch nicht zu gefallen, denn sie zeigt lediglich einen Ausschnitt des Dokuments. Zum Anpassen der Ansicht verwenden Sie die FitMode<\/b>-Eigenschaft, die fünf Werte akzeptiert:<\/p>\n