MatchRequired Methode oder Datenobject nicht gefunden?

[zorlayan]

Hallo zusammen,
ich wollte ein kleines Skript zum feststellen ob ein Datensatz aus der Kombobox ausgewält oder nicht wurde und folgenden Skript in der Microsoft-Seite gefunden aber funktioniert nicht.
Access bringt eine Meldung "MatchRequired Methode oder Datenobjekt nicht gefunden".
Wie werde ich dann den Skript zum Laufen bringen wenn die Methode nicht existiert? oder muss irgendwo unter Access irgendetwas vorher eingestellt bzw. aktiviert werden muss?

Hier ist der Code von Microsoft:
-------------------------------------------
Private Sub ComboBox1_Change()
If ComboBox1.MatchRequired = True Then
'MSForms handles this case automatically
Else
If ComboBox1.MatchFound = True Then
MsgBox "Match Found; matching optional."
Else
MsgBox "Match not Found; matching " _
& "optional."
End If
End If
End Sub
-----------------------------

vielen Dank für die Unterstützung.

LG
Zorlayan

[Lachtaube]

MatchRequired + MatchFound sind Eigenschaften der Microsoft Forms 2.0 Library und nicht kompatibel mit Access-Kombifeldern.

[MzKlMu]

Hallo,
kannst Du das Vorhaben mal näher beschreiben?
Wenn in einer Kombobox nichts ausgewählt wurde ist diese NULL.
Und das Ereignis Change() greift bei jedem Tastendruck, ist das wirklich gewünscht ?

[zorlayan]

Hi,
danke für die Antwort. Ich habe versucht das Problem anders zu lösen. Folgender Code habe ich gebastelt aber funktioniert zum Teil auch nicht richtig

Private Sub Befehl32_Click()
Refresh
Dim auswahl As Long
If Me.Kombinationsfeld29.Column(auswahl) = 0 Then
DoCmd.OpenReport Me!Kombinationsfeld29.Column(0), acViewReport
Else
DoCmd.OpenReport Me!Kombinationsfeld29.Column(1), acViewReport
End If
End Sub


Erklärung:
ich habe 2 reports, auswählbar in einem kombobox, wenn ich den erste Wert  im Kombo auswähle dann sollte das erste Report aufgehen ansonsten der 2. oder nichts.
PS: Kombobox Werten sind identisch mit den Reportsnamen.

Danke

[Lachtaube]

Code (vb) [Auswählen] Erweitern

Private Sub Befehl32_Click()
   DoCmd.OpenReport Me.Kombinationsfeld29, acViewReport
End Sub

[Beaker s.a.]

@zorlayan
Falls du nicht verstanden hast, warum dein Code nicht funktioniert.
Column heisst Spalte. Mit

Code [Auswählen] Erweitern

.Column(1)
erhältst du also den Wert aus der zweiten Spalte des angeklickten DS,
aber nicht den zweiten Eintrag im Kombi.
In deinem Fall sollte der Name des Reports in der ersten Spalte (Index
= 0) stehen; - dann funzt der von Lachtaube gezeigte Code.
gruss ekkehard