Excel：VBA数据分析-找到含某个关键字的单元格就标黄（五）

是的，还是之前的测试表，i( •̀ ω •́ )✧。新加了一列关键字列。

这次要写的逻辑如标题所示，找到含有某个指定关键字的单元格，就给单元格标黄。这次写的是如果关键字列中有含有 “北” 字的单元格，就标黄该单元格。

先看代码：（还是选择的双击触发函数）

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)Dim total As IntegerDim counter As IntegerRange("A1").CurrentRegion.Selecttotal = Selection.Rows.CountFor counter = 2 To totalIf (Sheet1.Cells(counter, 7) Like "*北*") Then '如果单元格含有北字Sheet1.Cells(counter, 7).Select '则选中该单元格With Selection.Interior '以下为选中后标黄操作.Pattern = xlSolid.PatternColorIndex = xlAutomatic.Color = 65535.TintAndShade = 0.PatternTintAndShade = 0End WithEnd IfNext counter
End Sub

这次打断点，看看每个单元格的执行状态。

还有，前几篇问章忘了提到了，写了VBA的表格保存时要选择带录制宏的表格格式，就是下图这样的：

以上。

Excel：VBA数据分析-找到含某个关键字的单元格就标黄（五）相关推荐

Excel Vba 纵向合并相同内容的连续单元格
Private Sub MergeSelectonCellsVerticalByContent() Dim a%, b% Dim n As Long n = Selection.Rows.Count ...
Excel VBA 打开百度网页输入关键字并搜索
Sub 百度搜索() 'Excel VBA 打开百度网页输入关键字并搜索 Dim KW, Su With CreateObject("InternetExplorer.Application ...
Excel 2010 VBA 入门 033 批量合并相同的单元格
目录 Range的Merge方法合并单元格 VBA运行时关闭警告多行中相同的内容处理示例: Range的Merge方法合并单元格单元格对象的Merge方法可以用来合并相邻的单元格区域,使之成为一 ...
实现Excel行插入行删除特殊处理，单元格合并及动态条件单元格公式自动计算功能的VBA 宏示例
最近的项目中,用到了很多Excel的VBA宏功能,用户的新需求也有很多需要用VBA宏来实现.为满足业务需求, 自己搜索网上的相关资料,尝试不同的解决方法,最终解决了用户的需求,在此记录下来,做一个总结 ...
批量提取excel中包含特定关键字的单元格内容
批量提取excel中包含特定关键字的单元格内容链接:https://pan.baidu.com/s/1uTnkYXh8jBcaeda-JoQDuQ 提取码:jbkv class get_xls_da ...
Python提取excel中指定关键字的单元格
在网络运维中会有处理excel形式的单列的log的场景,需要从中根据关键字来提取需要的那一行数据以方便查看,尤其是面向运营商网络,大量的设备使得人工汇总非常麻烦,使用python的xlrd和xlwt类 ...
Office Excel阅读模式(记忆和高亮选中的单元格)的两种方法
金山WPS上非常好用的阅读模式,到了微软Office上就就没有了,很是心痛. 然而网上搜到的Office阅读模式,要么需要用到插件(比如"方方格子"的"聚光灯" ...
Easypoi 导出excel 使用注解实现一二级标题行的单元格合并
Easypoi 导出excel 使用注解实现一二级标题行的单元格合并先看一下最终效果图上代码 Excel 模板实体类 @Data public class HxAdvisoryZJEndExcel ...
VBA小程序_对于选中的单元格进行取消合并_选择空值向上填充
Sub VBA小程序_对于选中的单元格进行取消合并_选择空值向上填充()Dim a As RangeSet a = Selection '定义变量为最初选择的区域,不忘初心Selection.UnMe ...

Excel：VBA数据分析-找到含某个关键字的单元格就标黄（五）

Excel：VBA数据分析-找到含某个关键字的单元格就标黄（五）

Excel：VBA数据分析-找到含某个关键字的单元格就标黄（五）相关推荐

最新文章

热门文章