Office: (Office 2010) Mit VBA PDF erzeugen

Wo an welcher Stelle im Code tritt welcher Fehler auf?
Fehlermeldung?

 

Die Fehlermeldung lautet: Benutzerdefinierter Typ nicht definiert. schon bei Private Sub ExportAsPdf_Click()

Code:

Hier nochmals der ganze Code so wie ich in eingefügt habe.

 

In Post #15 von Dir schreibst Du, dass das Modul Private Sub Befehl73_Click() heißt.
Nun heißt es auf einmal wieder ExportAsPdf_Click().

Grundlegende Mechanismen von Prozeduraufrufen, etc. solltest Du schon beherrschen wenn Du entwickelst!

Speichere die Beispielprozedur von mir in genau dieser Form als PUBLIC in einem allgemeinen Modul ab.
Wie das Modul heißt ist unerheblich, es darf nur nicht identisch benannt werden wie die Prozedur.

In Deinem Click-Ereignis für den Button (ich halte Befehl73 immer noch für einen schlechten Namen...) schreibst Du lediglich ExportAsPdf. Somit wird beim Klicken die allgemeine Prozedur ausgeführt.

 

die Prozedur wird ausgeführt, stoppt aber immer noch am gleichen Ort. Der Code im Modul ist Public. Kann es sein das iich noch Verweise aktivieren muss? In der Kopfzeile im Modul steht Option Compare Database, habe es schon ohne probiert funktioniert aber leider nicht...

Ich kenne alle Grundlagen der Programmierung, doch benutze vorallem OO-Sprachen, Vba ist ja nicht wirklich eine typische OO-Sprache, deshalb habe ich mühe damit. Selbstverständlich auch mit der Syntax.*rolleyes.gif*

 

Gerade wenn Du aus der OO kommst, frage ich mich wie Du auf die Idee kommst aus einer Public Prozedur ein Private-Event zu machen !?

Kannst Du bitte eine BeispielDB hochladen? Ich kann das Fehlverhalten bei mir nicht reproduzieren.

 

Wie kann ich sie hochladen?

 

Klicke unten auf Erweitert um in die erweitere Ansicht zur Erstellung einer Antwort zu gelangen.
Dort gibt es unten die Möglichkeit Anhänge hinzuzufügen.

 

Das ist leider nicht möglich, da ich bei der Arbeit keine Daten hochladen darf (Per eMail könnte wäre es trotzdem möglich...) Wie gesagt ist der eigentliche Code nun im Modul, der Aufruf funktioiniert nur hängt es sich sofort auf.

 

Zeige bitte das gesamte Modul das den Code enthält den ich Dir zur Verfügung gestellt habe und Zeige bitte die entsprechende Prozedur des Buttons aus Deinem Formular.

 

Folgendes ist im formular-Code. (Ich weiss die Namen sind nicht gut, doch bei lediglich 2 Buttons kann ich gut den überblick behalt.)
Code:

folgendes ist im Modul:
Code:

 

Na, wenn Du den Überblick behältst ist es ja gut... mittlerweile wurde aus Befehl73 offenbar Befehl46... Naja, Du wirst schon wissen was Du machst.

Der Code an sich sieht syntaktisch korrekt aus.
Setze bitte einen Haltepunkt auf das ExportAsPdf in Deinem Formularcode und einen Haltepunkt auf die Public Sub ExportAsPdf.

Wenn Du den Code ausführst sollte der Cursor auf dem ersten erreichten Haltepunkt stehen bleiben. Mit F8 kannst Du die folgenden Anweisungen dann in Einzelschritten durchgehen.

Bis wohin (welche Zeile) kommst Du?
Welche Fehlermeldung erscheint dann?

 

Gelb markiert ist Public Sub ExportAsPdf(). Zusätzlich ist noch Dim fld As FileDialog markiert. Es ist immer noch die gleiche Fehlermeldung, Benutzerdefinierter Typ nicht definiert.

 

https://msdn.microsoft.com/en-us/lib...ffice.14).aspx
Es muss ggf. eine Referenz auf die Microsoft Office xx.0 Object Library gesetzt werden; IMHO ist die unter Access 2010 aber standardmäßig gesetzt

 

Die Object Library 14.0 ist schon gesetzt.

 

Dann bin ich mit meinem Latein leider am Ende...