VB编程同一个access，两个相同类型与排列。想让其中一个表的一行数据复制到另一个表中的某一行里面。

如图，复制一个表里面的某一行，更新到另一个表中的某一行。VB代码怎么写？

推荐答案 2018-04-18

在工作表中可以直接用vlookup完成，如果非得vba，vba中也可以调用工作表函数。 Sub test() With Sheets("sheet2") For c = 5 To 100 Cells(14, c) = Application.WorksheetFunction.VLookup(Cells(10, c), Sheets("sheet1").Range("a:b"), 2, 0) Next End With End Sub追问

哥们，我这必须用VB编程的。并且调用的是access数据库，“cod”“CommData”同时在这一个access数据库中。就是想以“CommData”中的ID为过滤条件，调用“COD”中的某一行来覆盖“CommData”中的选用的ID这一行。该怎么做？

温馨提示：答案为网友推荐，仅供参考

当前网址：http://66.wendadaohang.com/zd/Uv99ni99U2sv9xp29n9.html

相似回答

vb+Access, 怎么将数据库中一个表的数据移到同一个数据库中的另外一...答：用SQL语句。加入你想把A表的数据移动到B表中。那么对应的语句 insert into A select * from B 把这个语句写到你程序相应的位置就可以了塞。

vb中复制数据库的一条记录到另一个相同的数据库中(access文件)答：Set conn1 = New ADODB.Connection conn1.CursorLocation = adUseClient conn1.Open sqlstr sqlstr = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=456123;Data Source=" & App.Path & "\DB1.mdb;Persist Security Info=True"Set conn2 = New ADODB.Connection conn2.CursorLoc...

如何用vb编程 把数据从一个工作表导入到另一个工作表答：将sheet1中的数据对号入座放入sheet2中的代码是：sub main()for i= 1 to 12 if sheets(1).cells(i,"C")=sheets(2).cells(3,i+6) then'sheet1中的C列数据，如果等于Sheet2中第三行的对应数据 sheets(2).cells(3,i+6)=sheets(1).cells(i,"D")'则将sheet1中的D列数据，放入sheet2...

用VB代码将access数据库中的一张表结构及数据复制到另外一张新表中...答：把下面的代码copy你的vb中的一个模块中就可以操作acess数据库了 '使用方法：1、调用SetConnStr函数，产生连接字符串。2、打开数据库连接，3。执行ExecuteSQL函数返回结果集。'=== 必须引用ADO2.5库方可运行 === 'VB数据库编程的模块，演示如何用ADO连接Access数据库，以及 SQL 查询语言的运用。'引...

VB能否使用SQL语句将ACCESS数据表中一列数据添加到另一个新的数据表中...答：楼上两位的意思都对，只是不够详细；楼主可以使用 INSERT ... FROM 语句来实现你要功能，它的作用就是根据指定的查询条件返回的结果来创建一张新的表。比如：INSERT INTO 新表名 (字段1,字段2,字段3)SELECT 字段1,字段2,字段3 FROM 要查询的表 WHERE (条件)记住一点，新建表的字段数一定和要...

利用VB语句调用ACCESS数据库,将一张表的全部信息复制到另一张表中答：Set OpenConnForAccess = AdoConn End Function Public Function RunTrans(ByVal tranSql As String, ByVal AdoConn As ADODB.Connection)With AdoConn .BeginTrans .Execute tranSql .CommitTrans End With End Function 两张表格的字段不是完全相同的 ___strSql = "insert into b(id,num) select...

大家正在搜