Office: (Office 2010) Trennstreifen drucken

Hallo,

bin hier im Forum und in der Welt von Access ganz neu.
Hätte da folgende Frage:

Sagen wir mal, ich habe eine Tabelle mit 10 Spalten.
Ich will nun eines dieser schmalen Trennstreifen drucken (für den Ordner).
Da sollen zu einem Datensatz die Angaben in der 1., 5. und der 8. Spalte drauf kommen. Und zwar an verschiedenen Stellen auf dem Streifen.

Wie mache ich das?

Vielen Dank für alle Hinweise...

:)

 

Moin,
und willkommen im Forum *wink.gif* .
Für die Trennstreifen erstellst du dir am besten einen Bericht in der richtigen Größe, der die entsprechenden Felder zeigt.
maike

 

Vielen Dank...
ich habe es einigermaßen hinbekommen.

Jetzt habe ich folgendes Problem:
ich will ein Trennstreifen nur für Referenz 264 drucken. Wie mache ich, dass Access nur für den Datensatz einen Trennstreifen druckt, den ich mir gerade angucke?

 

Wo guckst du denn? In einem Formular?
Dann bau dir dort einen Button ein, der auf Klick folgende Ereignisprozedur auslöst:
Code:

maike

 

das hat nicht richtig hingehauen. Ich vermute aber, dass ich das noch hinkriege.

Ich habe aber ein anderes Problem *frown.gif*

Ich brauche 2 Listenfelder (Nr. eins: 1, 2, 3 // Nr. zwei: a, b, c, d, ...)

Wenn im Listenfeld eins die "1" gewählt wird, sollen im Listenfeld 2 nur "a" und "b" zur Auswahl stehen.

Wenn "2" ausgewählt wird, dann nur "c" und "d". Usw.

Ich komme da überhaupt nicht weiter. Habe da einige Beiträge gelesen, am Ende aber doch nicht verstanden.

Kannst du mir da auch einen Tipp geben

 

Grundvoraussetzung dafür ist, dass in der Datenherkunft der Listenfelder (Tabelle oder Abfrage) im ersten Listenfeld die erste Spalte die 1, 2, 3 enthält und im zweiten Listenfeld bei den Datensätzen "a" und "b" die 1, bei "c" und "d" die 2 usw. als Fremdschlüssel vorhanden sind.
Dann kannst du im Ereignis Klick (oder besser: Doppelklick) des ersten Listenfeldes das zweite filtern:
Code:

Solltest du mit "Listenfeld" eigentlich ein Kombifeld meinen (aufklappbar), dann genauso, nur im Ereignis AfterUpdate (Nach Aktualisierung) des Kombis.
Eine Beschreibung dazu findest du z.B. hier: donkarls Access-Seiten
maike

 

Recht herzlichen Dank.
Probier ich gleich aus.

PS: ich hoffe, dass ich nicht all zu sehr nerve...

 

Irgend etwas mache ıch wohl falsch.

1. Schritt: Habe 3 Tabellen erstellt:

1. Hersteller (Audi, Mercedes, VW)
2. Modell (A3, A4, A6, A8, A, A, C, E, Lupo, Golf, Passat, Sharan)
3. Table1 (hier sollen die Daten vom Formular einfließen)

2. Schritt: Form Design

1. Combobox (... from another table...)
Table: Hersteller
Auswählen: ID und Field1
Sort: 1.ID/ 2. Field
Hide key column
Lable: Hersteller
Finish

2. Combobox (... from another table...)
Table: Modell
Auswählen: ID und Field2
Sort: 1.ID/ 2. Field
Hide key column
Lable: Modell
Finish

3. Schritt

Form erstellt > Design View
rechter Box (Modell) rechte Maustaste
Build event
Code Builder ausgewählt folgendes eingegeben:
Private Sub Combo6_Click()
Me.Modell.RowSource = "SELECT A3 FROM Modell WHERE Fremdschluesselfeld =1" & Me.Hersteller
Me.Modell.RowSource = "SELECT A4 FROM Modell WHERE Fremdschluesselfeld =1" & Me.Hersteller
Me.Modell.RowSource = "SELECT A6 FROM Modell WHERE Fremdschluesselfeld =1" & Me.Hersteller
Me.Modell.RowSource = "SELECT A8 FROM Modell WHERE Fremdschluesselfeld =1" & Me.Hersteller
Me.Modell.RowSource = "SELECT A FROM Modell WHERE Fremdschluesselfeld =2" & Me.Hersteller
Me.Modell.RowSource = "SELECT B FROM Modell WHERE Fremdschluesselfeld =2" & Me.Hersteller
Me.Modell.RowSource = "SELECT C FROM Modell WHERE Fremdschluesselfeld =2" & Me.Hersteller
Me.Modell.RowSource = "SELECT E FROM Modell WHERE Fremdschluesselfeld =2" & Me.Hersteller
Me.Modell.RowSource = "SELECT Lupo FROM Modell WHERE Fremdschluesselfeld =3" & Me.Hersteller
Me.Modell.RowSource = "SELECT Golf FROM Modell WHERE Fremdschluesselfeld =3" & Me.Hersteller
Me.Modell.RowSource = "SELECT Passat FROM Modell WHERE Fremdschluesselfeld =3" & Me.Hersteller
Me.Modell.RowSource = "SELECT Sharan FROM Modell WHERE Fremdschluesselfeld =3" & Me.Hersteller
End Sub

File > Save > Modul1

Zurück auf dem Form (View Modus) wähle einen Hersteller X, es werden alle Modelle ohne Eingrenzug angezeigt.

Was mache ich falsch?

 

Der Trick an der Sache ist doch, dass der Code auf den gewählten Wert aus Combo6 reagiert:
Code:

Die blau markierten Dummybezeichnungen durch deine Feldnamen ersetzen.
maike

 

Ich habe dir mal ein kleines Muster zusammengeklickt.

 

Könntest du mir dann (ausgehend von deinen Tabellen) den Code geben?

Bzw. wäre der hier richtig:

Private Sub Combo6_AfterUpdate()
Me.tblModell.RowSource = "SELECT A3, A4, A6, A8 FROM Modell WHERE HerstellerFK = 1" & Me.Combo6
End Sub

Irgendwie fehlt mir aber der Bezug zur tblHersteller