各位高手，请进来帮我一把！

ahczzyl

如下是我在ACCESS论坛版主给我的回复：

“你可以尝试使用 EXCEL.APPLICATION 在后台打开 EXCEL 文件（可以用程序输入密码，具体方法请去 EXCEL 板块询问）"

注：我的原问题是“如何在ACCESS中链结带有密码的Excel表?”

老鬼

Dim ex As Object

Set ex = CreateObject("excel.APPLICATION")

ex.Visible = False

ex.workbooks.Open "C:\01.XLS", , , , "123"

DoCmd.TransferSpreadsheet .....