现在有个Excel文件,需要将里面的数据录入到数据库中,一开始想也许需要用POI,不过想想这么简单的需求还是不要上Java IDE了,直接用Excel拼接出SQL语句不就好了么。

  

Excel中实现类似Java中的String format函数_第1张图片


  Excel中的拼接

  要说起Excel中的拼接,最简单就是或者CONCATENATE()函数,不过用来拼接SQL语句真是略有不足啊,这满屏幕的单引号、双引号、逗号百花齐放百家争鸣,看得人眼花缭乱不可开交。

  Excel中实现类似Java中的String format函数_第2张图片

  VBA开发format函数

  俗话说,疾风知劲草,板荡识诚臣,这时候,就想起来Java里String format函数的优势了。那么我们能不能在Excel中也弄这么一个类似的函数呢?还好Excel提供了用VBA编写自定义函数的功能,让我们亡羊补牢。

  首先定义一个叫做format的函数

  Function format()

  format = bar

  End Function

  这个函数现在只有唯一的一个功能,就是返回bar这个字符串。说起来VBA也挺奇葩,没有正常的return语句,而是将和函数名同名的变量的值作为返回值,所以format这个变量的值,就是format函数的返回值。

  下面扩充一下这个函数,在设想中,函数应该接收一个必选的参数作为模板,模板中#作为占位符,后面的所有参数被填充到模板中,替换占位符。

  =format(INSERT INTO bar (number, manufacturer, name, android_version) values (#, '#', '#', '#');,B1,C1,D1,E1)

  所以修改一下函数签名

  Function format(template, ParamArray args())

  format = bar

  End Function

  后面的ParamArray表示了一个变长参数列表,args后面的括号表示了它是一个数组。

  最后工作就简单多了,遍历数组,依次替换模板中的占位符即可。

Excel中实现类似Java中的String format函数_第3张图片

  Excel中的format

  这下终于有看着顺眼、用着方便的format函数了