习惯在Excle定义数据字典结构,在通过Excel定义的结构输入到power designer。
思路
通过固定Excle结构,将excel数据字典导入到power designer。
实现
打开powerdesigner。ctrl+shift+x输入下面内容:
'* File: excel2pdm.vbs
'* Purpose: Excel批量导入表结构到power designer
'* Category:
'* Version: 1.0
'*
'* 所有的表设计都放在一个excel的一个sheet中,每个表中间空一行,表体都有表头说明如下,
'* 再前面一行是表名和表的说明,分别在A和C列。下面格式直接拷贝到excel中就可以看到,空格是制表符。
'******************************************************************************
' Excel 格式如下
'tableone 表一
'字段 类型 键 空 说明 备注
'id Long 主键 N 唯一标识 没有意义,自增
'******************************************************************************
Option Explicit
Dim mdl ' the current model
Set mdl = ActiveModel
If (mdl Is Nothing) Then
MsgBox "There is no Active Model"