VBA实现驼峰法变量名转换成下横杠式变量名
在excel中按ALT+F11打开VBA编辑器，选择插入模块在模块中输入下面代码：Sub 名称和识别子生成() ' 正规表示 Dim oRegExp As Object Dim shtCount As Integer If ActiveSheet.Cells(2, 1).Value <> "" Then shtCount = Acti...
