建一个"sc按钮,在按钮的单击事件里写上这段代码

Private Sub sc_Click()
    DoCmd.OutputTo acOutputTable, "要导出的表", 9
End Sub

就可以了,很方便!