1、首先需要建立一张表格，然后再创建一个按钮控件，如下图所示：
2、点击按钮右击鼠标，找到指定宏，如下图所示：
3、进入到vba的project项目模式，以便可以编写代码，进入到编码模式下，如下图所示：
1、接下来就是编写代码，实现TintAndShade = -1属性说明，如下图所示：
2、代码：
Sub Msg()
Sheet1.Range("C2:D3").Borders(xlEdgeLeft).TintAndShade = -1
End Sub
体现TintAndShade = -1属性显示
1、最后就是点击按钮控件执行代码，运行结果，显示出TintAndShade = -1属性情况，如下图所示：
2、最终可以得出，TintAndShade = -1属性为在区域内可以显示出单元格的线条，如下图所示：
