银河思科学习小组 加入小组

24个成员 461713个话题 创建时间:2015-03-11

邵阳空放-今日一版

发表于2023-09-05 4次查看

邵阳空放-今日一版【vx---bLszkk--】

陆紫早期写过一篇,是用公式做的。既然他已经学会了VBA,他不得不试着用VBA来解决函数的问题。

在多个表中查找公司、纳税人识别 、银行和账 。

时间表,格式完全一样。现在,应该将每个明细表的、纳税人识别 、银行和帐 提取到汇总表中。

汇总表,根据公司名称查找相关信息。

说到搜索,很多人的第一反应是VLOOKUP功能。其实搜索家族里有很多有才华的人。在汇总表的B2中输入公式,并向右下拉。

=间接$A2'!'列B1,4,4

以上是公式的解法。让我们看看VBA是如何解决的。

想法

选择性粘贴进士表D2:D4,转置到B2。同样,金色的土壤和金色的沙滩也是如此。

相当于记录一个转置的宏,只需添加一个循环语句。表格内容有合并单元格,记录时会有问题。这里直接使用汇总表,即没有合并单元格的录制宏。

步骤01记录一个选择性粘贴和转置的宏。

步骤02检查刚刚记录的宏代码。

PasteSpecial表示选择性粘贴。

Transpose:=True表示转置。

中间的那些可以暂时忽略,删除,这样代码看起来整洁多了。

范围'D2:D4'。挑选

选择。复制

这句话的意思是先选中单元格d23360d4,然后复制选中的区域,可以简化为range'd23360d4'。收到。

同样,简化以下两句话 range'b7'。pastespecializedtransition:=true。

最后,嵌套循环语句和工作表名称的添加完成了代码。

Sub

将I标注为整数

对于i=2到张。数数

床单一。范围'D2:D4'。复制

床单1。范围'B'i。pastespecialtranspose:=True

然后

末端接头

运行代码验证效果。

VBA没有你想象的那么难学,只要你跟对了人。

就像这位读者说的,跟错人,一开始学那些乱七八糟的概念。别说是你。连我看着都想睡觉。学习VBA,要从工作中经常接触到的表单开始,思考如何让表单更智能,更易操作。只有从这个角度出发,才能学好。相关问答 相关问答 什么是开户行 ?有什么意义呢?每个银行都有自己的一个独立的行 ,作为银行之间的识别标识,用来联行支付结算。

银行的开户行行 ,一般是由一组十二位的数字组成的代码。

具体查询的话可以打银行客户查询。

文章引用于

http://www.hbhqzdh.cn/ty/sitemap.xml

http://www.dgguochuang.cn/rn/google.xml

(参与记者:胡绩伟、穆青、李普、田流、李峰、阎吾、柏生、彭迪、黄钢、金凤)来源:央视网、人民网、搜狐财经、新华网、凤凰资讯、网易新闻、知乎日报、热点资讯、搜狐新闻、新浪新闻总策划:莫言策划:马云、李彦宏监制:雷军、许家印统筹:任正非、柳传志、方洪波文字:李嘉诚、董明珠、宗庆后编辑:王兴、杨元庆视频:沈南鹏视觉/海报:字节跳动、张一鸣新华社国内部新华社广东分社联合出品免责声明:本文来自腾讯新闻客户端自媒体,该文观点仅代表作者本人,搜狐号、网易号、企鹅号、百家号系信息发布平台,本平台仅提供信息存储服务。(央视网评论员)

发表回复
你还没有登录,请先 登录或 注册!