[VBA]定向提取符合条件的内容

要求：若A列满足值为c，则将b列对应的内容背景色调为红色，并提取出来：

代码如下：

Sub naqu()
Dim i As Integer
For i = 2 To Range("a65536").End(xlUp).Row

If Cells(i, 1) = "c" Then
n = n + 1
Cells(i, 2).Interior.Color = 666
Cells(n, 3) = Cells(i, 2)

End If
Next

End Sub

时间： 2024-10-13 17:47:21

[VBA]定向提取符合条件的内容的相关文章

正则查询符合条件的字符串

由于对正则不熟悉..遇到问题很烦恼.. 比如我要将以下中乱码部分去掉,怎么查询出那些乱码.. `SERIALNO` varchar(60) NOT NULL COMMENT 'å?ˆå?Œæµ?æ°´å?·', `RELATIVESERIALNO` varchar(60) DEFAULT NULL COMMENT 'å…³è?”ç”³è¯·æµ?æ°´å?·', `ARTIFICIALNO` varchar(60) DEFAULT NULL COMMENT 'äººå·¥å?ˆå?Œç¼–å?·

VBA在Excel中的应用（一)：改变符合条件单元格的背景颜色

在使用excel处理数据的时候,为了能更清晰的标示出满足特定条件的单元格,对单元格添加背景色是不错的选择.手工处理的方式简单快捷,但是当遇到大批量数据,就会特别的费时费力,而且不讨好(容易出错).通过代码来处理是个不错的选择,excel可以通过VBA编程来处理内部数据,在打开excel页面后,可以通过“alt + F11”组合键来启动VBA编程界面,跟VB的编程界面和语法一样,需要注意的是如何调用excel的内容.VBA通过sheet, range和cells三个层次来调用excel中的制定区域

PHP preg_replace() 正则替换所有符合条件的字符串

PHP preg_replace() 正则替换,与Javascript 正则替换不同,PHP preg_replace() 默认就是替换所有符号匹配条件的元素需要我们用程序处理的数据并不总是预先以数据库思维设计的,或者说是无法用数据库的结构去存储的. 比如模版引擎解析模版.垃圾敏感信息过滤等等. 一般这种情况,我们用正则按我们的规则去匹配preg_match.替换preg_replace. 但一般的应用中,无非是些数据库CRUD,正则摆弄的机会很少. 根据前面说的,两种场景:统计分析,用匹配:

PHP函数preg_replace() 正则替换所有符合条件的字符串

PHP preg_replace() 正则替换,与JavaScript 正则替换不同,PHP preg_replace() 默认就是替换所有符号匹配条件的元素. preg_replace (正则表达式, 替换成, 字符串, 最大替换次数[默认-1,无数次], 替换次数) 大部分语言的正则表达式都是差不多的,不过也有细微的差异. PHP 正则表达式正则字符正则解释 \ 将下一个字符标记为一个特殊字符.或一个原义字符.或一个向后引用.或一个八进制转义符.例如,“\n”匹配字符“n”.“\\n”匹

编程之美找出符合条件的整数

好不容易把内容看懂~ 最主要的一句话:只需要将10k%N的结果与余数信息数组里非空的元素相加,再去模N,看看会不会出现新的余数~ 时间太紧迫~先把自己写的代码贴上,以后再详解 1 int FindMin(int N) 2 { 3 if(N <= 1) 4 return N; 5 6 int* A = new int[N];//这个是记录模N余i之后的数值 7 8 memset(A, -1, sizeof(int) * N); 9 int factor = 1; 10 A[1] = 1; 11 1

取得left join的第二表中符合条件的第一条记录

问题描述有表一 tableA tid username title 1 lily 我公司将进行xx培训 2 angus 关于秋游的通知 3 boss 这个月不发奖金 4 vivi 新产品上市表二 tableB tid time txt 1 0809 大家快来.... 2 0810 我是新来的,大家好 2

《Linux学习并不难》Linux常用操作命令（14）：grep命令查找文件中符合条件的字符串

8.14 <Linux学习并不难>Linux常用操作命令(14):grep命令查找文件中符合条件的字符串使用grep命令可以查找文件内符合条件的字符串. 命令语法: grep [选项] [查找模式] [文件] 命令中各选项的含义如表所示. 选项选项含义 -E 模式是一个可扩展的正则表达式 -F 模式是一组由断行符分隔的定长字符串 -P 模式是一个Perl正则表达式 -b 在输出的每一行前显示包含匹配字符串的行在文件中的字节偏移量 -c 只显示匹配行的数量 -i 比较时不

一个自然数在1700和1800之间,且被5除余3,被7除余4,被11除余6,求符合条件的数

昨天晚上看了一道逻辑题:一个自然数在1700和1800之间,且被5除余3,被7除余4,被11除余6,求符合条件的数.题目后面写着,有人看了几分钟便给出了答案.我很好奇,此人是如何解答的. 我自己先琢磨了下,拿笔算了半天,最后一个巧合的情况下,得到了答案.此题的一个关键且明显的推论是:能被5除余3的数,肯定最后一位是3或者8.那么接下来怎么推呢?我从网上搜集了答案. 方案1: 这个数被5除余3,则此数个位数为3或8, 设这个数十位为x,则此数可表达为1703+10x,或1708+10x当此数为17

AOP系列(二)——为符合条件的目标对象创建代理

接着上篇文章,我们将采用新的方式进行动态代理. ObjectNameAutoProxyCreator创建代理实现思路根据配置文件中的配置,Spring容器会根据此配置,为符合条件的对象创建代理. 具体代码配置文件 <?xml version="1.0"?> <configuration> <configSections> <sectionGroup name="spring"> <section name=