ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 20987|回复: 35

[原创] 利用Word制作书法字帖

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2011-6-19 16:30 | 显示全部楼层 |阅读模式
Word 2007中文版有书法字帖的插件,但是该插件只能设置有限的几种字帖方格大小,而且也只能插入几种字体。虽然该插件的密码已经破解,但是,终究很不灵活。

这段时间恰好在辅导女儿写字,于是一时兴起,制作了本工具。利用该工具,用户可以非常方便地制作自定义格式的书法字帖。制作过程中,得到好友守柔版主提示,特此致谢。
Calligraphy1.jpg
Calligraphy2.jpg

Calligraphy.zip

73.73 KB, 下载次数: 963

评分

2

查看全部评分

TA的精华主题

TA的得分主题

发表于 2011-6-20 06:00 | 显示全部楼层
原帖由 hxhgxy 于 2011-6-19 16:30 发表
Word 2007中文版有书法字帖的插件,但是该插件只能设置有限的几种字帖方格大小,而且也只能插入几种字体。虽然该插件的密码已经破解,但是,终究很不灵活。

这段时间恰好在辅导女儿写字,于是一时兴起,制作了本工 ...

感谢虎兄的大作,非常大气,对话框的设计也是非常中看。

试用了一下,有几个疑问,可能由于时间关系,并未揣磨到虎兄的思路。
A:frmCalligraphy窗体从何处调用?docm格式的文档,要么在doc的基础上,以原来的菜单形式调用该窗体,要么使用customUI.xlm定义Ribbon。一时没找到。
B:对于已设置了的字贴,如果需要调整方格大小时,发现只是删除了方格线条,并未重建?
C:书法是中国的文化艺术(不一定妥当,一时找不到词),是不是把所有西文开头的字体屏蔽了?(Like [A-z,@*])
D:OK,Cancel也改成中文吧,虽然按钮高度为高一些,但风格上可以一致。
D:貌似基本页眉中的自选图形(线条)的删除,可以简化一下。
Sub DeleteAllAhapes2()
    ThisDocument.Sections(1).Headers(wdHeaderFooterPrimary).Range.ShapeRange.Delete
End Sub
E:在我的电脑中,绘制(方格,直线)时,有逐步绘制的感觉,查看了一下源码,ScreenUpdating是关闭的。如果您在实测中也是如此时,可以考虑绘制过程中,先不设置线条颜色,最后一次性设置其颜色(可以是所有直线图形同时设置)。
以上只是我的私见,虎兄有空给看看。

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-6-20 14:28 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
今天刚到新加坡就上来看看,还是守柔兄给面子:)
我偷懒没有完全制作成加载宏,你所说的这些都客观存在。我过几天回去还改改,不行再向你请教!

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-6-27 12:49 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
完善的版本。

Tiger Calligraphy.zip

66.54 KB, 下载次数: 734

TA的精华主题

TA的得分主题

发表于 2011-7-29 11:03 | 显示全部楼层
正在为这个烦恼,谢谢了。

PS:说的word里制作字帖插件的密码是多少啊?

TA的精华主题

TA的得分主题

发表于 2011-7-29 11:22 | 显示全部楼层
试用了下感觉不错,有个小小的建议。默认方格布局为12×16,因为是给小朋友练习用的,所以想把一页中的方格数目改少,例如改成方格布局6×8,结果整个字帖缩小到中间,但方格大小没有改变,还是默认的1.5。如果能像WORD2010插件中,利用下拉菜单选择方格布局,并最终布满整个A4纸就更好了。

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-7-29 13:00 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
方格大小不是可以设置的吗,默认是1.5CM,你可以设置3CM甚至更大啊。

TA的精华主题

TA的得分主题

发表于 2011-7-29 15:06 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
高手,羡慕中。

TA的精华主题

TA的得分主题

发表于 2011-7-29 22:50 | 显示全部楼层
谢谢虎版!
不知有没有2003的模板?

TA的精华主题

TA的得分主题

发表于 2011-10-14 08:05 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-12-27 20:12 , Processed in 0.049491 second(s), 12 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

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