开户行号是什么，开户行号在哪里查询（EXCEL多表汇总每个公司的地址、纳税人识别号和开户行及账号）

关于【开户行号是什么】:开户行号是什么，今天向乾小编给您分享一下，如果对您有所帮助别忘了关注本站哦。

1、开户行号是什么

开户银行号是指办理开户手续的银行识别标志，即开户银行代码，每家银行都有自己独立的银行号。

开户银行号一般由12位数组成，通常由3位银行代码组成 4位城市代码 4位银行编号 1位校验位。

如果相关用户不知道银行卡的银行号，可以直接拨打相关银行的官方客服热线，然后转移人工服务咨询，查询银行卡开户银行的信息。

2、EXCEL多表汇总每个公司的地址、纳税人识别号和开户行及账号

早期卢子写过一篇文章，是用公式做的，现在学VBA了，就得尝试用VBA来解决函数的问题。

多表查找公司的地址、纳税人识别号和开户行及账号

明细表，格式一模一样，现在要将每个明细表的地址、纳税人识别号和开户行及账号提取到汇总表。

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

说到查找，很多人的第一反应就是VLOOKUP函数，其实查找家族人才济济。在汇总表的B2输入公式，下拉和右拉。

=INDIRECT($A2&"!"&ADDRESS(COLUMN(B1),4,4))

上面是公式的解决方法，来看VBA怎么解决的？

思路：

将金石这个表的D2:D4，选择性粘贴，转置到汇总的B2。同理，金土、金沙也是这样处理。

相当于录制一个转置的宏，加一个循环语句就搞定。分表的内容有合并单元格，录制出来会有问题，这里直接用汇总表这个没合并单元格的录制宏。

Step 01 录制一个选择性粘贴，转置的宏。

Step 02 查看刚刚录制的宏代码。

PasteSpecial就是选择性粘贴的意思。

Transpose:=True就是转置的意思。

中间那些可以暂时不用管，删除掉，这样代码看起来就整洁很多。

Range("D2:D4").Select

Selection.Copy

这2句的意思就是先选择单元格D2:D4，然后对选择的区域进行复制，可以简化成Range("D2:D4").Copy。

同理，对下面那2句也进行简化Range("B7").PasteSpecial Transpose:=True。

最后，嵌套循环语句，还有添加工作表名称，代码就完成了。

Sub 汇总()

Dim i As Integer

For i = 2 To Sheets.Count

Sheets(i).Range("D2:D4").Copy

Sheets(1).Range("B" & i).PasteSpecial Transpose:=True

End Sub

运行代码确认效果。

VBA学起来并没有想象中那么难，只要你跟对人。

就像这个读者所说的，跟错人，一开始学习那些乱七八糟的概念，不要说是你，即便是我看着都想睡觉。学VBA要从工作上经常接触到的表格学起，想着如何将表格变得更智能，更容易操作，要从这个观点出发才能学好。

本文关键词：开户行号是什么，社保卡的开户行号是什么，银行开户查询，建设银行的开户行号是什么，中国建设银行开户行号是什么。这就是关于《开户行号是什么，开户行号在哪里查询（EXCEL多表汇总每个公司的地址、纳税人识别号和开户行及账号）》的所有内容，希望对您能有所帮助！更多的知识请继续关注《赛仁金融》百科知识网站：http://yzsryq.com/！