我正在尝试使用 FileDialog 保存 rtf 文件,并希望使用 where 子句进行过滤。这就是我所拥有的:
Set dlgSave = FileDialog(msoFileDialogSaveAs)
With dlgSave
.Title = "Provide the place to save this file"
.ButtonName = "Save As..."
.InitialFileName = Me.cmbPickAReportToPrint.Value & "-" & Format(Date, "mmddyy") & ".rtf"
.InitialView = msoFileDialogViewDetails
If .Show Then
DoCmd.OutputTo acOutputReport, Me.cmbPickAReportToPrint.Value, acFormatRTF, .SelectedItems(1)
End If
End With
关于如何在不更改报告的情况下添加 where 子句的任何想法?