DBGridのレコード追加方法2（Addnewについて） (ID:104570)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ありがとうございました。 レコード追加できるようになりました。 しかし、Excelのレコードを追加できるのですが、 そのExcelを立ち上げた状態でないと使用できません。 Excelを立ち上げずに追加はできるようになるのでしょうか？ Private Sub 登録_Click() Dim ws As DAO.Workspace, db As DAO.Database Dim rs As DAO.Recordset Set ws = DBEngine.Workspaces(0) Set db = ws.OpenDatabase("C:\アドレス.xls", False, False, "EXCEL 5.0;") Set rs = db.OpenRecordset("Sheet1$") Dim 氏名, 性別, 手段, 日付 As String 氏名 = Text1.Text 性別 = Text2.Text 手段 = Text3.Text 日付 = Text4.Text rs.AddNew rs("氏名") = 氏名 rs("性別") = 性別 rs("受信手段") = 手段 rs("日付") = 日付 rs.Update End Sub よろしくお願い致します。