作者：乔山办公网日期：
返回目录：excel表格制作
自己写zd吧，内很简单的容
Set conn = CreateObject("adodb.connection")
conn.Open "provider=microsoft.jet.oledb.4.0;extended properties=excel 8.0;data source=" & ThisWorkbook.FullName
Sql = "select top 3 * from [sheet1$A2:D]"
[H3].CopyFromRecordset conn.Execute(Sql)
conn.Close: Set conn = Nothing
1、例如我想把图1的数据给添加到图2的数据库中；
2、如图2.
3、先写个sql语句确认一条度数据能插入成功。
4、然后复制这条sql语句打开excle，选中表格后的一个单元格，在上方函数位置粘贴刚才的sql语句并做修改：="INSERT INTO
student(id,name,age)
VALUES("&A2&",'"&B2&"','"&C2&"')" 注意前面有个=
然后整个sql用 “”包围问住。
5、确认后就可以看到在单元格中会自答动生成一条sql语句。选中单元格下拉，会发现所有的行后面都会生成一条sql语句。
6、复制所有的sql语句。
7、在navicat中 执行这些专SQL语句，注意批量执行的时候，要在后面加分号属 ； 。
8、刷新表，可见批量转化成功。
1：确定需要生成的SQL语句模型。
--根据需求写一条百SQL模板
update 表 set [Longitude] = '' , [Latitude] = '' where [ID]= '' and [Name] = ''
2：删除Excel表中多余的列，保留需要更新和查询条件的列。并按照需要生成的sql语句度顺序进行排序。
前面两个列是需要更新的值，后面两个是where的条件字段
var cpro_psid ="u2572954"; var cpro_pswidth =966; var cpro_psheight =120;
3：在Excel表插入空列，拷贝相关的语句进专去。
拷贝第一语句放入合适的单元格，把把这一列一拖到底，生成同样的语句
4：把结果拷贝到查属询分析器中，使用替换把多余的空格去掉。
这个方法有很多吧.ACCESS本身就支持SQL的.EXCEL与ACCESS之间又是可以转换.
还有用数据源的方法.
还有PLSQL中可以建立数据源再指定EXCEL文件可行.
方法有很多种的.