凡是某单元有特定字符的，则删除整行（VBA ）

有个工作表，有N行N列，B列是领料部门，C列是领料用途，E列是发料仓库，凡是B列有“研发部”、“技术部”，则整行删除；

凡是C列有“检测”、“修理”、“生产”，则整行删除；凡是E列有“基建仓库”、“成品仓库”，则整行删除。

Sub Delrows()
Dim Arr, k&
Arr = [A1].CurrentRegion
Application.ScreenUpdating = False
For k = UBound(Arr) To 1 Step -1
If InStr(Arr(k, 2), "研发部") + InStr(Arr(k, 2), "技术部") + _
InStr(Arr(k, 3), "检测") + InStr(Arr(k, 3), "修理") + InStr(Arr(k, 3), "生产") + _
InStr(Arr(k, 5), "基建仓库") + InStr(Arr(k, 5), "成品仓库") Then
Rows(k).Delete
End If
Next
Application.ScreenUpdating = True
End Sub

凡是某单元有特定字符的，则删除整行（VBA ）相关推荐

vba模拟鼠标点击_核对数据总看错，试试这个方法，点击单元格自动为整行填充颜色...
Hello,大家好,今天跟大家分享我们如何实现实现点击一个单元格,自动为数据区域的整行填充一个颜色,效果如下图,当我们点击一个单元格的时候们就会为整行填充一个颜色,这个的操作跟我们之前分享的聚光灯效果 ...
wps设置根据单元格值设置一整行颜色
期望:当F列某个单元格为"开发中",则整行的背景色都填充为淡绿色操作: 编辑规则: 改成F1: 至此设置完毕,最终结果:
计算机在表格if用法,excel使用if判断单元格包含特定字符
文章简介本文所使用的是excel中的if函数,使用if函数判断单元格是否包含特定汉字,如有包含特定字符,则显示相应值,如不包含则显示另外一个值. 本文显示的为使用Excel if函数和COUNTIF ...
qstring去掉特定字符_如何花式、批量且操作简单地处理字符？
文本字符的规范化,是批量处理的前提.多来源数据或是数据收集本身就必然存在不规范情况,于是批量地完成它就成了常见的需求. 对于花式批量处理,自然要说到正则表达式. "正则表达式是对字符串操作的 ...
R语言apropos函数查找包含特定字符的函数、find函数查找函数所在的位置实战
R语言apropos函数查找包含特定字符的函数.find函数查找函数所在的位置实战目录 R语言apropos函数实战 # 基本语法 #apropos函数 # find函数 apropos函数返回一个 ...
python批量删除特定字符_根据某个特定字符删除一行
前言最近接了几个新项目的需求,为了快速开发,我们的策略是:基于原来的一套维定项目代码及数据库基础,去开发新的项目,一般步骤如下: 在原来的代码git基础上拉出一个新的git项目地址修改代码的项目名 ...
C++从string中删除所有的某个特定字符
C++中要从string中删除所有某个特定字符, 可用如下代码 str.erase(std::remove(str.begin(), str.end(), 'a'), str.end()); 其中, ...
scanf的拓展用法——匹配特定字符
scanf的基本用法除了常规的输入操作外还有一些特殊的用法,使用这些用法可以很方便的在输入中读取想要的数据 1.限制输入数据的长度这个应该算不上拓展用法,大多数读者应该都曾经使用过,这里简单提一下 ...
正则表达式——WPF输入控件TextBox 限定输入特定字符
正则表达式--WPF输入控件TextBox 限定输入特定字符原文:正则表达式--WPF输入控件TextBox 限定输入特定字符概念: 正则表达式是对字符串操作的一种逻辑公式, 就是用事先定义好的一 ...

凡是某单元有特定字符的，则删除整行（VBA ）

凡是某单元有特定字符的，则删除整行（VBA ）相关推荐

最新文章

热门文章

凡是某单元有特定字符的，则删除整行 （VBA ）

凡是某单元有特定字符的，则删除整行 （VBA ）相关推荐

最新文章

热门文章

凡是某单元有特定字符的，则删除整行（VBA ）

凡是某单元有特定字符的，则删除整行（VBA ）相关推荐