Office: (Office 2007) Optionsgruppe Abfrage

Hallo LL,
Du hast gerade mal meine Wünsch sehr ausführlich beschrieben, danke.
Hast Du denn eigentlich selber das Vorgang ausgeführt?
Denn bei mir funktioniert es nicht, das Button zeigt sich nicht, nachdem ich den Auswahl laut der Kreuztabelle RICHTIG gewählt habe.
Kann es daran legen, dass im Quellcode

- Me!OpenTWHFrmBtn.Visible = False statt True ist?

- Bzw. muss TWHButtonZeigen noch definiert werden?

 

Nein, stell nur sicher das Du die Werte auch in den richtigen Optionsgruppen eingibst!
Die Spaltenüberschriften der Kreuztabelle entsprechen den Optionsgruppen!
Ich habe die Optionsgruppen im Form auch in der Reihenfolge sortiert wie Sie in der Abfrage vorkommen.
Wähle doch z.B. (von oben nach unten!) "Mittel-Mittel-Mittel-Gut-Sehr Gut", dann sollte der Button erscheinen und im Formular "Absolutgrip (uhlsport)" kommen.
Hast Du denn jetzt verstanden wie die Auswahl im Formular die Werte im Ergebnisformular beeinflusst?

Das hat den Hintergrund, das wenn eine neue Selektion statfindet der Button ausgeblendet wird bis man wieder ein Ergebnis aufgrund der getroffenen Wahl bekommt.
Z.B. die Einstellung "Mittel"-"Gut"-"Sehr Gut"-"Gut"-"Sehr Gut"-"Gut" zeigt den Button an, wenn Du nun für die Aufpralldämpfung Mittel wählst, bleibt der Button erhalten, da wieder ein Belag gefunden wurde. Der Button verschwindet nur für all die Fälle, in denen kein passender Belag vorhanden ist. Der Grund für diese von mir vorgenommene Änderung war, (wie bereits erwähnt) die lästige MsgBox im Fall das kein passender Belag gefunden wurde. Du kannst das aber gerne ändern.

Gruß

LL

 

Lob für Deine Betrag LL mit Faribige Erklärungsversuch, weiss ich zu schätzen.

Kann es dann sein, dass statt ' DoCmd.OpenForm stDocName, , , Krit ' (in Rot)

was ähnliches wie

' DoCmd.OpenTWHAnzeigeFrm stDocName, , , Krit '

sein soll, da das Ergebnis über das TWHAnzeige Formular angezeigt wird?

Habe die Quellcode selbe probiert, brachte aber nichts.

 

Hallo!!
stDocName ist die Variable für das Formulars, welche Du hier füllst
Code:

alles klar?

Gruß

LL

 

Das war mir schon klar, LL, habe ich von Anfang an schon durchgeführt. Da der Bewertungen von der Beläge nach zahöreiche Feldtests festgestellt worden sind, weiss ich selbe die Werte von der verschiedene Kriterien aufwendig.

Ich versuche seit langem zu sagen: nachdem ich die Richtige Kriterien in der Richtige Optionsgruppe ausgewählt habe, springt kein 'Belag anzeigen' Button raus.

Und ausserdem ist die 'Belagbezeichnung' in der TWHAnzeigeFrm IMMER bei Absolutgrip (schätze wegen alphabetische Ordnung) geblieben, auch wenn ich die kriterien für andere Beläge gewählt habe.

Liegt es eigentlich an der Funktion 'TWHButtonZeigen' in z.B.:

Private Sub TrockenenGripGrp_AfterUpdate()
Me!OpenTWHFrmBtn.Visible = False
TWHButtonZeigen
End Sub

PS: Mach es eine Unterschied eigentlich, wenn ich das Button 'Belag Anzeigen' von Anfang an sichtbar mache?

 

Hallo,

habe mir jetzt nochmal explizit die letzte DB aus Post #35 gezogen und kann dein Problem leider nicht nachvollziehen. Lade Dir doch nochmal das File "Test2.zip" aus Beitrag #35 runter und verwende die Test2.mdb (die andere DB ist leider mitreingerutscht).

Nein, dann bekommst Du wieder die Msgbox!

Gruß


LL


P.S.: kann es sein das Du eine Übersetzungssoftware verwendest??

 

Habe ich gerade gemacht, und alle 10 Belagarten mit der passenden Optionen in der Richtige Optionsgruppe durchgeführt; springt immer kein 'Belag Anzeigen' Box auf.
Und das Ergebnisformular 'TWHAnzeigenFrm' bleibt immer noch bei Absolutgrip (uhlsport) nach dem Daten von andere Belagarten gewählt worden ist.

Nein, beim Betragschreiben nicht.
Allerdings ist mein Access Programm auf Englisch, was kaum Unterschiede machen sollte, denn bis auf Bezeichnungen
( eg. Label(Acc_El) = Bezeichnungsfeld(Acc_De)) ist das Quellcode Language eh auf Englisch.

 

Da du nicht den Button zum öffnen des Formulars verwendest und damit den Filter nicht übergibst, siehst Du immer nur den ersten Datensatz wenn du nur das Form öffnest.
Ich habe deine DB auf das alte Verhalten umgestellt (mit der Msgbox) und lade Sie in diesen Beitrag nochmal hoch, just a moment!


Gruß


LL

Update:
Und Josephs Zeile eingefügt, auch wenn es sich hier nicht allzu sehr auswirkt sind "OR"-Abfragen natürlich zu bevorzugen *wink.gif*
@anne
Ich habe es jetzt auf ein Formular wieder reduziert, damit man nicht mehr durcheinander kommt *wink.gif*

 

Hallo,

Weil du das nun schon mehrfach unwidersprochen gesagt hast, mische ich mich mal ein:
Es ist nicht 'TWHAnzeigenFrm' sondern 'TWHAnzeigenFrm1', welches aus OptFrm - und nur auf diesem Wege macht es Sinn! - geöffnet wird.

um zu sagen

 

\@LL: In welche Format / Version ist das Prog. Test3? Kann es nämlich nicht öffnen.

@anne: Ist mir schon klar, habe nur das '1' am Ende rausgelassen.

 

Ich vermut mal Du hast mit dem Packer Probleme.
Hier nochmal als Zip.

 

Das ist mir schon klar LL. Ich wollte nur damit sagen, dass das Filterprozess irgendwie nicht übertragen wird, nachdem der entsprechende Optionen in Optfrm Abfrage Formular gewählt wurde.

Bei mir springt immer noch kein 'Belag Anzeigen' Button raus, auch mit der Test3 Programm nicht.

Bin ich der einzige hier, der so hangen bleibt?

PS:
Der Quellcode

Me!OpenTWHFrmBtn.Visible = False

in Test3 ist alle auf Kommentar (in Grün) umgestellt worden. Ich nehme an, dass es so nicht gewollt war, LL?

 

Doch sicher ist das so gewollt, dafür wird ja die Funktion "TWHButtonZeigen" aufgerufen.
So viel Code ist das ja nicht, dass man den nicht einmal von vorne bis zum Ende lesen könnte. *rolleyes.gif*

Sicherlich machst du irgendetwas falsch. Wie gesagt, macht es keinen Sinn, das Formular "TWHAnzeigeFrm_Neu" direkt zu öffnen, das funktioniert nur über den Button und wenn du alles ausfüllst, wird der auch eingeblendet.

Kannst du mal ganz genau, Schritt für Schritt, beschreiben wie du vorgehst?

 

Aus 'C' Programmierung weiss ich, dass Kommentare nicht im Programcode eingreifen.
Wenn es so gewollt wäre, wo liegt denn das Sinn von das ganze Zeile:
Me!OpenTWHFrmBtn.Visible = False
?

Das habe ich auch nicht gemacht.

Also erst wird OptFrm geöffnet, die entsprechende Optionen angeklickt und gewählt.
Kein Button springt raus, kein 'Belag Anzeigen' Buttomn wird angeklickt, somit kann man auch nicht erwarten, dass 'TWHAnzeigeFrm_Neu' die entsprechende Belag anzeigt.
Beim öffnen das TWHAnzeigeFrm_Neu wird das erste (alphabetische) Belagart Absolutgrip (uhlsport) angezeigt, was auch zu erwarten war.

Grundliegende Problem ist also dass das 'Belag Anzeigen' Button nicht eingeblendet wird.

 

Welche Version der Test-mbd verwendest du? Die aus #56?
Bei dieser probierte ich es gerade aus:
1. Formular OptFrm geöffnet
2. bei jeder Optiongruppe "gut" gewählt
3. Button "Belag anzeigen" wurde sichtbar
4. Klick darauf öffnete das Formular TWHAnzeigeFrm_Neu mit einem Datensatz "Supersoft (Derbystar)"

Sollte das bei dir nicht der Fall sein: kann es sein, dass du über den Sicherheitsmodus die Code-Ausführung verhinderst?