教你再各版本CorelDraw中插入页码

CorelDRAW本身不带直接插入页码功能，这不能不说是一大遗憾。要实现这一功能，以前基本上都是手动去完成：几张几十张还好搞定，几百张甚至上千张排书的时候就比较困难。

　　 CorelDRAW 11以后的版本在“工具－VB执行”项里有直接的“页码插入插件”，不过功能比较单一，只允许设计文字的一些基本属性，对于想在页码上做点花样文章，还是要手动CtrL+C、CbrL+V。习惯了也快，可以用条码自动插入跟手工相结合，相信Coreldraw操作熟练了，几百页也不是什么难事。

　　具体操作步骤：

　　先排完版后，再执行这个VBa宏即可。

　　选择，“工具/Visual Basic/执行宏”

　　下拉选单“Macros in”选“All Standard Projects”

　　上面“Macros Name”选“Corel macros,PageNumbering”

　　接着按“执行 ”

　　接下来的窗口就依你需要而自行设定

　　"#"表示该页页码

　　"*"表示总页数

　　如果你输入all *;this#

　　页码即显示all8;this1，(假设文件有8页，在第1页之页码)

　　注意：版面好像只能设定在 a4 ，其它尺寸好像要自己设定位置！！

　　“linsong”提供适合CorelDRAW12：打开VBa编辑器删掉以下这几句，即可适合各尺寸，可以试试看！

　　d.Unit = CorelDRAWrInch

　　d.DrawingOriginX = -4.25

　　d.DrawingOriginY = -5.5