关于使用vbs操作excel的问题

Posted 2023-04-05

有一张表格上的数据，需要拷贝到网页上，具体如下，
A1 B1 C1 D1分别复制到网页上的四个空白处，然后点击提交，
接着复制A2 B2 C2 D2,还是那个网页的某个项，再点击提交，
很多很多，一直是这样重复的工作，有没有办法一劳永逸的？
可否提供一个解决方案？

参考：
http://club.excelhome.net/viewthread.php?tid=357475 参考技术A 我觉得你的要求用“按键精灵”更合适

关于vbs与sql的联接问题

我有一个SQL数据库。服务器名为：SERVER，数据库名为mmis,有一个表merch有二个字段AA和BB，我怎样才能用VBA 把它导入Excel 工作表中，请说的详细些.如:怎样使用ADO引用,怎样联接数库?

参考技术A 我知道本地连接，远程连接的话自己试试
Dim con As New ADODB.Connection
Dim rst_gcl As New ADODB.Recordset
Dim rst_qm As New ADODB.Recordset
con.CursorLocation = adUseClient
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & 数据库路径 & ";Persist Security Info=False"
con.Open
set rst_gcl=con.execute("select * from merch")
sheet1.range("A1")=rst_gcl.fields("AA")
sheet1.cells(2,1)=rst_gcl.fields("BB")