设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

123下一页
返回列表 发新帖
查看: 11058|回复: 21
打印 上一主题 下一主题

[VBA编程/宏] 令你目瞪口呆的Excel精品

[复制链接]
跳转到指定楼层
1#
发表于 2008-7-17 08:48:46 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
Excel精品荟萃
待有空时更换图片、链接,并放上打包文件
[原贴]:http://club.excelhome.net/dispbbs.asp?boardid=2&replyid=655699&id=202372&page=1&skin=0&Star=1

————————————————————————————
清风连连看  作者:清风_ll
[实用]:★★★★★     [界面]:★★★★★     [操作]:★★★★★     [创意]:★★★★★   
[原贴]:http://club.excelhome.net/dispbbs.asp?boardID=31&ID=181329&page=1&px=0



这是我见过的最完善,最好的VBA作品,除了与Excel关系不大(里面的程序代码无任何修改就可以导入Access中运行),我找不出它的任何缺陷。程序作的是令人叹为观止,其中的弹出窗体通用菜单模块非常实用,用VB进行封装也十分出色。各网友就算看不明白代码(包括我自己),光是玩游戏就值回票价:)
—————————————————————————————————————

清风版扫雷  作者:清风_ll
[实用]:★★★☆     [界面]:★★★★     [操作]:★★★★     [创意]:★★★☆   
[原贴]:
http://club.excelhome.net/dispbbs.asp?boardID=31&ID=170987&page=6&px=0




扫雷人人会做:),包括我自己和论坛中的网友也作过,但象清风大师这样追求完美的却不多,除了LucasLynn的扫雷堪与之比美。至于界面与操作的星星是打给清风大师还是给MS,大家看着办吧,因为程序与Windows的太像了。

—————————————————————————————————————

24点游戏  作者:stanleypan

[实用]:★★★☆     [界面]:★★★     [操作]:★★★     [创意]:★★★☆  
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=31&ID=65980&replyID=&skin=0



用加减乘除算24点,我也算是高手了,在竞赛区也放了个很简短的算法,但是在要命的时间棒催促下,又要算,又要点,真有点手忙脚乱... ...程序如果加上累计加分,自由输入题目求解功能就更完善了,不过这些你就自己完成吧,因为这个帖子dei程序都是完全开放代码的!


—————————————————————————————————————

超强五子棋(人机对战)  原作者:norlyfed
[实用]:★★★☆    [界面]:★★★     [操作]:★★★     [创意]:★★★★☆  
[原贴]:http://club.excelhome.net/dispbbs.asp?boardID=31&ID=65719&page=2&px=0
(我修改了一下界面,改成用鼠标操作的Form版)



原来电脑AI就是这么回事,在研究了一番电脑的“思维”后,我终于赢了它几把,棋艺也大有长进!
原程序是在Excel表中用键盘操作,我把它改成用鼠标操作的Form版,并全部加上注解(由于代码极其短小,几乎是注解比代码要多),而整个程序的核心就是人机对战的AI代码。


—————————————————————————————————————

中国象棋(单机版) 作者:彭希仁
[实用]:★★☆    [界面]:★★☆     [操作]:★★★     [创意]:★★★
[原贴]:http://club.excelhome.net/dispbbs.asp?boardID=31&ID=203539&page=1&px=0
(我更新了一下界面,里面的代码也相应优化了一下)



这个程序虽然代码有待优化,AI算法有待提高,界面功能有待完善,但毕竟电脑可以跟人“下棋”了,彭希仁也在不断升级版本,真希望能用Excel搞个中国的“深蓝”出来。。。。。。
现在中国象棋已经完成多次升级,AI已明显提高,请到原贴下载最新程序。

  
—————————————————————————————————————

美式9球台球  原作者:Gareth Lombard
[实用]:★★★☆    [界面]:★★★★★     [操作]:★★★★     [创意]:★★★★☆  
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=2&ID=46023&replyID=&skin=0
(vba密码HAMLETL小写)



感谢hamletl 的分享。刚运行这个程序的感觉只能用震撼来表达:这么流畅好玩的游戏真的是用VBA作的?刚打开源代码的时候只能用怀疑两字:真的只有这几行代码?最后只能说两个字:真牛!

  
—————————————————————————————————————
[分享]“数独”游戏  作者:qee用
[实用]:★★★☆    [界面]:★★★     [操作]:★★★     [创意]:★★★★☆  
[原贴]:
http://club.excelhome.net/dispbbs.asp?BoardID=101&ID=151915&replyID=&skin=0



9个数字就让你绞尽脑汁,“数独”真是魅力无穷!qee用那简洁的算法同样是令人拍案叫绝,源程序利用Excel的单元格,我把它改为窗体版,有空再把它改为纯鼠标操作并加上难度控制。  

—————————————————————————————————————
消彩球游戏  作者:不详
[实用]:★★☆    [界面]:★★★★     [操作]:★★★★     [创意]:★★★☆  
[原贴]:
http://club.excelhome.net/dispbbs.asp?BoardID=2&ID=118957&replyID=&skin=0



这是FeiHong共享的压箱底的东东,用来消遣挺不错的。。。
  程序及代码也非常规范,自己也想编一下小游戏的话,拿来作为参考非常不错。
  
—————————————————————————————————————

雷电—太空射击游戏 作者:不详
[实用]:★★☆    [界面]:★★★★☆     [操作]:★★★★     [创意:★★★ ☆
[原贴]:http://club.excelhome.net/dispbbs.asp?boardID=2&ID=203382&page=2&px=0



是的,这就是小男孩最喜欢玩的打飞机
游戏,操纵非常的流畅。

—————————————————————————————————————
日本 Excel 愛好者寫的 遊戲 作者:不详
[实用]:★★★     [界面]:★★★★★     [操作]:★★★★     [创意]:★★★★   
[原贴]:http://club.excelhome.net/dispbbs.asp?boardid=4&replyid=260419&id=39559&page=1&skin=0&Star=1




这是Emily分享的巨多的Excel小游戏,上面的是我最喜欢的一个,在37F。。。

—————————————————————————————————————

[原创]超酷VBA工程加锁解锁器[ldhyob简版]  作者:ldhyob
[实用]:★★★★★     [界面]:★★★★☆     [操作]:★★★★     [创意]:★★★★☆   
[原贴]:
[原贴]:http://club.excelhome.net/dispbbs.asp?Boardid=2&ID=28166&replyID=82240&skin=1




一直以来,都是用WinHex、UltraEdit-32等这样的字节编辑器来实现VBA FOR EXCEL的加锁与解锁,即达到VBA“工程不可查看”与正常查看被锁工程的目的(具体方法想必大家也都熟悉了吧),不过手工操作毕竟是手工操作,嫌麻烦,终于费了点时间写了段VBA来应付此类事情。

—————————————————————————————————————

仿专业软件的管理系统界面  作者:hzq56
[实用]:★★★     [界面]:★★★★     [操作]:★★★     [创意]:★★★★   
[原贴]:http://club.excelhome.net/dispbbs.asp?boardid=2&id=168187




界面不错,就是功能尚未完成,再加上数据的管理就可以了。

—————————————————————————————————————

通用日历拾取类 作者:ldhyob
[实用]:★★★★★     [界面]:★★★☆     [操作]:★★★     [创意]:★★★★   
[原贴]:http://club.excelhome.net/dispbbs.asp?boardid=2&id=115988
(VBA查看口令为ldhyob)



本例提供了自行编制的完整的日历拾取类(无须控件,公开源码),效果可与微软的DTPicker媲美,呵呵 拿出来分享希望对大家对所帮助。我们只需很简单的操作就可以很快运用到自己的程序中去,完全公开源码,大家可以自行将日历窗体功能修改扩展,如可增加阴历显示等等。

—————————————————————————————————————

公司电话通讯程式 作者:andysky
[实用]:★★★★     [界面]:★★★★     [操作]:★★★★     [创意]:★★★★   
[原贴]:http://club.excelhome.net/dispbbs.asp?boardid=1&replyid=617705&id=204080&page=1&skin=0&Star=1



我的通讯录
本程式除了通讯外还有其它功能
这是用Excel开发的一个完整的应用系统,有自己独有菜单、精美的操作界面、支持模糊查询、可以随意增减通讯地址

—————————————————————————————————————

VBA窗体动态换肤实例  作者:ldhyob
[实用]:★★★★☆     [界面]:★★★★★     [操作]:★★★★     [创意]:★★★★★   
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=2&ID=114527&replyID=&skin=0
(重要提示:附件中DLL与Skins子目录须与XLS一并解压)



该实例演示了四套皮肤的动态切换,支持用户自定义按钮布局和数量。
整容未必是女人的专利,窗体也同样做得到。。。如果能有一个自定义的设计或设置界面,那可真是功德圆满了!

—————————————————————————————————————

用EXCEL来奏乐!!! ---API练习  作者:风雨声
[实用]:★★★☆     [界面]:★★☆     [操作]:★★★     [创意]:★★★★   
[原贴]:
http://club.excelhome.net/dispbbs.asp?BoardID=2&ID=104791&replyID=&skin=0




该实例演示了用API函数播放PC喇叭的功能,即Beep函数。扩充一下,有相当多的机子(上班的时候)没有音箱,这时候就能派上用场了。界面如果能用键盘演奏,或者是模拟琴键用鼠标演奏就更加完美了。

—————————————————————————————————————

用主板喇叭发声的作曲程序  作者:xiaog
[实用]:★★★☆     [界面]:★★☆     [操作]:★★★     [创意]:★★★★   
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=2&ID=13796





谁说我无喇叭不能听音乐,用手机输入音乐的方法,通过Excel编程,让自己的PC喇叭发出音乐。

—————————————————————————————————————
把EXCEL脱个净光  作者:xiaog

[实用]:★★★☆     [界面]:★★☆     [操作]:★★★     [创意]:★★★★   
[原贴]:http://club.excelhome.net/dispbbs.asp?boardid=2&replyid=355304&id=28848


把EXCEL脱个净光,就是去掉EXCEL的所有菜单栏、工具栏、状态栏、工作表栏,就象VB里的 MSFLEX 控件。
3D 文字秀  作者:[url=]FeiHong[/url]
[实用]:★★★☆     [界面]:★★★★     [操作]:★★★☆     [创意]:★★★★☆   
[原贴]:
http://club.excelhome.net/dispbbs.asp?boardid=2&replyid=459141&id=177896



很酷的一个程序,并且可以操作控制Sheet中的对象,功能也很实用。非常值得。。。“呵呵,看看吧”
—————————————————————————————————————

DIY我的农历桌面  作者:[url=]FeiHong[/url]
[实用]:★★★☆     [界面]:★★★★     [操作]:★★★☆     [创意]:★★★★☆   
[原贴]:
http://club.excelhome.net/dispbbs.asp?Boardid=2&ID=122953




酷酷的一个程序,并且可以操作控制DeskTop中的对象,功能也很实用。非常值得。。。“呵呵呵,看看看吧”


—————————————————————————————————————

渐显及热感应下拉窗体   作者:andysky
[实用]:★★★☆     [界面]:★★★★     [操作]:★★★☆     [创意]:★★★☆   
[原贴]:
http://club.excelhome.net/dispbbs.asp?boardid=2&id=170689






范例显示了不少的窗体特效及动态效果,如窗体的慢慢出现慢慢退出(半透明窗体),热感应下拉(悬浮窗体),图片文本的滚动显示等,若想让你的程序也给人留下深刻印象,不可不看...

—————————————————————————————————————

纯API生成日历选择窗体  作者:stanleypan
[实用]:★★★☆     [界面]:★★★     [操作]:★★★     [创意]:★★★  
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=31&ID=117472&replyID=102249&skin=0



既不是Excel窗体,也不是UserForm用户窗体,日历窗体从哪里来的呢?竟然是用语句一句一句写出来的,当然用的是Api函数...

—————————————————————————————————————

VBA类:隐者的秘密  作者:qee用
[实用]:★★★★☆     [界面]:★★★     [操作]:★★★     [创意]:★★★  
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=2&ID=198049&replyID=&skin=0



看了以上几个实例,你一定感叹VBA的神奇,既想学又不知如何入手,那就让qee用大师手把手教你几招吧... ...

—————————————————————————————————————


VBA for EXCEL 也玩怪异窗口  作者:ldhyob
[实用]:★★★☆     [界面]:★★★★★     [操作]:★★★     [创意]:★★★★   
[原贴]:http://club.excelhome.net/dispbbs.asp?boardID=2&ID=15562&page=3&px=0
(VBA口令为ldhyob)




VBA也来玩玩怪异窗体,实现实现给窗体换肤的乐趣,把窗体变成自已设计的个性化播放器界面、卡通人物、美丽风景.....等等

—————————————————————————————————————

清风图片浏览器  作者:清风_ll
[实用]:★★★☆    [界面]:★★★★★     [操作]:★★★★★     [创意]:★★★★☆  
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=2&ID=93275&replyID=&skin=0



清新的界面,清爽的操作,清晰的代码,一贯的清风风格。这个程序用了好几个Excel的特性,在Access中无相应语句,如文件对话框,Ontime语句。

—————————————————————————————————————

COMMANDBAR上添加用户窗体 作者:button
[实用]:★★★★☆    [界面]:★★★☆     [操作]:★★★     [创意]:★★★★★  
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=2&ID=31707&replyID=&skin=0



实现一种在COMMANDBAR上添加USERFORM窗体及控件的方法;在窗体上,你就可以为所欲为,添加你所要的功能。示范程序用treeview实现了对当前所有打开的工作薄及工作表的浏览器,切换工作表就是那么简单,你还可以进一步完善。

—————————————————————————————————————

EXCEL资产管理软件 作者:biili
[实用]:★★★★☆    [界面]:★★★★★     [操作]:★★★★★     [创意]:★★★★★  
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=31&ID=34248




这个程序把VBA发挥到了极致,作品的实用及界面操作均属一流。
但作者並不覺得這有什麼炫耀的,VBA衹覺得是不宜深究的東西,當初之所以用EXCEL寫這個東東,衹不過是公司的電腦上應用軟件衹有OFFICE而已(汗!),要做好的程式不應采用VBA,那必竟衹是腳本語言,局限大多。


—————————————————————————————————————

宝宝爱识字   作者:jssy
[实用]:★★★★☆    [界面]:★★★★     [操作]:★★★☆     [创意]:★★★★  
[原贴]:http://club.excelhome.net/dispbbs.asp?BoardID=31&ID=178740&replyID=&skin=0




作者为女儿做的识字软件,与大家分享,可怜天下父母心呀。若加上拼音及自动播放功能就效果更佳了。


—————————————————————————————————————

玻璃窗体——VBA模拟Vista玻璃效果 作者:biili
[实用]:★★★★☆    [界面]:★★★★★     [操作]:★★★☆     [创意]:★★★★  
[原贴]:http://club.excelhome.net/dispbbs.asp?boardid=2&id=212225



微软耗时5年的操作系统Vista一推出,立刻让人眼前一亮。尤其是其3d窗口切换及玻璃窗体效果让人爱不释手。可惜俺人穷机老-用不了,今儿咱用Excel-VBA也来模拟一把。

—————————————————————————————————————

万年历(Deluxe)   作者:Rowen  
[实用]:★★★★☆    [界面]:★★★★★     [操作]:★★★☆     [创意]:★★★★★
[原贴]:http://club.excelhome.net/dispbbs.asp?boardID=31&ID=81926&page=1&px=0




这是一个非常棒的万年历,使用它事一种享受

—————————————————————————————————————

Andysky的超级工具   作者:andysky
[实用]:★★★★★★★★★★   
[原贴]:
http://club.excelhome.net/dispbbs.asp?boardID=1&ID=210147&page=3&px=0



正如44楼的luo159所说:以上几贴实用性为4星或者5星,那么此贴实用性可为10星了
包括了利用鼠标右键、附加菜单调用的众多的实用工具,如果你能把你日常工作中常用的操作或应用组合进去,你就拥有了一个属于你“自己的”Excel了。

—————————————————————————————————————

五连珠游戏   作者:winland
[实用]:★★★☆     [界面]:★★★★     [操作]:★★★★     [创意]:★★★★   
[原贴]:
http://club.excelhome.net/dispbbs.asp?BoardID=2&ID=218494




玩法很简单, 尽量把相同颜色的球连成五个或以上消掉它, 否则会再增加三个球. 满了就结束.
这个游戏有排名,统计,是否提示.  有两种球可以选择(水晶球和原色).
这个游戏的窗体处理参考了清风_ll的扫雷游戏.

—————————————————————————————————————

EXCEL动画做法   作者:andysky
[实用]:★★★☆     [界面]:★★★★     [操作]:★★★☆     [创意]:★★★★   
[原贴]:
http://club.excelhome.net/dispbbs.asp?boardid=1&id=216778




程序中使用动画的方法,我想到的是插入Gif、Swf等动画图片、循环定时显示不同图片... ...制作的方法?
看看代码就明白了,工作表密码1

—————————————————————————————————————
(待续)

评分

参与人数 1经验 +10 收起 理由
tanhong + 10 我很赞同

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏3 分享分享 分享淘帖 订阅订阅
2#
发表于 2008-7-17 09:16:39 | 只看该作者
[:34] 都是精品
3#
发表于 2008-7-17 09:45:27 | 只看该作者
[:50] [:50] [:50] [:50]
4#
发表于 2008-7-17 09:56:50 | 只看该作者
下载链接过去好象无效,都返回到了首页.
5#
 楼主| 发表于 2008-7-17 10:03:23 | 只看该作者
原帖由 liwen 于 2008-7-17 09:56 发表
下载链接过去好象无效,都返回到了首页.

我是直接把在Excel-home发的帖子复制过来,下一步再更新全部图片,和放上打包好的全部例程。
6#
发表于 2008-7-17 13:34:07 | 只看该作者
太值得收藏了
7#
发表于 2008-7-21 15:33:10 | 只看该作者
太好了,多谢楼主分享
8#
发表于 2008-7-21 18:05:07 | 只看该作者
多谢分享
9#
发表于 2008-9-1 15:34:28 | 只看该作者
金钱不够,怎么办
10#
发表于 2008-9-1 21:57:25 | 只看该作者
都是EXCEL home大家的作品,的确都是精品,值得收藏。谢谢Trynew兄收集整理。[:50]
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-25 06:48 , Processed in 0.108608 second(s), 37 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表