VB没有一个简单的一句命令来给选中的区域加外边框，有一个另外的方法BorderAround让你在单元格区域添加边框和设置颜色，线型和新边框的粗细。
下面的语句是VBA中给选中的单元格设置外围粗边框的最佳方法：
Range("A1:B3").BorderAround Weight:=xlThick
上面的指令使用Range对象的BorderAround方法。它给A1:B3区域添加了一个粗线外框。
2.将单元格原格式转为文本格式
Microsoft Excel中用于TEXT函数的语法如下：
=TEXT (value, format_text)
与TEXT函数有关的参数如下：
Value（必需）： TEXT函数中的值通常表示我们要转换为文本的数字值，其值可以是引用包含数字值的单元格的数字引用，或者可以使用其他函数来返回数字。
format_text（必需）： TEXT函数中的format_text参数是我们要应用的格式，我们必须将参数提供为用引号括起来的格式代码。
如将B2转为文本格式：
Text(B2，"0")
"0"表示将数字转为文本格式
将日期转为指定文本格式：
=TEXT(A1, “mm/dd/yyyy”)
参考：https://geek-docs.com/excel/excel-tutorials/j_how-to-convert-date-to-text-in-microsoft-excel.html
