Excel調用ACCESS的VBA代碼怎麽寫

提供壹種在EXCEL使用代碼，連接ACCESS，取得數據的方法，看是不是妳要的東西：

Dim?cnn?As?New?Connection

Dim?rs?As?New?Recordset

Dim?sql?As?String

Dim?qx?As?String

qx?=?"金牛"

cnn.Open?"Provider=Microsoft.Ace.OleDB.12.0;dataSource="?&?ThisWorkbook.Path?&?"\數據庫.accdb"

sql?=?"select?*?from?[宏站]?where?區域='"&?qx?&?"'"

'('"?&?qx?&?"'")括號裏這段有點BT，壹定要這樣寫才行。

rs.Open?sql,?cnn

[a1].CopyFromRecordset?rs

EndSub