Oder mit db.search und eine Suchformel eingeben. Da kannst Du dann wenigstens mehrere Bedingungen übergeben.
Ist von der Performance her auch nicht schlecht meine ich.
Ich habe mal sowas gemacht:
Select Case suchtyp
Case "KST"
ivSuchformel = {(Form = "frmaktdialog" & heimatkt = "} & gvHKT_Doc.heimatteams(ivElement) & {" & (@text(Kalender) = "} & gvRange(0) &_
{" | @text(Kalender) = "} & gvRange(1) & {"| @text(Kalender) = "} & gvRange(2) & {" | @text(Kalender) = "} & gvRange(3) & _
{" | @text(Kalender) = "} & gvRange(4) & {" | @text(Kalender) = "} & gvRange(5) & {" | @text(Kalender) = "} & gvRange(6) & {"))}
Case "NAME"
ivSuchformel = {(Form = "frmaktdialog" & Name = "} & gvHKT_Doc.heimatteams(ivElement) & {" & (@text(Kalender) = "} & gvRange(0) &_
{" | @text(Kalender) = "} & gvRange(1) & {"| @text(Kalender) = "} & gvRange(2) & {" | @text(Kalender) = "} & gvRange(3) & _
{" | @text(Kalender) = "} & gvRange(4) & {" | @text(Kalender) = "} & gvRange(5) & {" | @text(Kalender) = "} & gvRange(6) & {"))}
Case "TEAM"
ivSuchformel = {(Form = "frmaktdialog" & stammteam = "} & gvHKT_Doc.heimatteams(ivElement) & {" & (@text(Kalender) = "} & gvRange(0) &_
{" | @text(Kalender) = "} & gvRange(1) & {"| @text(Kalender) = "} & gvRange(2) & {" | @text(Kalender) = "} & gvRange(3) & _
{" | @text(Kalender) = "} & gvRange(4) & {" | @text(Kalender) = "} & gvRange(5) & {" | @text(Kalender) = "} & gvRange(6) & {"))}
End Select
' die suche erfolgt über die datenbank
Set ivAktColl = gv_DB.Search( ivSuchformel, Nothing, 0 )
Matthias