论文部分内容阅读
作为一个爱写博的人，不知不觉博客上的文章已有近百篇。最近想把博客上的文章保存到电脑上，做成电子书，这样即使将来博客关闭了，文章也少不了。可近百篇博文，分别一一保存很繁琐，况且有些博文中还有图片，保存后排版成电子书，就更加费时费力。经过一番研究，笔者借助一个网站和Word 2010，用20分钟就将近百篇博文做成了PDF电子书。本文就和大家分享这本电子书的诞生过程。
第一步：借助“超印速” 批量整合博文
制作电子书，必须将博客上的文章全部下载保存，这里借助“超印速”网站（http://www.mrprint.cn），该站提供的“博客书”功能，可以批量读取博客上的文章，并可按自定义顺序排列文章。
①登录“超印速”，注册账户并登录，切换到“博客书”选项，单击“马上开始”按钮，选择自己的博客，并在下方粘贴博客网址，单击“下一步”按钮会开始获取博客上的博文。
②单击“下一步”按钮显示博文目录，再次单击“下一步”按钮，可显示博文的字数以及图片的张数，单击“上移”或“下移”按钮可调整文章的顺序，这也是文章在电子书中的顺序。
③单击“下一步”按钮输入书籍名称、副标题和作者名等，并选择书籍封面和内页版式，这里要特别注意内页版式，它决定着电子书的内容页排版格式。单击“下一步”按钮，输入递送地址等信息完成订单，此时会切换到“订单确认页面”，单击“下载博客书样例”按钮，下载包含博文的Word的文档。
小提示：
如果想把博文印刷成真正的纸质书，只需要根据提示付款，超印速网站会帮你印刷并装订，最后寄送给你。
第二步：使用Word 2010重排书籍
用“超印速”生成的博文书籍，还有一些不完善之处。
首先是博文中的图片是链接自博客，并没有内嵌到Word文档中，必须将链接图片转换成内嵌图片；其次是图片尺寸偏大，书籍（Word文档）中的图片不能完整显示。
这些可以在Word 2010中通过VBA来批量调整，下面具体谈谈操作步骤。
①按Alt+F11打开VBA窗口，右击ThisDocument选择“插入→模块”出现对话框，输入VBA代码。
小提示：
文中的代码，需要的朋友可以到http://lnk.ly/nbq下载。
②然后按【F5】键运行代码，VBA代码如下：
Sub 链接图片转内嵌图片()
Dim pic As Field
For Each pic In ActiveDocument.Fields
pic.Unlink
Next
End Sub
③再次右击ThisDocument选择“插入→模块”出现对话框，输入VBA代码，然后按【F5】键运行代码，这样即可将书籍中的所有外链图片调整为原尺寸的80%，如果还比较大，可将0.8修改为0.6，这样就是原尺寸的60%。
VBA代码如下：
Sub 调整图片尺寸()
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = iShape.Height * 0.8
iShape.Width = iShape.Width * 0.8
Next iShape
End Sub
④按【Ctrl+S】保存书籍Word文档，然后选择菜单“文件→保存并发送”，选择“创建PDF/XPS文档”选项，再单击“创建PDF/XPS”按钮，将博文书籍保存为PDF电子书，这样所有博文就被做成了一本电子书。
第一步：借助“超印速” 批量整合博文
制作电子书，必须将博客上的文章全部下载保存，这里借助“超印速”网站（http://www.mrprint.cn），该站提供的“博客书”功能，可以批量读取博客上的文章，并可按自定义顺序排列文章。
①登录“超印速”，注册账户并登录，切换到“博客书”选项，单击“马上开始”按钮，选择自己的博客，并在下方粘贴博客网址，单击“下一步”按钮会开始获取博客上的博文。
②单击“下一步”按钮显示博文目录，再次单击“下一步”按钮，可显示博文的字数以及图片的张数，单击“上移”或“下移”按钮可调整文章的顺序，这也是文章在电子书中的顺序。
③单击“下一步”按钮输入书籍名称、副标题和作者名等，并选择书籍封面和内页版式，这里要特别注意内页版式，它决定着电子书的内容页排版格式。单击“下一步”按钮，输入递送地址等信息完成订单，此时会切换到“订单确认页面”，单击“下载博客书样例”按钮，下载包含博文的Word的文档。
小提示：
如果想把博文印刷成真正的纸质书，只需要根据提示付款，超印速网站会帮你印刷并装订，最后寄送给你。
第二步：使用Word 2010重排书籍
用“超印速”生成的博文书籍，还有一些不完善之处。
首先是博文中的图片是链接自博客，并没有内嵌到Word文档中，必须将链接图片转换成内嵌图片；其次是图片尺寸偏大，书籍（Word文档）中的图片不能完整显示。
这些可以在Word 2010中通过VBA来批量调整，下面具体谈谈操作步骤。
①按Alt+F11打开VBA窗口，右击ThisDocument选择“插入→模块”出现对话框，输入VBA代码。
小提示：
文中的代码，需要的朋友可以到http://lnk.ly/nbq下载。
②然后按【F5】键运行代码，VBA代码如下：
Sub 链接图片转内嵌图片()
Dim pic As Field
For Each pic In ActiveDocument.Fields
pic.Unlink
Next
End Sub
③再次右击ThisDocument选择“插入→模块”出现对话框，输入VBA代码，然后按【F5】键运行代码，这样即可将书籍中的所有外链图片调整为原尺寸的80%，如果还比较大，可将0.8修改为0.6，这样就是原尺寸的60%。
VBA代码如下：
Sub 调整图片尺寸()
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = iShape.Height * 0.8
iShape.Width = iShape.Width * 0.8
Next iShape
End Sub
④按【Ctrl+S】保存书籍Word文档，然后选择菜单“文件→保存并发送”，选择“创建PDF/XPS文档”选项，再单击“创建PDF/XPS”按钮，将博文书籍保存为PDF电子书，这样所有博文就被做成了一本电子书。