你用宏试试看:
1.ALT F11打开VB脚本编辑器.
2.(菜单)插入-模组
3.贴上如下代码:
Sub Macro1()
k = 0
Sheets("sheet2").Select
Cells.Select
Selection.Delete
Sheets("sheet1").Select
Cells(1, 1).Select
For i = 1 To 65535
Cells(i, 1).Select
tmp = ActiveCell.Value
If Len(tmp) = 0 Then
End
End If
If Asc(tmp) = 48 And Asc(tmp) = 57 Then
If tmp Int(tmp) Then
k = k 1
Rows(i).Select
Selection.Copy
Sheets("sheet2").Select
Rows(k).Select
ActiveSheet.Paste
Sheets("sheet1").Select
Rows(i).Select
Selection.Delete
i = i 1
End If
End If
Next
End Sub
4.关闭VB脚本编辑器,回到EXCEL
5.ALT F8运行宏
6.OK
7.说明:
此宏删除第一列不为整数的整行记录,并把删除的整行备份到sheet2工作表.
当第一列数据不为数字时不做处理,注意sheet2为全空,因为程序的开始会清空sheet2
8.注意此代码贴上去之後会变成一行,你要注意换行哦,涉及到删除操作,建议你在删除前备份资料.
9.如有不明白的请联系
1.操作过程:查找需要筛选的项-设置特殊格式-查找标题行中非特殊格式的单元格-隐藏。
图解操作过程:
查找全部“甲”
2.更改“甲”所在单元格的格式
3.调出查找的“高级选项”
4.格式查找
5.从未被修改格式的单元格选择格式
6.查找“全部”
7.隐藏列
在菜单。数据,筛选,高级筛选
里面有一个,选择不重复值,还有将筛选结果复制到其他位置
你试一下,是不是你要的。
其实,你只有100行,用数组公式直接取出也可以。
你的数据是在B列
B1:B1000
C1输入
=INDEX(B:B,SMALL(IF(MATCH(B$1:B$1000,B$1:B$1000,)=ROW($1:$1000),ROW($1:$1000),4^8),ROW(A1)))""
因为是数组公式。输入后,不能回车,需要你按下ctrl+shift+回车
看到公式自动产生了{}就对了,再下拉公式即可
C列就是你要的
在C11中输入或复制粘贴下列公式之一
=INDEX(B$2:G$6,MATCH(B11,A$2:A$6,),MATCH(A11,B$1:G$1,))
=VLOOKUP(B11,A$1:G$6,MATCH(A11,A$1:G$1,),)
=HLOOKUP(A11,A$1:G$6,MATCH(B11,A$1:A$6,))
下拉填充
筛选只针对行数据,如果想竖列筛选可以先把数据转置一下,再筛选
可以先逆转表格,进行列筛选,再把筛选的结果逆转
逆转步骤:
1、复制表格
2、右键——选择性粘贴——数值/转置,即可
本文地址: :,,。以上内容关于excel怎么竖行筛选(如何竖向筛选)
传统行业一般通过地图、独立、小程序和4种方法进行拓展客户。传统行业拓展渠道很难,即使有一小部分拓展成功的传统,也是一路跌跌撞撞被骗了无数次,兜兜转转绕了无数圈,才能拨开重重迷雾,真正建立起来网络获客渠道。一路上弯路很多,忽悠的人也很多,因为个人也是这样一路走过来的。过时的推广方法前几天忽然有人加好友...
国家邮政局14日举行一季度例行新闻发布会,发布2020年快递服务满意度调查和时限测试结果。受疫情影响,2020年,全国重点地区快递服务全程时限为58.23小时,较2019年延长2. 国家邮政局14日举行一季度例行新闻发布会,发布2020年快递服务满意度调查和时限测试结果。受疫情影响,2020年...
对于很多考生和家长来说,选择专业一直是一个比较困难的事情,很多家长在报考志愿的时候,都会问专家,孩子学这个专业有没有前途。其实这是一个很笼统的问题,它包含了专业发展前景、对口行业的 对于很多考生和家长来说,选择专业一直是一个比较困难的事情,很多家长在报考志愿的时候,都会问专家,孩子学这个专业有没有...
我们都知道,流量是电商的命脉,没有流量的淘宝店铺就相当于没有人流的超市。产品再多,也无人购买,也更没有销售额的产生。正是因为如此,流量是我们卖家一直所追求的,只有有了流量我们的店铺 我们都知道,流量是电商的命脉,没有流量的淘宝店铺就相当于没有人流的超市。产品再多,也无人购买,也更没有销售额的产生。...
产品的更新和投入是保持企业活力和提高市场占有率竞争力的重要措施,如何有效的通过新品的市场投入和有效运作,更好的带动企业效益和利润的增加,是保证企业可持续发展的重要组成部分一、新品的 产品的更新和投入是保持企业活力和提高市场占有率竞争力的重要措施,如何有效的通过新品的市场投入和有效运作,更好的带动企...
有关企业为何要做网络推广,对企业有什么作用益处,这针对很多企业很有可能都还没真实了解企业为何要做网络推广,互联网推广对企业有哪些实际益处,下边,知名品牌益众帮,就以互联网营销这一话 有关企业为何要做网络推广,对企业有什么作用益处,这针对很多企业很有可能都还没真实了解企业为何要做网络推广,互联网推广...
一、市场调研——买家角色的定义在深入研究你所在行业的客户如何做出购买决定之前,你必须首先了解他们是谁。这就是你的买家角色派上用场的地方。买家角色(有时称为营销角色)是理想客户的虚构 一、市场调研——买家角色的定义 在深入研究你所在行业的客户如何做出购买决定之前,你必须首先了解他们是谁。这就是你的...
如果有人告诉你他要送辆车给你,中置引擎后轮驱动,360度全景大天窗……妹子你可千万别天真的以为是这样的车:因为它也有可能是以下这几款:这几日的长沙城风和日丽,一些耐不住好天气的妹子和初春的梧桐树新芽一样蠢蠢欲动。正可谓— 如果有人告诉你他要送辆车给你,中置引擎后轮驱动,360度全景大天窗……妹子你...
扫墓立碑是作为小辈必做的事情之一,这不眼见着就要寒衣节了了,由于很多地方都有立碑这一说到,所以关于立碑墓碑上刻什么图案好一直是大家讨论的焦点,下面小编就和大家一起看看。墓碑上刻什么图案好这要看地方的讲究。墓地是相当有气运 扫墓立碑是作为小辈必做的事情之一,这不眼见着就要寒衣节了了,由于很多地方都有...
奥迪a8这款车型价格并不便宜,主要是知名度不是很高,性价比也不高,所以并没有很多人去选择买奥迪a8。那么,买奥迪a8可以干销售吗?感兴趣的朋友们一起来看看久久派带来的详细介绍吧!为什么很少买奥迪a8如果你是擅长精打细算的 奥迪a8这款车型价格并不便宜,主要是知名度不是很高,性价比也不高,所以并没有...
2022年12月30日入宅吉利吗是大家常问的,虽说搬家入宅和结婚相比甚是渺小,但是呢为了讨个吉利大家每每入宅的时候不仅会选个良辰吉日进行,而且还会有各种的习俗,下面小编就和大家一起看看11月23日乔迁入宅哪些是要注意的 2022年12月30日入宅吉利吗 是大家常问的,虽说搬家入宅和结婚相比甚是渺小...
寒露节气是在每年十月初,这个时候的天气会比较凉爽舒适,有些地区可能会有点冷,这个主要看各个地区的天气情况,大多数情况下,寒露过了之后,天气就会开始慢慢变冷,大多数地区都不会有高温天气了,有些地区还会有冷空气。2022寒露 寒露节气是在每年十月初,这个时候的天气会比较凉爽舒适,有些地区可能会有点冷,...
海克斯科技食品是属于假冒食物,但一分价钱一分货,用低价格去买本身高价格的肥牛或者汤类,那大概率都是商家制作的海克斯科技食品。那么,海克斯科技食品有毒吗?一起来看看久久派带来的详细介绍吧!海克斯科技食品有毒吗没毒,但是不 海克斯科技食品是属于假冒食物,但一分价钱一分货,用低价格去买本身高价格的肥牛或...
龙泉旅游景点大全 丽水市龙泉市十大著名旅游景点? No.1 工业文创之旅 推荐路线:汽车主题公园-梵木创艺区-艺库文化创意公园-大面店文化创意市场 在设计中,汽车主题公园将汽车元素融入公园,形成文化、主题、趣味的特色景观,设置多种体育健身场馆和专业汽车...
对讲机耳麦佩戴方式 对讲机耳麦有什么用? 1、刚买来的对讲机电池前三次充电必须充8-10小时,其后须三至五小时。 2、最好在发出电池不足的红色报警或低电量提示音后再进行充电,否则会影响电池的使用寿命。 3、拆装电池时请一定要先关机,扣住电池卡再拆装电池,请勿强行拆装。 4、如...