java中的model_使用Excel自动生成Java中的Model类 | 学步园

同事写的使用Excel生成Java的Model类的宏。我觉得很实用，赞一个，也顺便推广一把。

如图所示：

Alt+F11进入后台：

代码如下：

Private Sub CommandButton1_Click()

Set fs = CreateObject("Scripting.FileSystemObject")

fileNm = Range("C3").Value

tbNm = Range("B3").Value

tbId = Range("C3").Value

ctDate = Range("D3").Value

ctNm = Range("E3").Value

classNm = "T" + UCase(Mid(tbId, 3, 1)) + Mid(tbId, 4, Len(tbId))

filePath = "C:/" + classNm + ".java"

Set out