如何利用WORD文件制作硬笔字帖

更多资料访问：豆丁教育百科 一、利用 WORD 2003制作字帖的方法：(方法来自-Zerg的博客） 准备工作:找一段要临摹的文字,并安装相应的字体(我安装的是"方正硬笔楷书简体") 首先,将文字清理干净,比如去掉标点符号,空格,换行符,数字等非汉字符,原因不用多说吧.(可用查找替换完成) 第二步,在文字后面插入一个表格(我的是 20行 15列,另外,四个页边距都是 1厘米). 第三步,就是要把上边的文字逐个放入表格的单元格内,这是我们主要工作,也是个繁琐的工作,所以我们采用 VBA程序来完成.这里需要一点编程的简单知识,如果你对程序设计是门外汉,就照猫画虎吧: 单击 "工具->宏->Visual Basic 编辑器" 打开宏编辑器 右击左侧的"Project(文档名)",插入一个新模块,双击新插入的模块,在编辑器粘上下边的代码,然后保存 ============================================================================== Sub txt2tab() Dim n, i, j As Integer n = 1 For i = 1 To 20 For j = 1 To 15 ActiveDocument.Tables(1).Rows(i).Cells(j).Range.Text = ActiveDocument.Paragraphs(1).Range.Characters(n) 更多资料访问：豆丁教育百科 n = n + 1 Next Next MsgBox n End Sub =============================================================================== 注意程序中的20和15表示表格的行列数,请修改为你的表格的行列数.这样我们就建立了名为txt2tab的宏.宏可以这样运行: 单击"工具->宏->宏..." 打开"宏"对话框,选择新建立的宏,单击"运行" 远行完毕,不出意外的话,表格的每个单元格里都依次填充了上段的文字(注意文字数不应小于表格的单元格数),至此工作完成大半. 第四步,美化字帖.首先将表格所有行列的宽高度都指定为1.29厘米,令其为方形.然后自定义表格边框,包括对角线,最后点击确定之前一定要选择应用于"单元格".下面是我的设置参数供大家参考: 横线与竖线为1磅红色实线,对角线为1/4磅红色虚线. 更多资料访问：豆丁教育百科 以上利用WORD 2003制作字帖方法比较实用，又快捷。本人推荐！ ☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆ 二、利用WORD 2007制作字帖的方法：（来自微软WORD2007官网教程） 创建书法字帖 1. 单击“Office 按钮”，执行“新建”命令。 2. 在“新建文档”对话框中选择“书法字帖”。 更多资料访问：豆丁教育百科 3.单击“...