一、学友问题描述：
爱好者:厦门--宵伽(974692176)  15:55:11
求助：想咨询一下access的问题，access导出pdf，输入了网站上这篇文章里面的这段代码，但导出的数据为表中所有的记录，能不能只导出第一页呀？或者导出的是当前窗体页的数据到一页的PDF？
Access报表导出为PDF代码,Access窗体导出为PDF代码；Access报表导出PDF方法【Access软件网】
http://www.accessoft.com/article-show.asp?id=17312

二、解决方法：
      使用以下代码可以实现只导出当前记录到PDF文档：
Private Sub Command59_Click()
    Me.Filter = "ID=" & Me.ID
    Me.FilterOn = True
    '纵向参数如下
    Forms("窗体名称").Printer.Orientation = 1
    '将窗体导出为PDF代码
    DoCmd.OutputTo acOutputForm, "窗体名称", acFormatPDF, , True
    DoCmd.Close acForm, "窗体名称"
End Sub

附   件:
点击下载此附件

图   示:

导出单页PDF效果: