""      dstID=.Sheets("dst").Cells(dstRowNo,1).Text             src1RowNo=1      DoWhile.Sheets("src1").Cells(src1RowNo,1).Text<>""        src1ID=.Sheets("src1").Cells(src1RowNo,1).Text                 IfdstID=src1IDThen-IMDN开发者社群-imdn.cn"> ""      dstID=.Sheets("dst").Cells(dstRowNo,1).Text             src1RowNo=1      DoWhile.Sheets("src1").Cells(src1RowNo,1).Text<>""        src1ID=.Sheets("src1").Cells(src1RowNo,1).Text                 IfdstID=src1IDThen - IMDN开发者社群-imdn.cn">
登录
首页 » Windows开发 » VBA合并两个Excel表的数据到目标表

VBA合并两个Excel表的数据到目标表

于 2022-02-04 发布 文件大小:10.02 kB
0 201
下载积分: 2 下载次数: 1

代码说明:

"" 从src1.name和src2.age按ID获取数据,然后将数据设置为dst Sub hebing()     Dim dstRowNo As Long     Dim src1RowNo As Long     Dim src2RowNo As Long          With ActiveWorkbook         dstRowNo = 1         Do While .Sheets("dst").Cells(dstRowNo, 1).Text ""             dstID = .Sheets("dst").Cells(dstRowNo, 1).Text                          src1RowNo = 1             Do While .Sheets("src1").Cells(src1RowNo, 1).Text ""                 src1ID = .Sheets("src1").Cells(src1RowNo, 1).Text                                  If dstID = src1ID Then

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • Root Locus Design solve method(very easy and faster)
    Root Locus Design solve method(very easy and faster)
    2022-07-21 13:22:23下载
    积分:1
  • VB实例源码,如有不妥之处请修改后通知再讨论一起来完善源码的上传....
    VB实例源码,如有不妥之处请修改后通知再讨论一起来完善源码的上传.-Example VB source code, if the inadequacies of the revised notice, please discuss with one sound source upload.
    2022-03-26 08:40:17下载
    积分:1
  • C++ with self
    C++用自写的List链表以及面向对象的思想写成的图书管理系统,实现了文件读写记录-C++ with self-written list of the List, as well as the idea of object-oriented management system written in books, reading and writing a paper record
    2022-03-31 15:51:50下载
    积分:1
  • 高质量C++编程指南书,对我一定基础的C++学习者来说,这是一本帮助你继续提高的书籍。...
    高质量C++编程指南书,对我一定基础的C++学习者来说,这是一本帮助你继续提高的书籍。-High-quality C++ Programming Guide book, I will certainly based on the C++ Learners, this is one to help you continue to improve the books.
    2023-08-09 09:25:03下载
    积分:1
  • vb常用函数库
    vb常用函数库,包括了方方面面,主要有:通用api、文件操作、gdi图形图像、数学运算、网络、字符字符串处理、对话框、注册表、打印、ini文件操作、声音处理等等。
    2023-06-19 07:15:03下载
    积分:1
  • FP数据挖掘
    Data Mining of FP-growth algorithm, a very good code, you can tap the database of association rules
    2022-07-16 01:22:49下载
    积分:1
  • Ndis protocol driver to learn the good information. In the hope of the Internet...
    学习ndis协议驱动的好资料。在网上找的希望有帮助-Ndis protocol driver to learn the good information. In the hope of the Internet is helpful
    2022-01-26 19:41:02下载
    积分:1
  • 这是一个剪刀石头布的游戏,本身比较简单,但是有些设置难度的东西,还是值得一些新手学习学习,呵呵,请不要见笑!...
    这是一个剪刀石头布的游戏,本身比较简单,但是有些设置难度的东西,还是值得一些新手学习学习,呵呵,请不要见笑!-This is a cloth scissors stone of the game itself is relatively simple, but difficult to set up some things, it is still worthwhile for some newcomers learn from, huh, please do not laughed at!
    2022-02-22 00:53:29下载
    积分:1
  • Remote boot source to support the windows xp system
    远程开机源程序,支持windows xp系统-Remote boot source to support the windows xp system
    2022-03-19 01:10:54下载
    积分:1
  • Qt下简单的购票系统
    非常好的 信息时代已经来临,信息处理的利器——计算机应用于火车站车票的日常管理为火车站的现代化带来了从未有过的动力和机遇,为火车站票务管理领域的飞速发展提供了无限潜力。采用计算机管理信息系统已成为火车站票务管理科学化和现代化的重要标志,给火车站票务带来了明显的经济效益和社会效益。计算机已经成为人们生活不可缺少的一部分。铁路票务管理是一件比较负责但又非常重要的事情,它是涉及国家铁路运输的正常工作、国民经济的发展和人民生活水平及质量的大事情。随着经济的发展,交通运输越来越便捷,为了提高效率,减轻劳动强度,设计开发高效的铁路信息查询系统就显得颇为重要。火车售票管理中包含许多内容,包括有铁路乘客运输的运力问题等。 火车信息查询系统是企业信息决策和管理的重要的组成部分,是一种典型的信息管理系统,其开发主要包括后台的数据需求分析
    2022-02-26 20:45:58下载
    积分:1
  • 696516资源总数
  • 106914会员总数
  • 0今日下载