Excel四川麻将题

香川群子 · 发表于 2012-10-14 15:09

本帖最后由香川群子于 2012-10-14 15:14 编辑

四川麻将胡牌.rar (17.36 KB, 下载次数: 30)

好了，满足四川麻将缺门要求的代码改好了。

YYKK22222 · 发表于 2012-10-15 08:07

老师们太厉害了，这个题也能做，真的很难想象。不过我麻将不会打。

titi012 · 发表于 2012-10-15 12:27

本帖最后由 titi012 于 2012-10-15 13:29 编辑

香川群子发表于 2012-10-13 23:34
函数应该是难以胜任的……近似无解。

这是用函数做的.
公式很烂,请老师帮忙看看是否正确.

香川群子 · 发表于 2012-10-15 20:43

本帖最后由香川群子于 2012-10-15 20:45 编辑

titi012 发表于 2012-10-15 12:27
这是用函数做的.
公式很烂,请老师帮忙看看是否正确.

巨大的工程量哦……

目前也不能出7对吧。

titi012 · 发表于 2012-10-15 20:57

香川群子发表于 2012-10-15 20:43
巨大的工程量哦……

目前也不能出7对吧。

没有设置七对的出现,太麻烦了.
我有想过此点,照理应该是可以的,在第三个牌起加入,只是....真的麻烦,所以没做.

titi012 · 发表于 2012-10-15 22:31

香川群子发表于 2012-10-15 20:43
巨大的工程量哦……

目前也不能出7对吧。

群子老师,可否请你帮忙做用VBA写一个代码.先谢谢了!
详细如附件所示.
我原来用公式做的,数据太多,运行很慢,所以想改VBA. 我不懂VBA,就上论坛来了,前几天发了贴子,如石沉大海.....
不知能否帮忙,谢谢了!

sunyy0801 · 发表于 2012-10-15 23:02

这都可以呀

香川群子 · 发表于 2012-10-16 10:00

titi012 发表于 2012-10-15 20:57
没有设置七对的出现,太麻烦了.
我有想过此点,照理应该是可以的,在第三个牌起加入,只是....真的麻烦,所以 ...

你的函数方法，和我的VBA基本思路是一样的……直接做牌。

但是，如果真的要模拟实际牌局的话，有几个问题要注意到：
1. 必须模拟四人依次摸牌
2. 摸过的牌要扔掉，不再使用

……这样，凑成3个一组的概率将大大降低。

云朵中的民族 · 发表于 2012-10-16 11:01

小楼筝月发表于 2012-10-13 16:55
哈哈~~ 我经常玩QQ欢乐麻将....... 花朵,啥时候可以凑一桌玩玩~~

云朵中的民族，咋给我改成花朵了，哈哈

香川群子 · 发表于 2012-10-16 14:55

titi012 发表于 2012-10-15 22:31
群子老师,可否请你帮忙做用VBA写一个代码.先谢谢了!
详细如附件所示.
我原来用公式做的,数据太多,运行 ...

这个应该可以做……不过这两天比较忙。

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

[求助] Excel四川麻将题