回答編集履歴
1
コード修正
    
        answer	
    CHANGED
    
    | @@ -20,7 +20,7 @@ | |
| 20 20 |  | 
| 21 21 | 
             
                Set db = CurrentDb()
         | 
| 22 22 | 
             
                'リンクテーブルを開く
         | 
| 23 | 
            -
                Set rs1 = db.OpenRecordset(" | 
| 23 | 
            +
                Set rs1 = db.OpenRecordset("LinkTbl;")
         | 
| 24 24 | 
             
                '追加先テーブル
         | 
| 25 25 | 
             
                Set rs2 = CurrentDb.OpenRecordset("DataTbl")
         | 
| 26 26 |  | 
