作者cartner (不问世事)
看板Office
标题[算表] EXCEL VBA 汇入MDB档问题
时间Tue Nov 13 13:34:00 2018
软体:Excel
版本:2007
板上各位高手好:
想请问有关EXCEL VBA汇入MDB档案问题
使用录制巨集後,最终想让巨集自动抓取与Excel同资料夹内的MDB档,
但是录制的巨集写出的路径似乎已经固定了(如下绿色文字处),请问应如何修改呢?
谢谢。
Sheets("Sheet2").Select '设定自sheet2 A1储存格开始汇入MDB资料
Range("A1").Select
Dim DS As String
DS = ThisWorkbook.Path & "\" & "*.mdb"
With ActiveSheet.ListObjects.Add(SourceType:=0, Source:=Array( _
"OLEDB;Provider=Microsoft.ACE.OLEDB.12.0;Password="""";User
ID=Admin;Data Source=
F:\VBA测试\Offline.mdb;Mode=Share Deny
Write" _
中段恕删
End With
--
「评断一个国家的品格,并不仅只要看她培养了什麽样的人民,
还要看它的人民选择对什麽样的人致敬、对什麽样的人追怀。」
----约翰‧甘乃迪----
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 210.69.191.1
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1542087250.A.8D8.html
1F:→ soyoso: 以"OLEDB;...Data Source=" & DS & ";Mode..."的方式试试 11/13 13:45
2F:→ cartner: 谢谢S大 11/13 15:54