1、首先需要建立一张表格，设置其简单的按钮格式，以便可以直观的点击按钮显示顶线的结果，如下图所示：
2、点击按钮右键，找到指定宏，点击，以便可以进入到编程模式下，如下图所示：
3、进入到vba的project项目模式下，可以直接点击Alt+F11进入，如下图所示：
1、接下来就是编写代码，实现单元格顶线显示的代码编写，如下图所示：
2、代码如下：
Sub Msg()
Range("B2").Borders(xlEdgeTop).LineStyle = xlContinuous
End Sub
显示单元格B2的顶线。
1、最后就是点击按钮执行代码，显示结果，如下图所示：
2、如上所述，可以使用vba代码实现单元格显示顶线的情况，如下图所示：
