VBA从Excel中生成Oracle create table

有时会碰到Oracle设计文档用Excel，需要根据Excel生成create table语句。当表多，列多，设计变更时，这个VBA小函数就能节省很多时间。在google, baidu搜了一圈，没有找到类似的。写出来方便自己也方便他人。

假设:

Sheet名字为表名

第一行作为Excel表格表头

第一列为列名

第二列null 约束

第三列数据类型

目前还不支持分区语法

Private Sub Worksheet_Activate()