access在窗体添加按钮默认打印报表的最后一页

ACCESS里面,在窗体里面添加一个按钮,如何让他默认打印报表的最后一页,窗体和报表用的是同一个表.窗体和报表里面的字段设计都是一样的.

楼主可以这样编写按钮单击事件过程：

Private Sub Command1_Click()

Dim LastPage As Integer
DoCmd.OpenReport "报表名", acViewPreview '打开报表预览模式，以便获取报表总页数
LastPage = Reports!报表名.Pages '获取报表的总页数
DoCmd.PrintOut acPages, LastPage, LastPage '只打印报表最后那页
DoCmd.Close acReport, "报表名" '关闭报表

End Sub

如有不明白或疑问，请发追问。Hi我也行

命令按钮的单击事件中写：docmd.openreport “报表名"即可。