Herbers Excel-Forum - das Archiv

Recordset uebergeben

Bild

Betrifft: Recordset uebergeben
von: Holg
Geschrieben am: 01.10.2003 15:41:32
Hallo,

Ist es moeglich ein DAO Recordset an eine Funktion / Prozedur zu uebergeben?

Gruss
Holg

Bild

Betrifft: AW: Recordset uebergeben
von: Holg
Geschrieben am: 01.10.2003 15:48:20
So hab selber nen bisschen weiter probiert...

Wenn die Funktion so aussieht:

Sub recordset2(ByRef rs)
rs.MoveFirst
Cells(1, 1).Value = rs.Fields("OTA").Value
End Sub


dann geht es. Bei:

Sub recordset2(ByRef rs)
rs.MoveFirst
Cells(1, 1).Value = rs.Fields("OTA").Value
End Sub


kommt:
Compiler Error
ByRef argument type mismatch

Wieso das denn? Ist die obere Version in Ordnung oder geht das nur dank Microsoft Bugs?

Gruss Holg
Bild

Betrifft: AW: Recordset uebergeben
von: Björn B.
Geschrieben am: 01.10.2003 23:11:09
Hallo Holg(er),

mal ganz ehrlich, wo ist der Unterschied zwischen den beiden Funktionen? Ich kann keinen sehen. Deine Fehlermeldung deutet darauf hin, dass etwas mit dem Übergabeelement rs nicht hinhaut. Dazu müsste man aber deutlich mehr wissen, als Du bisher gepostet hast.

Z. B. hast Du die Prozeduren vieleeicht mit unterschiedlichen Datensätzen gefüttert? Hast Du die Prozeduren in unterschiedliche Module gestellt? Usw.

Vielleicht solltest Du mal 'nen Muster posten.

Gruß
Björn
 Bild