作者:乔山办公网日期:
返回目录: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