时间戳

首页 > 解决方案 > 如何从单元格中去除阴影并保持内部颜色不变

vba - 如何从单元格中去除阴影并保持内部颜色不变

问题描述

我在互联网上检查但找不到解决方案。在我们混合了阴影和彩色单元格的文件中，需要删除阴影但需要保留颜色。我已经有一个范围，想像下面这样修复它：

    Range(Cells(RowStart, ColStart), Cells(RowLast, ColLast)).Select
    With Selection.Interior
        .PatternTintAndShade = 0
    End With

当我在两个选项中使用 .Pattern = xlNone 或 .TintAndShade = 0 时，它不起作用我失去了单元格内部颜色。请指教

标签： vbaexcel

解决方案

我找到了一个对我有用的答案，我留下了这个问题，以便其他人可以从中受益。这段代码对我有用： 

    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .PatternTintAndShade = 0
    End With

推荐阅读