运算比较繁琐，数据量大，虔诚请教

￡Ulikeme · 发表于 2015-1-1 21:07

本帖最后由￡Ulikeme 于 2015-1-1 21:25 编辑

由于受到附件上传不能大于2M的限制，所以，香川群子老师做的作品只进行了第一列的运算，
后续运算需要麻烦老师亲自计算。
计算的过程详见附件内说明文档，模板以及核心函数见附件。如有问题烦请及时回帖，我定当详细说明。
感谢帮助的各位老师，感谢香川群子老师以及KCFONG版的前期帮助。

虔诚请教.rar (1.68 MB, 下载次数: 21)

补充内容 (2015-1-14 15:06):
最后一部分的排序筛选详细介绍在第25楼
http://club.excelhome.net/forum. ... 699&pid=8043700

￡Ulikeme · 发表于 2015-1-3 21:29

本帖最后由￡Ulikeme 于 2015-1-5 16:14 编辑

期待老师能够帮忙解决，不懂VBA，期盼

￡Ulikeme · 发表于 2015-1-5 18:49

本帖最后由￡Ulikeme 于 2015-1-7 12:31 编辑

比较出F列中的数据比A6单元格中“超越20个数”的数值大的个数，返回到单元格C6。其中的“20”这个数值是可以调整的，可能是“16、17、18………”
这句话目的就是提取出“超越个数”这中间的数字，比较的是F列中数据比这个数字大的个数。

￡Ulikeme · 发表于 2015-1-6 08:42

哪位老师能够抽空帮助解决呢，翘首以盼，我的救世主

香川群子 · 发表于 2015-1-6 17:19

行列转换问题不大

￡Ulikeme · 发表于 2015-1-6 18:24

香川群子发表于 2015-1-6 17:19
行列转换问题不大

打开论坛看到香川老师的回复，很是激动与感激，感谢老师的帮助，虽然暂且完成了行列的交换，但已很感动。
最近想了想，确实该抽些时间学习VBA，总是求助老师也不是个问题，可能短期内水平有限，但我相信只要肯花时间花心思，VBA熟练运用将不成问题。
不是有那么句俗语吗，给予总比接受好！
To give is better than to receive！
期待老师的下一步编程(我贪心了)，也祝愿我能学好VBA，帮助别人。遗人玫瑰，手有余香。

￡Ulikeme · 发表于 2015-1-7 11:33

比较出F列中的数据比A6单元格中“超越20个数”的数值大的个数，返回到单元格C6。其中的“20”这个数值是可以调整的，可能是“16、17、18………”
这句话目的就是提取出“超越个数”这中间的数字，比较的是F列中数据比这个数字大的个数。

Vicel · 发表于 2015-1-7 16:29

本帖最后由 Vicel 于 2015-1-7 17:17 编辑

￡Ulikeme 发表于 2015-1-6 18:24
打开论坛看到香川老师的回复，很是激动与感激，感谢老师的帮助，虽然暂且完成了行列的交换，但已很感动。 ...

借助香川大师前期的代码，现在算是完成楼主的题目了吧。请楼主测试

五码分析.rar (124.17 KB, 下载次数: 18)

￡Ulikeme · 发表于 2015-1-7 19:49

本帖最后由￡Ulikeme 于 2015-1-7 19:54 编辑

Vicel 发表于 2015-1-7 16:29
借助香川大师前期的代码，现在算是完成楼主的题目了吧。请楼主测试

谢谢您的解答，仍存在以下问题
1、区域G9以下单元格中假设输入数据，当点击“计算所有”按钮的时候，会清除这部分数据。而香川老师的作品是不清除，我也希望不清除该区域数据。
2、先点击“计算所有”则计算完所有数据，然后清除序号第200列的计算结果，再点击“计算最后一列”按钮，发现不能运行。也可以这样讲，计算完200列后，在201列GZ8单元格中输入一个五位数，再点击“最后一列”按钮，发现不能运行。希望的解决是能够计算最后一列。
3、尽量去掉Sheet3工作表的添加。

香川群子 · 发表于 2015-1-7 21:02

本帖最后由香川群子于 2015-1-7 22:13 编辑

计算部分的代码修改了一下，可以任意指定计算倒数n列。

方法是：在D3单元格中写入需要倒数计算的列数。如果留空或输入=0则计算全部列。

另加了一个清空输出区域按钮。如果重新计算，最好清空以后再来。

Calc5 ver5.rar (124.98 KB, 下载次数: 20)

		自动登录	找回密码
密码			免费注册

[求助] 运算比较繁琐，数据量大，虔诚请教

评分

评分

评分