大量Visio图纸自动填写图号页码的一个方法...

方法是有了，但真的不如Word的页码简单易用……希望可以用。

如果您做的图纸有好几十张，每张都有什么“图号”、页码、“共XX页”要填，貌似很麻烦，最要命还不是这个，如果一堆图纸基本完工，老总跑过来说，“这里那里还要加一张图纸！”真是站着说话不腰疼，画图还罢了，改后面的图号页码可是要命，页数变了可是每张都要更正的。我们的施工图纸动不动几十上百张，改起来可是力气活。
其实规划好一点是可以让图纸自动填写图名、图号、页码、共XX页等项目的。
Visio的函数可以读出本文件名称，如果每张图一个*.VSD 文件，把图纸的图名、图号、页码、共XX页等信息形成文件的名称，就可以截取出来这些信息自动填入图纸的指定文本框中。
而更改文件名可以用一些批量更改文件名称的方法，这样还可以同时方便的生成目录，不过这是一些Dos命令和Word应用的事情。
示例，可以把该文件名称命名为“SⅧ-A-CC#DD图纸名称.VSD”，其中，A：册号码，CC：页号，DD：总页数（假设不超过100页），并且将“SⅧ-A-CC”定义为图号。"#"号纯属分隔符号。（这只是我们的习惯而已）
这样，这张图纸就可以自己填写图名、图号、页码、共XX页等项目咯。
步骤：
1、用‘Ctrl－2’选文档工具，在需要的地方单击鼠标插入一个文本框
2、选‘插入’菜单－‘字段’
3、在‘类别’选‘文档信息’，‘字段’选‘文件名’，‘格式’选‘正常’，这样，文本框的显示的内容就是保存的文件名称了。
4、按‘Ctrl－1’，再选定这个文本框，按几次‘Ctrl－D’复制几个放在边上备用。
5、随便选定一个文本框，按‘Alt－W’，再按‘S’，打开这个文本框的ShapeSheet。
6、在屏幕下方打开的ShapeSheet中单击‘Text Fields’数据表，可以看见‘Value’字段的取值是‘FILENAME（）’，这个就是取文件名的函数鸟。我们就是要截取它的返回值中的东西。
7、双击Value单元格，可以编辑里面的内容，也可以在屏幕上方的输入栏编辑，完全类似Excel的输入栏。
8、这个文件的文件名，也就是FileName()函数的返回值应当是字符串“SⅧ-A-CC#DD图纸名称.VSD”，可以通过以下函数截取出需要的内容：
   图名：   MID(FILENAME(),11,(FIND(".",FILENAME(),,)-11))
   图号：   LEFT(FILENAME(),7)
   页号：   "第 "&MID(FILENAME(),6,2)&" 页"
   页数：   MID(FILENAME(),9,2)
如果文件名规则与例子不一样，则MID、LEFT等函数的起始位和字符串长度应当适当调整。
9、可以在Value单元格填上‘MID(FILENAME(),11,(FIND(".",FILENAME(),,)-11))’   （不含‘ ’），按回车，这时候文本框显示的内容就是“图纸名称”。
10、对其他文本框重复5步骤以后的操作，填入不同的函数，就可以得到不同的结果。
11、把各文本框拖到应该在的位置，调整大小，更改字体。
12、Excel也可以用这个方法，应当使用函数CELL("filename")获得文件名称，然后截取。
总结：只要规划好文件的名字规则，就可以用字符串截取的函数得到需要的字符串自动填入，只要统一修改文件名成就可以修改对应内容。似乎还有其他方法可以完成自动填写的功能，例如插入宏，可惜不会做，^_^那位会的话请指导一下，或者还有啥更简单的方法，象Word里面填页码那样方便就好了。