VB没有一个简单的一句命令来给选中的区域加外边框，有一个另外的方法BorderAround让你在单元格区域添加边框和设置颜色，线型和新边框的粗细。

下面的语句是VBA中给选中的单元格设置外围粗边框的最佳方法：

Range("A1:B3").BorderAround Weight:=xlThick

上面的指令使用Range对象的BorderAround方法。它给A1:B3区域添加了一个粗线外框。

2.将单元格原格式转为文本格式

Microsoft Excel中用于TEXT函数的语法如下：

=TEXT (value, format_text)

与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