外部データをアクセスする方法は何ですか？

1年 ago
海斗, 葵
1 minute

Accessデータベースに外部データをインポートする方法は、次のようなものがあります。

  1. Accessの「インポート」機能を使用する：「外部データ」タブで、「Excel」、「テキストファイル」、または他の形式のファイルを選択し、インポートウィザードの指示に従って操作を行う。
  2. Accessの「リンクテーブル」機能を使用する場合：「外部データ」タブを選択し、「リンクテーブル」を選択して、リンクしたい外部データファイル（例：Excelファイル）を選択し、ウィザードの指示に従ってリンクを完了します。
  3. Accessのプログラムインターフェース（例えばVBA）を使用すると、外部データファイルを読み取り、そのデータをAccessデータベースに挿入するVBAコードを書くことができます。例えば、ADOオブジェクトを使用して外部データソースに接続し、SQL文を使用してデータをAccessテーブルに挿入することができます。

以下は、ExcelファイルをAccessデータベースにインポートするためのVBAコードの例です。

Sub ImportDataFromExcel()
    Dim conn As Object
    Dim rs As Object
    Dim strSQL As String
    Dim strFilePath As String
    
    ' 设置Excel文件路径
    strFilePath = "C:\Path\To\Your\Excel\File.xlsx"
    
    ' 创建ADO连接对象
    Set conn = CreateObject("ADODB.Connection")
    
    ' 打开数据库连接
    conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Path\To\Your\Access\Database.accdb;"
    
    ' 创建ADO记录集对象
    Set rs = CreateObject("ADODB.Recordset")
    
    ' 构建插入数据的SQL语句
    strSQL = "INSERT INTO YourTableName (Field1, Field2, Field3) SELECT [Column1], [Column2], [Column3] FROM [Sheet1$] IN '" & strFilePath & "' [Excel 12.0 Xml;HDR=YES;IMEX=2];"
    
    ' 执行SQL语句
    conn.Execute strSQL
    
    ' 关闭记录集和连接对象
    rs.Close
    conn.Close
    
    ' 释放对象
    Set rs = Nothing
    Set conn = Nothing
    
    MsgBox "数据导入成功！"
End Sub

上記の例では、Excelファイルの1つのシートからデータをインポートするためのコードのみが示されています。Excelファイルに複数のシートが含まれている場合は、適切なシートを選択するためにコードを適宜変更する必要があります。

その他にも、Accessデータベースに外部データをインポートするために、サードパーティのツールやライブラリを使用する方法もあります。具体的にどの方法を選択するかは、要件や技術レベルによって異なります。

bannerAds