mwichmann Geschrieben 17. Oktober 2002 Teilen Geschrieben 17. Oktober 2002 Hallo, ich habe ein Problem in Access.Ich habe insgesamt vier Formulare und will jetzt mit einem Kombinationsfeld in den einzelnen Formularen hin und her springen können.Ist das in Access überhaupt möglich?Wenn ja wäre es nett,wenn man mir ein bsp mitschicken bzw posten könnte. ich danke schon mal im Voraus... Bitte schreibt mir eine email. Zitieren Link zu diesem Kommentar Auf anderen Seiten teilen Mehr Optionen zum Teilen...
tauron Geschrieben 17. Oktober 2002 Teilen Geschrieben 17. Oktober 2002 Moin ! klar geht das, erstell dir ein Kombinations-Feld und in den Eigenschaften unter "Daten" -> "Herkunftstyp" stelltst du "Wertliste" ein. In dem Feld darunter "Datensatzherkunft" listest Du dann die Namen deiner Formulare auf, z.B. Formular1;Formular2;Formular3. Damit beim Auswählen was passiert musst Du nur noch eine Ereignisprozedur schreiben, also unter Eigenschaften "Ereignis" -> "Nach Aktualisierung" auf "[Ereignisprozedur]" stellen. Dann kannst Du unter VBA den ausgewählten Eintrag des Kombinationsfeldes abfragen und dann je nach Auswahl, z.B. über die Select..Case Anweisung die jeweilige Seite öffnen (mit DoCmd.OpenForm Name des Formulars). Email find ich nicht so gut, kann ja sein das mal jemand das gleiche Problem hat. Hoffe das hilft Dir weiter ! gruß Christian Zitieren Link zu diesem Kommentar Auf anderen Seiten teilen Mehr Optionen zum Teilen...
mwichmann Geschrieben 18. Oktober 2002 Autor Teilen Geschrieben 18. Oktober 2002 Hallo, ich habe deinen vorschlag ausprobiert,aber ich bekomme es einfach nicht hin. Ich ahbe folgenden Quelltext. Private Sub Kombinationsfeld32_AfterUpdate() Dim stDocName As String Dim stDocName1 As String Dim stDocName2 As String Dim stLinkCriteria As String stDocName = "kunde neu" stDocName1 = "kunde editieren" stDocName2 = "kunde suche" Select Case "kunde neu": DoCmd.OpenForm stDocName, , , stLinkCriteria Case "kunde editieren": DoCmd.OpenForm stDocName1 Case "Datenbank öffnen": DoCmd.OpenForm stDocName2 End Function End Sub Ich bekomme aber immer die Fehlermeldung: Anweisung und Zeilenmarken zwischen SelectCase und erstem Vorkommen von Case unzulässig. Ich denke mal das nur ein Syntax falsch ist, aber ich krige es nicht hin.. Wäre nett wenn du dir den quelltext mal angucken würdest. Zitieren Link zu diesem Kommentar Auf anderen Seiten teilen Mehr Optionen zum Teilen...
Der Kleine Geschrieben 19. Oktober 2002 Teilen Geschrieben 19. Oktober 2002 Zur Select - Case Anweisung in VBA - Hilfe : Führt eine von mehreren Gruppen von Anweisungen aus, abhängig vom Wert eines Ausdrucks. Syntax Select Case Testausdruck [Case Ausdrucksliste-n [Anweisungen-n]] ... [Case Else [elseAnw]] End Select Die Syntax der Select Case-Anweisung besteht aus folgenden Teilen: Teil Beschreibung Testausdruck Erforderlich. Ein beliebiger numerischer Ausdruck oder Zeichenfolgenausdruck. Ausdrucksliste-n Erforderlich, wenn der Case-Abschnitt verwendet wird. Eine durch Kommas getrennte Liste in einer oder mehreren der folgenden Formen: Ausdruck, Ausdruck To Ausdruck, Is Vergleichsoperator Ausdruck. Das Schlüsselwort To gibt einen Bereich von Werten an. Bei diesem Schlüsselwort muß der kleinere Wert immer links von To stehen. Verwenden Sie das Schlüsselwort Is in Kombination mit Vergleichsoperatoren (außer Is und Like), um einen Bereich von Werten anzugeben. Wenn Sie das Schlüsselwort Is nicht angeben, wird es automatisch eingefügt. Anweisungen-n Optional. Eine oder mehrere Anweisungen, die ausgeführt werden, wenn Testausdruck mit irgendeinem Teil in Ausdrucksliste-n übereinstimmt. elseAnw Optional. Eine oder mehrere Anweisungen, die ausgeführt werden, wenn Testausdruck mit keinem der Ausdrücke im Case-Abschnitt übereinstimmt. Also bei Select Case der Ausdruck der Abfrage aus dem Kombinationsfeld (kombinationsfeld32.SelText) , dann erst 3 Fälle unterscheiden:Case "Kunde neu" : , Case "Kunde editieren": ; Case "Kunde suchen" : Zitieren Link zu diesem Kommentar Auf anderen Seiten teilen Mehr Optionen zum Teilen...
Empfohlene Beiträge
Dein Kommentar
Du kannst jetzt schreiben und Dich später registrieren. Wenn Du ein Konto hast, melde Dich jetzt an, um unter Deinem Benutzernamen zu schreiben.