1、首先需要建立一张表格,并设置一个按钮,以便可以点击按钮执行代码,实现xlDiagonalUp属性,如下图所示:

2、点击按钮控件右键,找到指定宏,方便编写代码,如下图所示:

3、进入到vba的project项目模式下,如下图所示:

1、接下来就是编写代码,实现xlDiagonalUp属性的简介,如下图所示:

2、代码:
Sub Msg()
Sheet1.Range("C3:D4").Borders(xlDiagonalUp).Weight = xlThick
End Sub
1、最后就是点击按钮,运行代码,显示结果,如下图所示:

2、可以从结果看到xlDiagonalUp属性为左斜杠显示,如下图所示:
