乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > EXCEL区域内删除条件格式,但保留格式怎么操作?-excel取消条件格式,excel表格如何取消条件格式

EXCEL区域内删除条件格式,但保留格式怎么操作?-excel取消条件格式,excel表格如何取消条件格式

作者:乔山办公网日期:

返回目录:excel表格制作


你这个不是条件格式,是单元格样式
1.按Alt+F11打开VBA编辑器,在代码窗口中输入下列代码:
Sub DelCustomStyles()
Dim st As Style
For Each st In ActiveWorkbook.Styles
If Not st.BuiltIn Then st.Delete
Next
End Sub
2.关闭VBA编辑器,返回Excel界面按Alt+F8,打开“宏”对话框,执行“DelCustomStyles”宏即可一次删除所有自定义单元格样式,而内置的单元格样式会保留。

1.在首行中选择要显示框线的区域,如本例中的A1:D1。

  2.执行“格式”→“条件格式”,打开“条件格式”对e799bee5baa6e997aee7ad94e59b9ee7ad94335话框。单击打开“条件1”下拉列表,单击选择“公式”,在随后的框中输入下面的公式“=OR($A1"",$B1"",$C1"",$D1"")”,意即只要A1、B1、C1或D1中有一个单元格内存在数据,将自动给这四个单元格添加外框线。

  注意:公式中的单元格引用为混合引用,如改为相对引用则效果不同,朋友们可以一试。

  3.单击“格式”按钮,打开“单元格格式”对话框,切换到“边框”选项卡,为符合条件的单元格指定外边框。

  4.选择A1:D1区域,复制,选择A→D列,粘贴(如果A1:D1中已输入数据,可执行“编辑”→“选择性粘贴”→“格式”),这样就把第2步中设置的格式赋予了A→D列的所有单元格。

  在这四列中任意一个单元格中输入数据(包括空格),此行(A→D列)各单元格将会自动添加框线。

  提示:对于已经显示条件格式所设置框线的单元格,仍然允许在“单元格格式”对话框的“边框”选项卡中设置其框线,但外边框不能显示(使用工具栏上的“边框”按钮进行设置也是如此,除非删除条件区域内的全部数据),只能显示斜线。

亲,按下图。假如B列包含有条件格式。

先选中这几列,点击菜单“数据”,“筛选”。

问查看大图" class="ikqb_img_alink">

 

选择颜色为“自动”。

 

加一个辅助列,在筛选状态下,在辅助列的第一行填写“保留”,下拉。

 

选中这三列,再次点击菜单“筛选”。

 

然后选择辅助列为“空白”的行。删除这些行。



再查了小两个小时后 大部分都是废话还有答非所问存数滥竽充数的

还有一些情况不适用大数据量之后 最终找到了一站式解决方案!!! 

以下所有全部co自网页链接  !!!

在Excel中,除VBA外,没有直接的方法可以删除7a64e58685e5aeb9337条件格式。

1。 启用要删除条件格式设置规则但保留格式的工作表,然后按 Alt + F11键 键打开 Microsoft Visual Basic for Applications 窗口。

2点击 插页 > 模块,并将VBA粘贴到Module脚本下方。 看截图:

VBA:删除条件格式设置规则但保留格式。

Sub Keep_Format()'UpdatebyExtendoffice20160614    Dim xRg As Range    Dim xTxt As String    Dim xCell As Range    On Error Resume Next    If ActiveWindow.RangeSelection.Count > 1 Then      xTxt = ActiveWindow.RangeSelection.AddressLocal    Else      xTxt = ActiveSheet.UsedRange.AddressLocal    End If    Set xRg = Application.InputBox("Select range:", "Kutools for Excel", xTxt, , , , , 8)    If xRg Is Nothing Then Exit Sub    For Each xCell In xRg        With xCell          .Font.FontStyle = .DisplayFormat.Font.FontStyle          .Interior.Color = .DisplayFormat.Interior.Color          .Font.Strikethrough = .DisplayFormat.Font.Strikethrough        End With    Next    xRg.FormatConditions.DeleteEnd Sub

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网