查看: 2086|回复: 18
多表查询和标注，求大佬们帮帮忙。
阅读权限20
在线时间 小时
本帖最后由 thsyou 于
03:54 编辑
看了excelhome几个星期了，头有点晕。
到现在，明白了很多，但自己还是搞不来。高手跟低手的区别。哈。
我的这个问题，不知道用什么方法好？字典快点吗？
时间有限，比较急，所以要求助于坛子的大佬们。
具体内容看附件。
主要是数据量比较大，又因为这个excel文件每天的使用率很高，希望代码的运行效率尽量高点。
表03有几千到三、四万行。
而分表大约有两三百个，每个分表通常都有几千行到一万。
原来的excel文件有病毒，我杀了，下面这个是我重新上传的。
对不起，我太大意了。
(6.23 KB, 下载次数: 23)
03:54 上传
点击文件名下载附件
654321.jpg (111.84 KB, 下载次数: 0)
01:16 上传
备注：我写的分表的意思，是名称是9个数字的sheet，而前3个sheet的名称是01、02、03，不是分表。
------------------------------------------------
我要再详细表述一下：
一个工作簿book，里面的前面三个sheet是01、02、03。
sheet&01&是用来查询的，sheet&02&预留，sheet&03&是欠收月报，后面的都是名称都是9个数字的分表（明细表）。
Sub2：作用就是在“明细表”的J列（欠收1）的单元格标注。
& && && && &不用输入内容，只要双击表01的D5（橙色单元格），Sub就启动，表03的E列（内部号）会跟每张明细表的D列（内部号）匹配，如果内部号一样，就把明细表对应的内部号的那一行的J列（欠收1）的单元格的格式设置为底色是红色。
Sub3：在表01的D7（绿色单元格）输入“内部号”，按“回车”，定位到明细表对应的D列（内部号）的单元格。定位意思是把它变成“活动单元格”。
Sub4：跟Sub3差不多，不过不是定位，而是在表01的灰色地方引用明细表的内容。
阅读权限150
在线时间 小时
建议将日常发生的数据都保存在同一个工作表中，以便对数据的管理和使用。
关于管理数据的基本方法请参考：
★Excel数据管理的一般规律★& &
阅读权限20
在线时间 小时
本帖最后由 thsyou 于
00:05 编辑
超级版主，你好。
因为分表都是在公司的数据库导出的，内容超多，一个sheet不好处理。
而且每次都要处理一下新出来的分表，就又多了一层功夫。
阅读权限100
在线时间 小时
& & & & & & & &
捕获.JPG (20.15 KB, 下载次数: 0)
00:08 上传
阅读权限20
在线时间 小时
我用360查了一下。真的有病毒。杀了。我重新上传文件。
阅读权限100
在线时间 小时
通用的Sub：开机自动运行，要求是双击每个分表的任意单位格，就会回到表01的D7（绿色单位格）。---简单
Sub1：鼠标双击表01的D3（紫色单位格），清空每张分表的J列（欠收1）的“单位格格式”和“内容”。---简单
Sub2：鼠标双击表01的D5（橙色单位格），如果每张分表的D列（内部号）和表03的E列（内部号）的一样，就将分表该内部号对应的J列（欠收1）的单元格的格式设置为底色是红色。也就是多表标注。---复杂，如果你的数据超过5000行，不赞成使用字典，建立字典会很慢的。而且遍历几百个分表会慢得要死。只能使用纯粹的数组方法处理。如果不在意等几分钟的话，可以考虑使用字典。
Sub3：在表01的D7（绿色色单位格）输入“内部号”，按“回车”，定位到分表对应的D列（内部号）的单位格。--是不是要遍历所有的分表？
Sub4：在表01的D9（蓝色色单位格）输入“内部号”，按“回车”，在表01的灰色范围，返回分表相应的内部号的明细，灰色的部分和分表是一模一样的。灰色的地方总共有10行，要求每查询一次，就在灰色空行的返回明细，满10行了，如果再查询，就先清空10行内容，从第1行开始，这样就可以循环利用灰色的地方。--是不是也要遍历所有分表来查找内部号？
阅读权限100
在线时间 小时
你的几百个分表和01、02、03都在一个工作簿里面吗？不会这样吧
阅读权限20
在线时间 小时
Sub3：是要历遍除了01、02、03之外的所有表。
Sub4：是要历遍除了01、02、03之外的所有表。
阅读权限100
在线时间 小时
& & & & & & & &
本帖最后由 liucqa 于
00:24 编辑
thsyou 发表于
Sub3：是要历遍除了01、02、03之外的所有表。
Sub4：是要历遍除了01、02、03之外的所有表。
几百个分表，每个上万行，在一个工作簿里面，你的机器没趴窝吗？
阅读权限20
在线时间 小时
本帖最后由 thsyou 于
00:34 编辑
我现在有几十个分表在硬盘里。
原来我是打算自己慢慢看，慢慢弄的。
我的机器没有趴下，我都是一个excel文件放一个分表的。
我的想法是想将他们copy到一个excel文件。
如果要分开一个book一个book的，不打开文件历遍要用到ADO的，这个我不会。
可能我说的不清楚。
我说的分表，是一个工作薄book里面的一个工作表sheet，除了前面的三个sheet。
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师求大佬们帮忙帮忙【组装电脑吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：801,883贴子：
求大佬们帮忙帮忙收藏
大佬们你们好.我昨天新配置了一台电脑。配置如下图一。安装上了WIN7的系统一切都是正常的。但是因为小妹是做直播的。所以带有了独立的外置声卡。我的声卡是艾肯的mic-u型号。不知道为什么声卡的驱动怎么都装不上。甚至是插上USB的接口。电脑就如图2.直接是在声卡那个接口出现感叹号。然后驱动安装失败了就出现了图3.有没有大佬知道这是什么问题吗？是不是我的主板和CPU不兼容吗？有这个说法的吗？我的电源是长城500W的。应该不会是USB供电不足吧？求大佬帮忙解答。小妹急急急。
采购小家电满吸尘器,休食满券,666福袋免费发!苏宁企业购,正品低价,品质保障,一站式本地化采购服务平台,采购专线:
求求求大神拜托指点一下。我已经烦死了。
拜托了。拜托了。
七代酷睿的装。win-7会有。usb。的问题
楼主这套配的多少钱
我已装上了win8系统，没有办法之中的办法了。win8一切安好- -
主播在哪儿直播，我去捧场
要是CPU跟主板不搭配的话你电脑能点亮吗
系统除了装Win10还是Win10
组装电脑,苏宁易购,品牌网购商城,品牌专属网络销售,支持货到付款,省钱又放心!组装电脑,苏宁易购正品低价,支持货到付款!7天无理由退换货,100个城市半日达!
你在哪直播呢？我去看看
登录百度帐号推荐应用急求这张原图，大佬们帮帮忙，一定要原图_百度知道
急求这张原图，大佬们帮帮忙，一定要原图
我有更好的答案
把东西P掉不就好了
。。。完全不懂的说，不会p图。。。
萌娘契约 里面的 就是原图了
该怎么弄，有原图吗，发给我
这个是原图不是截图把，我去试试
为您推荐：
其他类似问题
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。求原图，大佬们帮帮忙_百度知道
求原图，大佬们帮帮忙
我有更好的答案
其他类似问题
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。求各位大佬们帮帮忙啊这咋整啊？【电脑故障吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：386,930贴子：
求各位大佬们帮帮忙啊这咋整啊？收藏
求各位大佬们帮帮忙啊这咋整啊？
采购小家电满吸尘器,休食满券,666福袋免费发!苏宁企业购,正品低价,品质保障,一站式本地化采购服务平台,采购专线:
什么意思啊
帮帮忙啊急
登录百度帐号推荐应用}