首页 相关文章 如何將Excel的文件导入Access文件

如何將Excel的文件导入Access文件

下面我已程序代码做成模块,只要导入必要之参数即可!
  
  此一模块共有四个参数:
  1、sSheetName:要导出资料的文件名称(Sheetname),例如Sheet1
  2、sExcelPath:要导出资料的Excel档案路径名称(Workbookpath),例如C:ook1.xls
  3、sAccessTable:要导入的AccessTable名称,例如TestTable
  4、sAccessDBPath:要导入的Access档案路径名称,例如C:Test.mdb
  
  在声明中加入以下:
  
  PrivateSubExportExcelSheetToAccess(sSheetNameAsString,sExcelPathAsString,sAccessTableAsString,sAccessDBPathAsString)
  DimdbAsDatabase
  DimrsAsRecordset
  Setdb=OpenDatabase(sExcelPath,True,False,"Excel5.0")
  Calldb.Execute("Select*into[;dat...[ 查看全文 ]

2016-02-19 标签:

如何將Excel的文件导入Access文件的相关文章

手机页面
收藏网站 回到头部