Access-o-Mania

Access-Forum (Deutsch/German) => Formular => Thema gestartet von: uwe01 am März 10, 2012, 21:17:26

Titel: Problem mit Select Case
Beitrag von: uwe01 am März 10, 2012, 21:17:26
Hallo,

in mein Formular habe ich eine ein Combo Feld zum auswählen eines Typen. In Abhängigkeit des ausgewählten Typ werden Felder im Formular ein oder ausgeblendet.
Private Sub Typ_AfterUpdate()
'Kombifeld nach Aktualisierung

Me![Int Nr].Visible = True
Me!Kennzeichen.Visible = True
Me!Mobiltelefon.Visible = True
Me!Flurförderfahrzeug.Visible = True
Me!Tüv.Visible = True
Me![Sicherheits Prüfung].Visible = True
Me![Kühlagregat Nr].Visible = True
Me![EZ Modeljahr].Visible = True
'Me!Kühlfähig.Visible = True

Select Case Me!Typ

Case 1  ' Zugmaschine

Me![Int Nr].Visible = True
Me!Kennzeichen.Visible = True
Me!Mobiltelefon.Visible = True
Me!Flurförderfahrzeug.Visible = True
Me!Tüv.Visible = True
Me![Sicherheits Prüfung].Visible = True
Me![Kühlagregat Nr].Visible = False
Me![EZ Modeljahr].Visible = True

Case 2  ' Motorwagen

Me![Int Nr].Visible = True
Me!Kennzeichen.Visible = True
Me!Mobiltelefon.Visible = True
Me!Flurförderfahrzeug.Visible = True
Me!Tüv.Visible = True
Me![Sicherheits Prüfung].Visible = True
Me![Kühlagregat Nr].Visible = True
Me![EZ Modeljahr].Visible = True

Case 3  ' Auflieger

usw

Nun das Problem welches Ich habe, wenn ich im Combo Feld  den Typ auswähle funktioniert das nicht aber wähle ich die ID dann reagieren die Felder. Allerdings wird dann auch in den Tabellen die ID in den Typ eingetragen und nicht die Art des Typen. Wie kann Ich das ändern, das ich den Typ mit Select Case Anspreche und nicht die ID

LG
Titel: Re: Problem mit Select Case
Beitrag von: Beaker s.a. am März 10, 2012, 21:34:10
Hallo Uwe,
Wahrscheinlich musst Du die gebundene Spalte des Kombis auf das Feld Typ legen.
hth
gruss ekkehard
Titel: Re: Problem mit Select Case
Beitrag von: uwe01 am März 10, 2012, 21:43:41
Hy Beaker,

verstehe deine Antwort nicht so richtig, kannst du das mal genauer erläutern.

LG
Titel: Re: Problem mit Select Case
Beitrag von: Beaker s.a. am März 10, 2012, 22:37:19
Hallo Uwe,
Schreibe uns mal die Datenherkunft des Kombis.
Die Eigenschaft "Gebundene Spalte" findest Du im Register "Daten" des Eigenschaftenfensters.
Andere Möglichkeit wäre statt
Select Me!Typ.Value
mal
Select Me!Typ.Column(n)
zu versuchen.
n ist die Nummer der Spalte mit dem Typ (Spalten zähler ab 0).
hth
gruss ekkehard
Titel: Re: Problem mit Select Case
Beitrag von: MzKlMu am März 10, 2012, 23:33:18
Hallo,
ZitatAllerdings wird dann auch in den Tabellen die ID in den Typ eingetragen und nicht die Art des Typen.
Das ist ja auch richtig. Es sollte auf keinen Fall die Art des Typs eingetragen werden, sondern immer die ID. Das ist ja der Sinn der IDs.
Daher solltest Du am Kombi nichts ändern und am Code auch nicht.
Die Datenherkunft des Kombis sollte in der 1. Spalte die ID anzeigen und in der 2. die Art. Die gebunden Spalte (siehe Dateneigenschaften) sollte die 1. sein, Spaltenzahl zwei. Spaltenbreiten 0cm;5cm. Mit 0cm ist die 1.Spalte ausgeblendet sodass die Art im Kombi zu sehen ist. Gespeichert wird aber die ID, unbedingt.
Der Code sollte dann unverändert passen.
Titel: Re: Problem mit Select Case
Beitrag von: Beaker s.a. am März 11, 2012, 14:33:06
Hallo,
@MzKlMu
Da hast Du ihn wohl besser verstanden als ich.

@Uwe
Folge MzKlMus Erläuterungen.

Ich bin allerdings der Meinung, dass der Code zusätzlich ins Form_Current
gehört, damit beim DS-wechsel die Felder auch der TypID entsprechend
ein-/ausgeblendet werden.
gruss ekkehard
Titel: Re: Problem mit Select Case
Beitrag von: uwe01 am März 11, 2012, 14:45:22
Hallo,

@ Beaker habe deine beiden Varianten getestet bringen kein erfolg. Dennoch Danke

@ MzKIMu Danke dir für deine Antwort, so hatte Ich das ja auch. Nur bekomme ich im Berichts Ausdruck nicht den Typ ausgedruckt sondern die ID. Schade
Werde mal ein neues Thema in Abfragen Schreiben.

Danke euch beiden für eure Antworten

LG Uwe01

Titel: Re: Problem mit Select Case
Beitrag von: Beaker s.a. am März 11, 2012, 15:40:41
Hallo Uwe,
Wieso denn jetzt plötzlich Bericht, davon war vorher keine Rede.
Da brauchst Du doch nur das Feld Typ mit in die Datenherkunft
zu nehmen. Sollte doch kein Problem sein, wenn Du die ID schon
drin hast.
gruss ekkehard
Titel: Re: Problem mit Select Case
Beitrag von: uwe01 am März 11, 2012, 16:14:04
Hallo Ekkehard,
die Sache ist die in dem Formular werden Fahrzeuge angelegt, dann habe ich eine Abfrage die  Tüv und Su Termine Rechnet. Soweit läuft es super dank DF6GL, jetzt habe ich mir eine Tabellenerstellungabfrage erstellt auf denen meine Berichte zugreifen. Damit ich mir jeden Monat die Fahrzeuge ausdrucken kann die mit Tüv/Su dran sind. Läuft ja auch, aber wie schon erwähnt werden da halt nicht der Typ angezeigt sondern eben die ID.
Und da  ja die  Tabellenerstellungabfrage nach ein geben des Monats bei jeden Aufruf die Tabelle neu schreibt kann ich da auch nicht viel einstellen. Ich müsste halt jetzt irgendwie im Bericht auf den Typ verweisen können, damit er erscheint.
Hoffe ich konnte das Verständlich rüber bringen.
Titel: Re: Problem mit Select Case
Beitrag von: DF6GL am März 11, 2012, 16:47:57
Hallo,

also, von mir hast Du den Vorschlag zu einer Tabellenerstellungsabfrage für eine Berichtsverwendung nicht....   8)


Normalerweise erstellt man eine Auswahl(!)abfrage für den Bericht, die über alle benötigten Tabellen verknüpft (und somit alle nötigen Felder aus den Tabellen ausliest und in die Berichts-Datenherkunft liefert). Einschränkende Kriterien übergibt man (auch normalerweise)  als Where-Condition-Parameter der Openreport-Methode (VBA-Ausruf des Berichtes).
Titel: Re: Problem mit Select Case
Beitrag von: uwe01 am März 11, 2012, 17:28:47
Hallo DF6GL,
richtig von dir stammt das mit der Tabellenerstellungabfrage nicht, sondern das Berechnen des Tüv/Su Termin. Das mit der Tabellenerstellungabfrage habe ich gebastelt. Sorry wenn das irgendwie Falsch rüber gekommen ist.

LG
Titel: Re: Problem mit Select Case
Beitrag von: DF6GL am März 11, 2012, 17:34:51
Hallo,

Du darfst meinen "Einwand" nicht für so ernst halten...  ;) :D ;D