INSERT INTOコマンドを使用して、Excel 2007ファイルからAccess 2007ファイルにデータを書き込もうとしています。データは、Tool_Selector.xlsm Excelファイルの "NewProj"ワークシートに含まれており、 "Tool_Database.mdb"ファイルに書き込む必要がありますが、残念ながら私はいくつかの異なるエラーを受け取りました..これは現在私が持っているものですINSERT INTOを使用してアクセスデータベースにデータを書き込む
私は、個々のセルの値を転送する必要が Insert Data from Excel into Access using VBA:
Sub AddData()
Dim Cn As ADODB.Connection
Set Cn = New ADODB.Connection
Cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Tools_Dev\_Tool_Selector\Tool_Selector.xlsm;Extended Properties=Excel 8.0;" _
& "Persist Security Info=False"
Cn.Execute "INSERT INTO Project_Names IN 'D:\Tool_Database\Tool_Database.mdb' SELECT * FROM Worksheets("NewProj").Range("A2").Value"
Cn.Close
Set Cn = Nothing
End Sub
私はこのスレッドからコードを得ました。
ありがとうございました。
私はこの Cn.Execute "INSERT INTO Project_Names IN 'とD:\ Tool_Database \ Tool_Database.mdb' SELECT * FROMワークシートことを知っている"。レンジ "値です( "NewProj)(" A2)" ですブレーク...どのように特定のセルまたは行のセルを選択できますか? – thebiglebowski11
これが役立つかどうかを確認してください:http://stackoverflow.com/questions/5122582/run-access-query-from-excel-and-pass-paramerts-to-the-query/5122667#5122667 – Fionnuala
いい人。 – thebiglebowski11