Hallo!

Ich bin am Verzweifeln. Ich möchte einfach nur, dass Daten aus der DB in meiner UserForm angezeigt werden.

Hier erstmal der Code:

Private Sub UserForm_Initialize()
    Dim db As ADODB.Connection
    'Verbindung zur Datenbank
    Dim ds As New ADODB.Recordset
    'Recordset mit Bezug zur aktuellen Datenbank
    Dim sqlabfrage As String
    'enthält die SQL-Abfrage
    
    Set db = CurrentProject.Connection
    'Verbindung zur momentanen Datenbank herstellen
    
    sqlabfrage = "SELECT es, de"
        sqlabfrage = sqlabfrage + " FROM tab_woerterbuch"
        sqlabfrage = sqlabfrage + " ORDER BY es, de"
        
    With ds
        .ActiveConnection = db
        'Bezug (Recordset) zur momentanen Datenbankverbindung beziehen
        .CursorLocation = adUseClient
        .CursorType = adOpenDynamic
        .LockType = adLockOptimistic
        .Open sqlabfrage
        'Daten ermitteln
    End With
        
    Set Me.Recordset = ds
    
    Me.txt_feld1.ControlSource = ds.Fields("es")
    Me.txt_feld2.ControlSource = ds.Fields("de")
    
    ds.Close
    'Recordset schließen
    
    Set ds = Nothing
    'Recordset freigeben
    Set db = Nothing
    'Verbindung zur Datenbank trennen
End Sub

Wenn ich nun den Code ausführen lasse, dann tritt immer an der Stelle "Set Me.Recordset = ds" folgender Fehler auf:
"Fehler beim Kompilieren: Methode oder Datenobjekt nicht gefunden".

Ich nutze Access in der Version 16.0 (Teil von Office365) unter Windows 7.

Eingebunden sind folgende Bibliotheken:
- VisualBasic for Applications

- Microsoft Access 15.0 Object Library

- OLE Automation

- Microsoft Office 15.0 Access database engine object Library

- Microsoft Forms 2.0 Object Library

- Microsoft ActiveX Data Objects 6.1 Library

Im Netz und durch Ausprobieren bin ich auch nicht weiter gekommen. Die Abfrage wird ausgeführt, es werden auch Ergebnisse geliefert (hatte ich durch .Recordcount getestet), aber halt keine Daten im Formular angezeigt.

Ist vielleicht ganz was Banales, aber manchmal sieht man den Wald vor lauter Bäumen nicht.

Danke im Voraus für eure Hilfe!

Alexander