我想做一个导出到电子表的功能,如下图导出的电子表没有内容

jobqqq　发表于：2015-07-27 15:33:22 　

Public Sub btnExport_Click()
On Error Resume Next

    If Me.sfrList.Form.CurrentRecord < 1 Then
        Exit Sub
    End If

Me.sfrList.SetFocus
ExportToExcel Me.sfrList.Form.Caption
End Sub

缪炜发表于：2015-07-27 15:39:54

看一下导出的excel文件是否是打开的

金宇发表于：2015-07-27 15:51:31

把平台系统设置中的“无操作自动退出时间”和“重复登录检查间隔”都设置为0 ，然后重新登录系统再试试。

总记录：2篇页次：1/1 9 1 :

Access交流中心