魔方很难?用Excel就能轻松搞定

魔方这个看似很难的儿童益智玩具,在小编认为对IT来说应该是一个很简单的公式问题。因为一个excel就能轻松搞定。

魔方阵是一个非常有趣的数学问题,是指由自然数1~N2(次方)(N为奇数)构成的方阵,其各行、各列以及对角线元素之和均相等(如下图所示)。魔方阵的数学排列算法很复杂,若不懂得排列规律,很难排出魔方阵!本文不仅介绍了一种简单的排列方法,而且还巧用Excel中的单元格和宏代码的结合将其排列过程动态地呈显出来(速度由用户自己控制),呈现出来之后还可借助Excel中的求和函数对各行、各列进行求和验证。更不可思议的是宏代码只有25行,简练程度胜过任何编程工具!

一、算法简介

先将所有单元格清空,读取阶数N之后把1放入第一行的最中间一列,此后依次寻找2到N2(次方)这些数放入的位置,基本算法是:下一个数放在前一个数的上一行的下一列(第一行的上一行是最后一行,最后一列的下一列是第一列);如果此位置已被占用(单元格的内容非空),则将它放在前一个数的下面。

注:任一单元格(H行L列)的地址可表示为Chr(L+64) & H,其中Chr是取字符的函数。

二、用Excel实现的方法

1.界面设计

启动Excel,通过“视图”菜单打开“窗体”工具栏,在第一行添加一个按钮控件,并在弹出的对话框中单击“新建”按钮,进入宏代码编辑窗口。

2.录制宏在宏代码编辑窗口中输入以下代码:

3、运行

关闭宏代码窗口,

进入Excel后先单击任一单元格或按Esc键

以取消按钮的编辑状态;然后单击前面添加的按钮就可运行:在弹出的对话框中先输入要显示的魔方阵的阶数,然后输入显示整个魔方阵所用的时间;此后就可看到魔方阵中元素的动态排列过程。感兴趣的读者可借助Excel提供的函数进行求和验证。

4、说明

如果将宏代码及界面保存成Excel文件,下次打开时将提示:该文件中包含宏,宏可能会携带病毒

…等信息;自己编写的这段宏是安全的,选择“启用宏”即可。

本代码在Excel2000中运行通过。

最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 212,332评论 6 493
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 90,508评论 3 385
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 157,812评论 0 348
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 56,607评论 1 284
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 65,728评论 6 386
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 49,919评论 1 290
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 39,071评论 3 410
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 37,802评论 0 268
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 44,256评论 1 303
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 36,576评论 2 327
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 38,712评论 1 341
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 34,389评论 4 332
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 40,032评论 3 316
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 30,798评论 0 21
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 32,026评论 1 266
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 46,473评论 2 360
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 43,606评论 2 350

推荐阅读更多精彩内容

  • 也许你已经做了上千张表格,也许你用函数算了上千复杂的运算。也许认为excel不过如此,今天25招秘技希望可以帮到大...
    南屋阿米佛头阅读 3,709评论 0 51
  • 1.1 VBA是什么 直到90年代早期,使应用程序自动化还是充满挑战性的领域.对每个需要自动化的应用程序,人们不得...
    浮浮尘尘阅读 21,726评论 6 49
  • 一、误删资料恢复 一不小心删错了,还把回收站清空了,咋办啊?只要三步,你就能找回你删掉并清空回收站的东西。 步骤:...
    八爷君阅读 1,540评论 2 7
  • 别和我说你不会EXCEL,半小时让你成为EXCEL高手,据说,80%以上的人看了这个,都相见恨晚,你会么?如果我们...
    夏洛克的克阅读 8,435评论 4 268
  • 本例为设置密码窗口 (1) If Application.InputBox(“请输入密码:”) = 1234 Th...
    浮浮尘尘阅读 13,628评论 1 20