Ms access 打印所有记录表单连续表单访问

我在Access中有一个连续表单，其中包含可以从表单中筛选的记录集。见下图：

我希望能够打印所有选定的记录。将所选记录导出到报表或直接打印记录对我来说都很好。我一直在到处搜索，但所有的帖子都是关于打印单个记录的

过滤器被添加到表单中，并生成一个过滤器字符串，当表单上的一个过滤器字段发生更改时，该字符串将更新

If txtDatumvan <> "" Then
    strFilter = " Clng(format(s.Begin_DatumTijd, 'yyyymmdd')) >= " & CLng(Format(Me.txtDatumvan, "yyyymmdd")) & " "

    If txtDatumTot <> "" Then
        strFilter = strFilter + " AND Clng(format(s.Begin_DatumTijd, 'yyyymmdd')) <= " & CLng(Format(Me.txtDatumTot, "yyyymmdd")) & ""
    End If

如果txtDatumvan为“”，则
strFilter=“Clng（format（s.Begin_DatumTijd，'yyyyymmdd'））>=”&Clng（format（Me.txtDatumvan，'yyyyymmdd'））&”
如果txtDatumTot“”则
strFilter=strFilter+”和Clng（格式（s.Begin_DatumTijd，'yyyymmdd'））要将当前对象上的所有记录打印到该对象的默认打印机，可以使用以下VBA：

DoCmd.PrintOut acPrintAll

但是，连续表单打印起来很笨拙。我建议您使用报表。如果您想让我演示如何将筛选器从表单转移到报表，您需要详细说明如何添加这些筛选器。
我已将筛选器部分添加到问题中，但不包括实际应用筛选器的代码