计算出这个变量结果是不是很难？

AACC88 · 发表于 2013-1-15 02:24

本帖最后由 AACC88 于 2013-1-24 05:12 编辑

如附件有B、C、D三列，B列的符号对应D列数据的第3个字母，C列的符号对应D列数据的第4个字母。
如附件“自动列出变量的多个重复结果”中的第1页“公式”，B列的符号Ⅱ对应D列数据hewk的第3个字母w，C列的符号ㄢ对应D列数据的第4个字母k。同一符号在全部数据中的对应关系不变，即当符号Ⅱ在C列时，也是对应D列数据的第4个字母w。
当某一符号对应的字母变换成其他字母时，对所有数据的重复结果会产生影响和变化，如第1行B列的符号Ⅱ对应D列数据hewk的第3个字母w变成a，数据hewk就变成heak；1483行C列的符号Ⅱ对应的数据qnfw就会变成qnfa。
点击公式“运行”，出现符号◇时输入Ⅱ，出现字母b时输入Ⅱ对应的字母w，得到附件的26行数据，是Ⅱ对应的字母l变换成其他25个字母时全部数据产生的25种重复结果，其中w行的数据3259是没改变成其他字母的重复结果，也包括在内。同一数据重复一次时算重复2，重复两次时算重复3，比如abcd和abcd算重复2。
数据中共有几百个符号，在公式中可直接看出与字母的对应关系，在“对应表”中也可以查到对应关系。
我现在希望几百个符号的重复结果能全部自动列出，如“模拟结果”页的举例，每26个数据中的最小值能上色更好，如以上数据中的3239。只要能自动列出全部结果，布局与“模拟结果”页不完全相同也没关系。

AACC88 · 发表于 2013-1-15 07:34

本帖最后由 AACC88 于 2013-1-24 05:13 编辑

因上传时文件大小超过限制，对“自动列出变量的多个重复结果”中的第1页“公式”略有修改。
现把完整的数据传上来，需要的朋友可替换“公式”页的B、C、D三列。

lee1892 · 发表于 2013-1-18 01:15

输入，输出两部分我专门注释了。
原始数据在Sheet2（不是表单名，而是VBE里的对象名）的A1单元格开始。
输出到Sheet1（同上）。
另外，有问题F8看看，这段代码我测试过的。

统计数量=总数－只出现一次的数量
每个符号从a到z变一次，计算26个统计数量，找出最小的

代码逻辑是用原始统计数量作为基数，变化时只计算差额，这样不用每次都要从头到尾过一遍。

AACC88 · 发表于 2013-1-15 10:00

诚请高手帮忙。

AACC88 · 发表于 2013-1-18 02:54

本帖最后由 AACC88 于 2013-1-24 05:13 编辑

原始数据目前是从Sheet2的A1单元格开始，还是不能运行。
烦请帮忙看一下附件。

AACC88 · 发表于 2013-1-15 20:11

哪位能帮忙解决？

AACC88 · 发表于 2013-1-18 20:18

本帖最后由 AACC88 于 2013-1-18 20:19 编辑

非常感谢，已初步测试成功。生成的结果是在sheet 3。
我再换其他数据试一下。

AACC88 · 发表于 2013-1-17 21:14

本帖最后由 AACC88 于 2013-1-18 02:55 编辑

再测试一次。

AACC88 · 发表于 2013-1-16 09:03

等待再等待。

AACC88 · 发表于 2013-1-17 20:23

非常感谢。
我执行宏时出现“运行时错误13：类型不匹配”的信息，调试时高亮For i = 0 To UBound(aCodes)的字段。
能帮忙改一下吗？

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

[已解决] 计算出这个变量结果是不是很难？