PowerDesiginer导入表结构excel
![](/assets/blank.gif)
![](/assets/blank.gif)
3、在PowerDesigner菜单栏中,依次点击“Tools ->Excute Commands->Edit/Run Script..”
'******************************************************************************
Option Explicit Dim mdl ' the current model
Set mdl = ActiveModel
If (mdl Is Nothing) Then MsgBox "There is no Active Model"
End If Dim HaveExcel
Dim RQ
RQ = vbYes 'MsgBox("Is Excel Installed on your machine ?", vbYesNo + vbInformation, "Confirmation")
If RQ = vbYes Then HaveExcel = True ' Open & Create Excel Document Dim x1 ' Set x1 = CreateObject("Excel.Application") x1.Workbooks.Open "E:\Temp\1.xlsx" '指定excel文档路径 x1.Workbooks(1).Worksheets("Sheet1").Activate '指定要打开的sheet名称
Else HaveExcel = False
End If a x1, mdl
sub a(x1, mdl)
dim rwIndex
dim tableName
dim colname
dim table
dim col
dim count
dim abc on error Resume Next
'--------------------------------
'下面是读取excel,添加表实体属性
'--------------------------------
For rwIndex = 1 To 300 step 1 '指定要遍历的Excel行标 由于第2行是表头,从第1行开始,看你这个表设计多少行 With x1.Workbooks(1).Worksheets("Sheet1")'需要循环的sheet名称 'If .Cells(rwIndex, 1).Value = "" Then 'Exit For ' End If 'If .Cells(rwIndex,1).Value = "表" Then 'And .Cells(rwIndex,2).Value <> "" And .Cells(rwIndex,3).Value <> "" Then'Excel中表头的1列是表名,2表名中文,3是表注释 If rwIndex = 1 then '第一行取表信息set table = mdl.Tables.CreateNew '创建一个表实体 table.Code = .Cells(rwIndex,2).Value'从excel中取得表名称和编码 table.Name = .Cells(rwIndex,3).Value' table.Comment = .Cells(rwIndex,4).Value '指定列说明 'count = count + 1 Continue End IfIf .Cells(rwIndex,1).Value = "" or .Cells(rwIndex,1).Value = "字段" Then '第1列为空的都可以忽略 Continue '这里忽略空行和表名行、表头行 Elseset col =table.Columns.CreateNew '创建一列/字段 col.Code = .Cells(rwIndex, 1).Value '指定列code col.DataType = .Cells(rwIndex, 2).Value '指定列数据类型 If.Cells(rwIndex, 3).Value = "Y" Then'指定主键 col.Primary =true End If If.Cells(rwIndex, 4).Value = "N" Then'指定列是否可空 true 为不可空 col.Mandatory =true End If col.Name = .Cells(rwIndex, 5).Value '指定列name col.Comment = .Cells(rwIndex, 6).Value '指定列说明 count = count + 1 End If 'If (.Cells(rwIndex,1).Value = "" And .Cells(rwIndex,2).Value = "" And .Cells(rwIndex,3).Value = "") Or (.Cells(rwIndex,1).Value <> "" And .Cells(rwIndex,2).Value = "" And .Cells(rwIndex,3).Value <> "")Then End With Next MsgBox "生成数据表结构共计 " + CStr(count), vbOK + vbInformation, "表"
Exit Sub
End sub
PowerDesiginer导入表结构excel相关推荐
- impdp导入表结构和表数据_ORACLE数据库如何用datapump工具导出表结构然后导入到其它Schema下面...
这里简单介绍一下如何使用ORACLE数据库的datapump工具导出.导入表结构定义.由于业务场景可能非常简单,你不会遇到任何问题,也有可能业务场景非常复杂,你就会遇到一些杂七杂八的问题.下面我简单介 ...
- impdp导入表结构和表数据_EXP COMPRESS以及EXP/IMP EXPDP/IMPDP导入表结构注意-阿里云开发者社区...
EXP COMPRESS以及EXP/IMP EXPDP/IMPDP导入表结构注意 重庆八怪 2014-09-10 987浏览量 简介: 关于EXP COMPRESS参数 一直对这个参数有些疑惑.当然此 ...
- mysql导入表结构命令是_mysql,命令导入\导出表结构或数据
1.导出整个数据库 mysqldump -u用户名 -p密码 数据库名 > 导出的文件名 C:\Users\jack> mysqldump -uroot -pmysql db1 > ...
- mysql命令导出表结构和数据_mysql-用命令导出、导入表结构或数据
1. 导出整个数据库(表结构和数据) mysqldump -u用户名 -p 数据库名 > 导出的文件名 [root@localhost work]# mysqldump -uroot -p m ...
- 从MySQL中导出表中数据_用命令从mysql中导出/导入表结构及数据
在命令行下mysql的数据导出有个很好用命令mysqldump,它的参数有一大把,可以这样查看: mysqldump 最常用的: mysqldump -uroot -pmysql databasefo ...
- oracle导入表结构失败,【求解】:导入表结构时,总报 IMP-00017 ,大家帮帮忙,谢谢!!...
原帖由 carcase 于 2010-11-12 10:02 发表 INITIAL 1275068416 空间够不够啊 这个initial确实很讨厌,能确定是空间的问题吗? 我又重建了一个3.5g的表 ...
- oracle导入 表 卡住了,oracle数据库怎么导入dmp,只导入数据不导入表结构?
使用方法: Exp parameter_name=value or Exp parameter_name=(value1,value2--) 只要输入参数help=y就可以看到所有帮助. EXP常用选 ...
- impdp oracle 只导入表结构_oracle数据库怎么导入dmp,只导入数据不导入表结构?...
使用方法: Exp parameter_name=value or Exp parameter_name=(value1,value2--) 只要输入参数help=y就可以看到所有帮助. EXP常用选 ...
- impdp oracle 只导入表结构_Oracle数据导入导出(expdp impdp)
oracle数据泵的使用方式, 以及数据泵命令的参数说明 使用expdp和impdp时应该注重的事项: 1.exp和imp是客户端工具程序,它们既可以在客户端使用,也可以在服务端使用. 2.expdp ...
最新文章
- BIOS, UEFI, MBR, GPT, GRUB介绍
- js数组去重(多种方法)
- 第十六届全国大学生智能车竞赛线上赛点赛道审核 - 浙江赛区
- 【缅怀妈妈系列诗歌】之十:妈妈,孩儿答应您
- mybatis教程--实现增删改查的入门教程
- C++右值引用的参考
- JFreeChart(七)之气泡图表​​​​​​​
- jvm 方法内联_方法内联在JVM中有多积极?
- 关于一些html和css2的知识点
- 操作系统锁的实现方法有哪几种_一文带你彻底了解同步和锁的本质
- php图片翻转函数,PHP图片处理之图片旋转和图片翻转实例
- DB2获取CHAR字段数据的数据长度方法
- Shell脚本学习指南
- 疯狂java讲义第6版_疯狂java讲义第6版
- Java 的三种 Base64
- vue ie8 兼容方案
- java记忆翻牌,原生JS实现记忆翻牌游戏
- 华为推送 简介 集成
- SEO网站优化步骤和技巧小结
- $Linux vi/vim编辑器常用命令与用法总结
热门文章
- JavaSwing基础
- MC服务器刷怪塔效率不稳定,我的世界:刷怪塔效率高的秘诀,只需掌握4点,了解规律很关键...
- Java Double类型计算工具类 BigDecimal
- java 栈溢出_Java栈溢出--StackOverflowError
- top100峰会有感
- 华秋DFM软件迭代升级,让用户拥有更好的体验
- 微信开发HTML5轻游戏中的几个坑
- ue4 曲线图实现 蓝图_UE4虚幻引擎蓝图制作自动开关门(超详细图文教程
- 利用Transformer替代MSA从蛋白序列中学习Contact Map
- Berlekamp-Massey算法及python代码实现