ACCESS中导入EXCEL表数据，用VBA怎么实现？已有追加记录求代码，求更新原有记录代码

Question

ACCESS中导入EXCEL表数据，没有的数据增加，已有的进行更新，用VBA怎么实现？已有追加记录求代码，求更新原有记录代码

 SQL = "insert into [项目明细]([项目批准文号],[项目名称],[项目类型],[[设备投资]," _
         & "[合同编号],[合同额],[合同期/年],[合同开始日期],[合同终止日期],[是否验收],[资产归属],[备注],[项目情况]) select * from [excel 8.0;database=" & pathname & "].[" & tablename & "]"
        
    
    CurrentDb.Execute (SQL)

Answer 1

导入excel表格，主键相同的更新原有记录