ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 303|回复: 10

[求助] 请大师们帮忙,

[复制链接]

TA的精华主题

TA的得分主题

发表于 2024-8-27 17:04 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
说明:使用的是WPS
一、信息格式说明  
       例:['301295', '美硕科技', 304.81, 20240717, '国金证券股份有限公司温州市府路证券营业部']
                 ['301295'为股票代码部分; '美硕科技', 为股票名称;, 304.81 为买入额度;20240717 为买入时间;'国金证券股份有限公司温州市府路证券营业部'] 为买入的营业部。
二、要求:请用函数公式
              1、同一日期重复出现的股票保留第一次信息;用函数公式在b2及以下列显示。
         例: '002072', '凯瑞德', 388.31, 20240809, '财通证券股份有限公司平阳兴良路证券营业部']
                  '002072', '凯瑞德', 388.31, 20240809, '财通证券股份有限公司平阳兴良路证券营业部']
                 只保留一条信息,删除重复信息。
             2、在不同时间出现二次及二次以上的股票名称,在M2及以下列显示。
         例:['001226', '拓山重工', 347.55, 20240607, '上海证券有限责任公司广州黄埔大道证券营业部']
                  ['001226', '拓山重工', 347.55, 20240607, '上海证券有限责任公司广州黄埔大道证券营业部']
                ['001226', '拓山重工', 1675.74, 20240724, '华泰证券股份有限公司镇江句容华阳北路证券营业部']
              共 有三条信息,其中第二条属重复信息应删除, 拓山重工”共出现二次,应显示股票名称为“拓山重工”。

上榜一次营业部介入情况1.et.tar.gz

18.77 KB, 下载次数: 13

TA的精华主题

TA的得分主题

发表于 2024-8-28 14:59 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
开火车  不知是不是这个意思

上榜一次营业部介入情况1.zip

36.66 KB, 下载次数: 4

TA的精华主题

TA的得分主题

发表于 2024-8-28 17:33 | 显示全部楼层
不知道理解的对不对,需要WPS最新版

上榜一次营业部介入情况1.zip

24.96 KB, 下载次数: 6

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-8-29 08:19 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
theking_wsz 发表于 2024-8-28 14:59
开火车  不知是不是这个意思

谢谢大师,辛苦了。
本表为多条件提取,两个要求:
要求1、同一只股票同一天多次出现的,只保留第一条,你的有重复现象哦。
image.png
['000421', '南京公用', 287.69, 20240724, '东北证券股份有限公司四川分公司']
['000421', '南京公用', 301.89, 20240724, '国泰君安证券股份有限公司邳州珠江路证券营业部']
以上信息,其中“20240724”为购买时间,表示为2024年7月24日买入。
通过公式筛选后,相应类似情况,应删除第二条及第二条以上信息,只保留第一条信息。
要求2、同一只股票在不同日间段多次出现时,分别显示第二条及以上信息的股票名称或是A1的整条内容。

TA的精华主题

TA的得分主题

发表于 2024-8-29 09:32 | 显示全部楼层
b2:
  1. =LET(s,TOCOL(REGEXP(CONCAT(A2:A389),"[一-龟A-Z]+(?=',)")&REGEXP(CONCAT(A2:A389),"\d{8}")),FILTER(A2:A389,(MATCH(s,s,)=ROW(1:388))*(MMULT(--(s=TOROW(s)),ROW(1:388)^0)>1)))
复制代码

m2:
  1. =LET(m,CONCAT(A2:A389),s,TRANSPOSE(VSTACK(REGEXP(m,"[一-龟A-Z]+(?=',)"),REGEXP(m,"\d{8}"))),n,UNIQUE(TAKE(s,,1)),k,MAP(n,LAMBDA(x,COUNTA(FILTER(TAKE(s,,-1),TAKE(s,,1)=x)))),FILTER(n,k>1))
复制代码

都要最新版wps

TA的精华主题

TA的得分主题

发表于 2024-8-29 15:17 | 显示全部楼层
b1
  1. =LET(t,REDUCE("",A2:A389,LAMBDA(x,y,VSTACK(x,"*"&CONCAT(CHOOSEROWS(TEXTSPLIT(y,,","),2,4)&"*")))),DROP(REDUCE("",DROP(UNIQUE(t),1),LAMBDA(x,y,VSTACK(x,VLOOKUP(y,A:A,1,0)))),1))
复制代码

m1
  1. =LET(t,REDUCE("",A2:A389,LAMBDA(x,y,VSTACK(x,CONCAT(CHOOSEROWS(TEXTSPLIT(y,,","),2))))),TRIM(SUBSTITUTE(FILTER(DROP(UNIQUE(t),1),DROP(REDUCE("",DROP(UNIQUE(t),1),LAMBDA(x,y,VSTACK(x,IF(COUNTA(UNIQUE(FILTER(A2:A389,ISNUMBER(FIND(y,A2:A389)))))>1,TRUE,FALSE)))),1)),"'","")))
复制代码

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-8-29 16:19 | 显示全部楼层
theking_wsz 发表于 2024-8-28 14:59
开火车  不知是不是这个意思

谢谢你,辛苦了,
此表是两个条件要求:股票名称(或代码);买入时间;

同一支股票同日期买入的,有重复信息的,只保留一条,

同一支股票不同日期买入的,显示股票名称。

你的不完整

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-8-29 16:21 | 显示全部楼层
我要成为专家 发表于 2024-8-28 17:33
不知道理解的对不对,需要WPS最新版

谢谢你,辛苦了,
复制后提示公式出错

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-8-29 16:27 | 显示全部楼层

谢谢,辛苦你了
B1
公式不完整,有的股票日期不同出现过二次及二次以上,但公式只显示1次;
M2
公式可行,

另:修改列数后报错,如果信息超过388条,如何修改列数?

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-8-29 16:31 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

辛苦你了
B1
结果可用,但修改列数后报错,

M2
可用。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-15 14:46 , Processed in 0.034785 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表