PowerDesigner导出word,PowerDesigner把表导出到word,PDM导出word文档
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
©Copyright 蕃薯耀 2017年4月06日
http://www.cnblogs.com/fanshuyao/
一、把注释导出成字段的执行脚本:
- Option Explicit
- ValidationMode = True
- InteractiveMode = im_Batch
- Dim mdl 'the current model
- 'get the current active model
- Set mdl = ActiveModel
- If (mdl Is Nothing) Then
- MsgBox "There is no current Model"
- ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then
- MsgBox "The current model is not an Physical Data model."
- Else
- ProcessFolder mdl
- End If
- 'This routine copy name into code for each table, each column and each view
- 'of the current folder
- Private sub ProcessFolder(folder)
- Dim Tab 'running table
- for each Tab in folder.tables
- if not tab.isShortcut then
- if len(tab.comment) <> 0 then
- tab.name = tab.comment
- end if
- On Error Resume Next
- Dim col 'running column
- for each col in tab.columns
- if len(col.comment) <>0 then
- col.name =col.comment
- end if
- On Error Resume Next
- next
- end if
- next
- end sub
二、把表导出到Word的通用模板:
见附件。
把模板解压后放在PowerDesigner的安装目录下Report Templates 文件夹里,
如D:\PowerDesigner\Resource Files\Report Templates
三、其它参考资料:
http://blog.csdn.net/ferry_passion/article/details/8948456
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
©Copyright 蕃薯耀 2017年4月06日
http://www.cnblogs.com/fanshuyao/