VBA代码优化：数组--阿拉伯转汉字

如图，在练习数组，想一键转化阿拉伯数字为汉语大写，用cstr和mid从1998分别取数转化成大写，但不清楚的一点是该怎么让每个刚取完、转化成汉字后就连在一起，我只能绕路先把四个数字取完的结果分别放到后面几个单元格，最后在用&连起来，不太懂，麻烦大家

你是练手吗？为啥阿拉伯数字转汉子要vba写，设置单元格格式就可以了，本身内置了这个功能