ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[已解决] 如何把化学式分解成原子个数呢?

[复制链接]

TA的精华主题

TA的得分主题

发表于 2024-3-3 16:39 | 显示全部楼层 |阅读模式
本帖最后由 hiscul 于 2024-3-3 17:23 编辑

我想从化学式得到每个元素的质量分数,因为化学式有可能含有任何元素,所以我就做了一个包含所有元素的表格。

现在输入一个化学式后,能否在化学式不含的元素列显示零,含有的元素那一列显示化学式中该元素原子的个数。


从左边等效化学式或者从原始化学式都行。
多谢

excel截图

excel截图

矿物化学成分.zip

46.57 KB, 下载次数: 43

点评

请上传附件  发表于 2024-3-3 16:59

TA的精华主题

TA的得分主题

发表于 2024-3-3 18:41 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
力扣上有类似题的解法,可以去力扣上搜一下关键词原子。
那个等效化学式是怎么来的?解题的关键就是去括号转换成等效化学式。
化学式里带了化合价的是不是有问题?3价铁算几个铁?

TA的精华主题

TA的得分主题

发表于 2024-3-3 19:07 | 显示全部楼层
本帖最后由 我的城市你来过 于 2024-3-4 15:42 编辑

image.png

=CONCAT(IF(TEXTSPLIT(CONCAT(IF(ISNUMBER(MID(SUBSTITUTE($C2," ","@"),ROW(INDIRECT("a1:a"&LENB($C2))),1)*1),"",MID(SUBSTITUTE($C2," ","@"),ROW(INDIRECT("a1:a"&LENB($C2))),1))),"@")=F$1,1,""))


=CONCAT(IF(TEXTSPLIT(CONCAT(IF(ISNUMBER(MID(SUBSTITUTE($C2," ","@"),ROW(INDIRECT("a1:a"&LENB($C2))),1)*1),"",MID(SUBSTITUTE($C2," ","@"),ROW(INDIRECT("a1:a"&LENB($C2))),1))),"@")=F$1,TEXTSPLIT(SUBSTITUTE($C2,F$1,"")," "),""))



image.png


TA的精华主题

TA的得分主题

发表于 2024-3-3 20:33 | 显示全部楼层
我理解第一个O那里应该填9吧,SI那里应该填3吧,Zr填1,Ba填1,不知道对不对,分子量应该还要计算吧

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-3-4 07:40 | 显示全部楼层
飞天篮球猪 发表于 2024-3-3 18:41
力扣上有类似题的解法,可以去力扣上搜一下关键词原子。
那个等效化学式是怎么来的?解题的关键就是去括号 ...

https://leetcode.cn/problems/number-of-atoms/description/
我找到了,但我不会编程啊,这么多代码都用不上。
可以在化学式上人工进行简单处理,离子价位不影响原子量,可以不考虑。

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-3-4 07:42 | 显示全部楼层
我的城市你来过 发表于 2024-3-3 19:07
=CONCAT(IF(TEXTSPLIT(CONCAT(IF(ISNUMBER(MID(SUBSTITUTE($C2," ","@"),ROW(INDIRECT("a1:a"&LENB($C2 ...

谢谢,我看您的结果只是查找到了包含那些原子,没有计算具体有多少个原子。
比如水分子H2O,H那一列应该是2.
最困难的是Ba、Bi等两位的元素符号易识别成B元素
C开头的两位元素容易识别成C元素。

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-3-4 07:44 | 显示全部楼层
飞天篮球猪 发表于 2024-3-3 18:41
力扣上有类似题的解法,可以去力扣上搜一下关键词原子。
那个等效化学式是怎么来的?解题的关键就是去括号 ...

我在力扣上找到了相关的问题,726. 原子的数量,答案有很多,但我不会编程,无法用在excel里。也没法简单使用。

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-3-4 07:45 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
飞天篮球猪 发表于 2024-3-3 18:41
力扣上有类似题的解法,可以去力扣上搜一下关键词原子。
那个等效化学式是怎么来的?解题的关键就是去括号 ...

谢谢,我在您推荐的地方看到了,726. 原子的数量。
但我不会使用那些代码,不会编程,谢谢您。

TA的精华主题

TA的得分主题

发表于 2024-3-4 08:09 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
F2右拉下拉
  1. =IFNA(MATCH(1,0/FIND(" "&F$1&TEXT(ROW($1:$119),"[=1] ;0")," "&$C2&" ")),"")
复制代码

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-3-4 08:22 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 hiscul 于 2024-3-4 08:23 编辑

谢谢您,我复制代码到单元格后,现实错误。如图。
QQ图片20240304082114.png
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-11-19 00:50 , Processed in 0.040749 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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