如何让excel填写数据后自动更新写入ACEESS数据库中

狂奔的小赤佬 · 发表于 2024-3-20 18:13

公司有一台局域网的主机，里面创建各个岗位的文件夹，现在每个人就是单独做表填写自己的数据，需要其他岗位的数据要去对应的EXCEL文件打开复制粘贴过去，想通过VBA编写自动把EXCEL的数据写入到ACEESS中，EXCEL有修改数据则ACCESS能自动更新，不知道通过VBA能否实现

shiruiqiang · 发表于 2024-3-20 18:22

前几天刚搞过，局域网网址、是否需要登陆、下发模版端等等都不知道
只能说是可以。
循环sql="insert into xx values(xx1，xx2.。。)"避免空格

fzxba · 发表于 2024-3-20 19:55

模版.zip (44.65 KB, 下载次数: 29)

fzxba · 发表于 2024-3-20 19:58

非同一网段，则要端口映射。

shiruiqiang · 发表于 2024-3-20 20:19

fzxba 发表于 2024-3-20 19:55

老师，请教一下：

'下为生成数据库不存在记录的SQL语句
SQL = "INSERT INTO " & AccessTable & Chr(32) & SQL
如果access表刚开始没有，新建后，access主键没有，是否会报错？谢谢？

fzxba · 发表于 2024-3-20 20:22

试过数千次，不会出错，若无表，则执行
If Not Flag Then
SQL = "SELECT * INTO " & AccessTable & " FROM [Excel 12.0;Database=" & ExcelFile & "].[" & ExcelTable & "]"
Conn.Execute SQL
Else

shiruiqiang · 发表于 2024-3-20 20:59

fzxba 发表于 2024-3-20 20:22
试过数千次，不会出错，若无表，则执行
If Not Flag Then
SQL = "SELECT * INTO " & AccessTable & ...

谢谢老师答复，这样可以省下很多行了

fzxba · 发表于 2024-3-20 21:02

shiruiqiang 发表于 2024-3-20 20:59
谢谢老师答复，这样可以省下很多行了

你最好测试一下它的可行性。

opiona · 发表于 2024-3-20 21:47

ADO+ACCESS/MySQL/MSSQL 增修改删示例
https://club.excelhome.net/thread-1635846-1-1.html

狂奔的小赤佬 · 发表于 2024-3-20 22:23

fzxba 发表于 2024-3-20 19:55

测试是可用了，万分感谢老师

		自动登录	找回密码
密码			免费注册

[求助] 如何让excel填写数据后自动更新写入ACEESS数据库中

评分

评分

评分