я пробую так, но ничего ен получается
- Код: Выделить всё
rstSpr.Filter = "dn" & i & " >= #" & CDate(Replace(rstUpBP("date").Value, ".", "/")) & "#"
rstSpr.Filter = "dn" & i & " >= #" & CDate(Replace(rstUpBP("date").Value, ".", "/")) & "#"
rstSpr.Filter = "dn" & i & " >= #" & CDate(Replace(rstUpBP("date").Value, ".", "/")) & "# AND dk" & i & " <= #" & CDate(Replace(rstUpBP("date").Value, ".", "/")) & "#"
rstSpr.filtered = True
Debug.Print "#" & Format$(rstUpBP("date"), "mm/dd/yyyy") & "#"
"#" & Format$(rstUpBP("date"), "mm\/dd\/yyyy") & "#"
Сейчас этот форум просматривают: SemrushBot и гости: 89