派林喜欢在某些单元格上使用对角线边框将值显示为“划掉”。但是,她希望使用条件格式的对角线边框。尝试时,她可以设置其他类型的边框,但不能设置对角线边框-在条件格式中无法选择。

她想知道是否存在一种使用条件格式的对角线边框的方法。

设置条件格式时,没有直接的方法可以执行此操作-Excel完全不允许您使用条件格式的对角线边框。这意味着您可能要寻找并使用可接受的解决方法。以下是有关条件格式的一些想法:

  • 设置条件格式以使用与单元格背景色相同的字体颜色。这样,如果满足您的条件,内容似乎将消失。

  • 设置条件格式以使用一种单元格模式。有一些看起来像穿过单元格的多条对角线。

  • 设置条件格式,以对所有出现在单元格中的文本使用删除线格式。

如果您实际上要使用对角线边框,那么唯一的方法是将显式格式应用于单元格,而不是依赖条件格式。这可以通过使用宏来完成,例如:

Private Sub Worksheet_Change(ByVal Target As Range)

Dim c As Variant     Dim addr As String

Set Target = Range("C12:C20")



If Intersect(Target, ActiveCell) Is Nothing Then Exit Sub     For Each c In Target         If c = 0 And Len(c) <> 0 Then             addr = c.Address             With Range(addr).Borders(xlDiagonalUp)

.LineStyle = xlContinuous             End With         ElseIf c > 0 And Len(c) > 0 Then             addr = ActiveCell.Address             With Range(addr).Borders(xlDiagonalUp)

.LineStyle = xlNone             End With         End If     Next End Sub

您应该右键单击工作表选项卡,从出现的上下文菜单中显示代码窗口,然后将此宏粘贴到代码窗口中。每当工作表中的单元格更改时,都会执行该宏。它检查C12:C20中的单元格,如果其中任何一个包含零值,则将为该单元格设置对角线边框。

您可以轻松地更改宏以应用到不同范围的单元格或在应用边框时检查其他条件。如果愿意,可以根据要应用的对角线边框将xlDiagonalUp常量更改为xlDiagonalDown。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(10692)适用于Microsoft Excel 97、2000、2002和2003。您可以在以下位置找到适用于Excel功能区界面(Excel 2007和更高版本)的本技巧的版本:

链接:/ excelribbon-Diagonal_Borders_in_a_Conditional_Format [条件格式的对角线边框]。