Advertisement

技术工具类:数据模型工具PowerDesigner(PDM) 导出表结构至Excel

阅读量:

将PDM中的所有表结构信息导出至Excel文件中

启动PDM工具后,通过按下组合键ctrl+shift+x调出命令执行界面,把以下代码粘贴其中并运行即可完成操作

复制代码
 '******************************************************************************

    
 Option Explicit
    
    Dim rowsNum
    
    rowsNum = 0
    
 '-----------------------------------------------------------------------------
    
 ' Main function
    
 '-----------------------------------------------------------------------------
    
 ' Get the current active model
    
     Dim Model
    
     Set Model = ActiveModel
    
     If (Model Is Nothing) Or (Not Model.IsKindOf(PdPDM.cls_Model)) Then
    

全部评论 (0)

还没有任何评论哟~