Vorauswahl Formular

[DF6GL]

Hallo,

welche "Druckeinstellungen"  meinst Du ?

Das aktuell angezeigte  Formular kann manuell über Datei/Drucken und dort unter Auswahl eines installierten Druckers gedruckt werden.

Wenn das Drucken via VBA erfolgen soll, so wird ohne weitere Maßnahmen der als Standard eingerichtete Drucker benutzt.

Wenn ein bestimmter Drucker benötigt wird, so gibt es dafür die Printers-Auflistung oder man stellt den Standarddrucker um.

Siehe  http://www.donkarl.com/?FAQ5.1

[julle]

Hallo,

welche "Druckeinstellungen"  meinst Du ?

Das aktuell angezeigte  Formular kann manuell über Datei/Drucken und dort unter Auswahl eines installierten Druckers gedruckt werden.

Wenn das Drucken via VBA erfolgen soll, so wird ohne weitere Maßnahmen der als Standard eingerichtete Drucker benutzt.

Wenn ein bestimmter Drucker benötigt wird, so gibt es dafür die Printers-Auflistung oder man stellt den Standarddrucker um.

Siehe  http://www.donkarl.com/?FAQ5.1

Ich meinte damit, dass zwei Drucker gleichzeitig angesteuert werden sollen.

[MaggieMay]

Sicher nicht gleichzeitig sondern wahlweise, oder?

[julle]

Sicher nicht gleichzeitig sondern wahlweise, oder?

Beim betätigen des Druck-Buttons sollen zwei Druckaufträge angestoßen werden bzw ein Auftrag an zwei Drucker parallel.
Die Drucker sind im gleichen Netzwerk aber 500m voneinander entfernt. Im Moment wird die Strecke jedesmal gelaufen...

[DF6GL]

Hallo,

das heißt doch, nacheinander auf zwei verschiedene Drucker ausgeben..  Das kannst Du mit den beschriebenen Methoden doch machen.. Wo ist das Problem?

PS:

.. bzw ein Auftrag an zwei Drucker parallel.

Kannst Du parallel (gleichzeitig) mit zwei Autos fahren??

[Beaker s.a.]

Hallo Maggie,
Wieso nicht? Auf eigene Tabellen habe ich vollen Zugriff.
Und wenn ich die SystemTabelle nicht für eine n:m verwenden kann,
kann ich auch nicht mehreren MA mehrere Formulare anbieten; - oder habe ich da was übersehen?
gruss ekkehard

[MaggieMay]

Hallo,

wenn sich dein Post hierauf bezieht:

Da lässt sich dann auch eine n:m zwischen diese und die MA-Tabelle schalten (ich weiss nicht ob das mit Systemdateien auch geht)

Sicher nicht.

so weiß ich jetzt auch nicht mehr, was ich mir dabei gedacht habe. ;-)
Zumindest per Abfrage sollten sich die Tabellen in Beziehung setzen lassen.

[Beaker s.a.]

Hallo Maggie,

so weiß ich jetzt auch nicht mehr, was ich mir dabei gedacht habe. ;-)

Mach dir nichts draus, - kenn' ich ;-)

Zumindest per Abfrage sollten sich die Tabellen in Beziehung setzen lassen.

Hm, kann man mit einer Abfrage eine n:m nachbilden?
gruss ekkehard

[MaggieMay]

Das sollte gehen, aber...

Du hast doch auf der einen Seite die selbst definierte User-Tabelle und die Zwischentabelle mit User und Formular. Die Systemtabelle brauchst du danach doch eigentlich gar nicht mehr, sondern nur für die Einrichtung der Zuordnung, bspw. via Kombifeld.

Allerdings könnte ich mir auch eine andere Grundlage für die Herstellung der Zuordnungen vorstellen, nämlich die Documents-Auflistung der Formulare. Dort könnten nämlich auch Beschreibungstexte hinterlegt werden (so wie man sie im ehemaligen Datenbankfenster immer so schön zu sehen bekam), die man zusätzlich zu den Formularnamen auslesen könnte.

[Beaker s.a.]

Hallo Maggie,

Du hast doch auf der einen Seite die selbst definierte User-Tabelle und die Zwischentabelle mit User und Formular. Die Systemtabelle brauchst du danach doch eigentlich gar nicht mehr, sondern nur für die Einrichtung der Zuordnung, bspw. via Kombifeld.

Ist doch mein reden seit 1870 ;-) - eine eigene Tabelle mit den Formularnamen, wovon Du abgeraten hattest, worauf hin ich gefragt hatte warum. Und da brauch ich die Systemtabelle eben NICHT, womit wir uns eigentlich einig wären.
gruss ekkehard

[MaggieMay]

Ich würde wie gesagt die Systemtabelle dafür einsetzen, die Formulare in die Verknüpfungstabelle einzufügen.
Bleibt allerdings der Haken, dass es keine automatische Aktualisierung gibt, wenn ein Formular gelöscht oder umbenannt wird.

[Beaker s.a.]

Hallo Maggie,

Ich würde wie gesagt die Systemtabelle dafür einsetzen, die Formulare in die Verknüpfungstabelle einzufügen.

O.K., zum Einfügen per Combo ist der Rückgriff natürlich kein Problem.
Und man kann auch per Abfrage eine n:m nachbilden:

Code [Auswählen] Erweitern

SELECT MSysObjects.Name, UserFormulare.SysFormID, User.UserID
FROM (MSysObjects
  INNER JOIN UserFormulare
  ON MSysObjects.Id = UserFormulare.SysFormID)
    INNER JOIN [User]
      ON UserFormulare.UserID = User.UserID
UserFormulare ist die Zwischentabelle.

Bleibt allerdings der Haken, dass es keine automatische Aktualisierung gibt, wenn ein Formular gelöscht oder umbenannt wird.

Tja, Relations mit RI sind mit Sys-Tabellen wohl nicht möglich. Ausser man weiss wie man die Fehlermeldung bezügl. Zugriffsrechten "ausschaltet".
gruss ekkehard

[julle]

Hallo,

das heißt doch, nacheinander auf zwei verschiedene Drucker ausgeben..  Das kannst Du mit den beschriebenen Methoden doch machen.. Wo ist das Problem?

PS:

.. bzw ein Auftrag an zwei Drucker parallel.

Kannst Du parallel (gleichzeitig) mit zwei Autos fahren??

Hintereinander erledigt den Job auch, aber ich hab eigentlich vor, nur einmal den Drucken-Knopf zu drücken.
Hieße ich muss Befehle hinterlegen für: einmal Drucken, Drucker wechseln, Drucken, Drucker auf Standart zurückstellen.

Die VBA Formulierungen für Drucken, Drucker welchseln sind beschrieben, aber wie verknüpfe ich, dass der zweite Druck angestoßen wird?
Im Moment wird das drucken bei positiver Überprüfung nach "Else" angestoßen.

...hoffe ich habe mich verständlich ausgedrückt

[MaggieMay]

Im Moment wird das drucken bei positiver Überprüfung nach "Else" angestoßen.

Dort kannst du doch beliebig viele Befehle einfügen, wo genau liegt das Problem?

[DF6GL]

Hallo,

Die VBA Formulierungen für Drucken, Drucker welchseln sind beschrieben, aber wie verknüpfe ich, dass der zweite Druck angestoßen wird?
Im Moment wird das drucken bei positiver Überprüfung nach "Else" angestoßen.

Nun, Du spricht sehr unklar....

Wenn Du z. B. direkt nach Auswahl eines Formulars im letzthin diskutierten Kombi den Druck dieses Forms anstoßen willst, dann geht als eine Möglichkeit das prinzipiell so:

Code [Auswählen] Erweitern

Sub cmbFormAuswahl_Afterupdate()
Docmd.Openform Me!cmbFormAuswahl 
Docmd.Printout  'Audruck auf Standarddrucker
' hier Code zum Wechseln des (Standard)druckers    siehe http://www.donkarl.com/?FAQ5.1
Docmd.Printout   'nochmal Ausdruck auf den neuen Standarddrucker
Docmd.Close acform, Me!cmbFormAuswahl 
' hier evtl Drucker wieder zurücksetzen.

End Sub